Artifact c735b97393712f0792be6c775dc3136d6792ecda722a60e482904cd43dde5377:

• Executable file mttroot/mtt/bin/trans/p/mtt_update.p — part of check-in [40404a1dc7] at 1998-07-25 20:43:18 on branch origin/master — Initial revision (user: gawthrop@users.sourceforge.net, size: 231) [annotate] [blame] [check-ins using]

PROCEDURE mtt_update(VAR xnew	: StateVector;
			 dx,x	: StateVector;
			 DT	: REAL;
			 Nx	: INTEGER;
			 METHOD	: IntegrationMethod);

VAR
i : INTEGER;
   
BEGIN
   FOR i := 1 TO  Nx DO
      xnew[i] := xnew[i] + dx[i]*DT;
END;