WRITE ( 2, * ) "Step x y RK4 error RK4" DO i = 0 ,n OPEN ( 1 ,FILE = 'input.txt' ) OPEN ( 2 ,FILE = 'output.txt' ) READ ( 1, * )a ,b ,n ,y REAL ::a ,b ,h ,x ,y ,k1 ,k2 ,k3 ,k4 ,f ,df GNIIRK2, symplectic and symmetric implicit Runge-Kutta code for second order differential equations GNICOMP, composition methods with basic method as.
0 Comments
Leave a Reply. |