Differences From Artifact [37893fe9f3]:
- Executable file mttroot/mtt/bin/trans/m/mtt_update.m — part of check-in [40404a1dc7] at 1998-07-25 20:43:18 on branch origin/master — Initial revision (user: gawthrop@users.sourceforge.net, size: 78) [annotate] [blame] [check-ins using]
To Artifact [d664b9210d]:
- Executable file mttroot/mtt/bin/trans/m/mtt_update.m — part of check-in [76bdb5bcaa] at 1998-08-15 13:48:11 on branch origin/master — New way of computing Euler (user: gawthrop@users.sourceforge.net, size: 304) [annotate] [blame] [check-ins using]
|
| | > > | > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 |
function [x] = mtt_update(dx,x,AAx,AA,dt,STEPFACTOR,Nx,METHOD);
if (METHOD==1) #Euler
ddt = dt/STEPFACTOR;
x = x + dx*ddt;
elseif ((METHOD==2)||(METHOD==3))#Linear implicit or Implicit
x = AA\(AAx + dx*dt);
else
error("Method %i is not defined", METHOD);
endif;
endfunction;
|