% Linear Algebra: Theory and Applications
% Ward Cheney & David Kincaid
% JBPub.com (c) 2008 
% File: exp833.map
% Example 8.3.3

with(LinearAlgebra):
x1 := 0.0;  x2 := 0.0;  x3 := 0.0;
for k from 1 to 25 do
   x1 := 0.15.x2 + 0.1.x3 + 3.5;
   x2 := 0.15.x1 + 0.05.x3 + 2.5;
   x3 := 0.1.x1 + 0.05.x2 + 1.5;
do