[donev@pc346g-05 solutions]$ f90-vast worksheet9.f90 -o worksheet9.x $ODEvf90 $DISLINvf90 Pacific-Sierra Research vf90 Personal V3.4N5 20:07:40 12/ 7/00 f90 to f77 module EB program ode_eb [donev@pc346g-05 solutions]$ worksheet9.x Enter the values of E0,B0,dB,dE,theta, omega and phi 1,1,0,0,0,0,0,0 Enter the initial velocity v0 and the end of the time interval t_max 1,0,0,50 <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< << END OF DISLIN / VERSION 7.3 << << Date : 07.12.2000 Time : 20:07:53 Pageformat: DA4L << << Vectors : 5478 Warnings: 0 Fileformat: PNG << << Metafile: Orbit.png << <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< [donev@pc346g-05 solutions]$