Index: mttroot/mtt/bin/trans/p/mtt_solve.p ================================================================== --- mttroot/mtt/bin/trans/p/mtt_solve.p +++ mttroot/mtt/bin/trans/p/mtt_solve.p @@ -1,7 +1,7 @@ PROCEDURE mtt_solve(VAR x : StateVector; - VAR A : StateMatrix; + A : StateMatrix; VAR B : StateVector; n : integer; Small : real); { @@ -9,10 +9,13 @@ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % $Id$ % % $Log$ +% % Revision 1.1 1998/08/13 08:51:57 peterg +% % Initial revision +% % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% } VAR i : integer;