COPTION DUMP=1 C File ex2_8.ato C Example 2-8. Equally spaced output points. C Y.F. Chang, ATOMFT User Manual, Version 3.11 C Partial results: C Step number 0 at T = 0.00000E+00 C Y 1.00000E+00 0.00000E+00 C This solution will be limited by the machine roundoff. C C Step number 1 at T = 2.00000E-01 C Y 1.12637E+00 1.32292E+00 C C . . . C C Step number 2 at T = 1.00000E+00 C Y 2.33937E+01 2.26373E+02 C C Step number 2 at T = 1.10000E+00 C Y 8.77740E+01 1.64472E+03 C C First Painleve transcendent DIFF(Y,T,2) = 6*Y*Y + T $ $ MSTIFF = 1 MPRINT = 2 DLTXPT = 0.2 START = 0.0 END = 1.1 Y(1) = 1.0 WRITE(LIST,120) START,END,Y(1),Y(2) 120 FORMAT(' Solve first Painleve transcendent'/ A ' Interval: ',2F10.3/ A ' Initial conditions:',2F10.3/) $ $