1PAGE 1 AN OBJECT THROWN FROM A CLIFF (C) 1978 UND * * * * * S O U R C E L I S T I N G * * * * * 0001 TITLE AN OBJECT THROWN FROM A CLIFF 0002 * NOSTATS 0003 * NARROW 0004 * EULER 0005 L Y.K=INTGRL(VYR.JK) 0006 R VYR.KL=VYO+AY.K*TIME.K 0007 A AY.K=GRAV 0008 L X.K=INTGRL(VXR.JK) 0009 R VXR.KL=VXO 0010 N Y=7000 0011 N X=0 0012 C VYO=0 0013 C VXO=2000 0014 C GRAV=-32.2 0015 PARM DT=.01 0016 PARM STOP=21 0017 PARM PRTPER=1 0018 PARM PLTPER=1 0019 NOTE IMPACT OF GRAVITY 0020 PRINT X,Y 0021 PLOT X=X/Y=Y 1PAGE 2 AN OBJECT THROWN FROM A CLIFF - IMPACT OF GRAVIT (C) 1978 UND TIME X Y E+00 E+03 E+03 0.000 0.000 7.0000 1.000 2.000 6.9841 2.000 4.000 6.9359 3.000 6.000 6.8556 4.000 8.000 6.7430 5.000 10.000 6.5983 6.000 12.000 6.4214 7.000 14.000 6.2122 8.000 16.000 5.9709 9.000 18.000 5.6973 10.000 20.000 5.3916 11.000 22.000 5.0537 12.000 24.000 4.6835 13.000 26.000 4.2812 14.000 28.000 3.8467 15.000 30.000 3.3799 16.000 32.000 2.8810 17.000 34.000 2.3498 18.000 36.000 1.7865 19.000 38.000 1.1910 20.000 40.000 0.5632 21.000 42.000 -0.0967 1PAGE 3 AN OBJECT THROWN FROM A CLIFF - IMPACT OF GRAVIT (C) 1978 UND X=X Y=Y X 0 10500 21000 31500 42000 Y -97 1677.3 3451.5 5225.8 7000 0 X . . . . . . . . . . . . . . . . . . . . . . . . . . . Y . X . . . Y . X . . . Y. T . X . . . Y. I . X . . . Y . M . X. . . Y . E . . X . . Y . . . X . . Y . . . X . . Y . . . X . . Y . 10 . . . . . . . . . . . . . .X. . . . . . . .Y. . . . . . . . . .X Y. . . . . X Y . . . . . X . . XY . . . Y X . . . . Y. X . . . . Y . .X . . . Y . . X . . .Y . . X . . Y . . . X . 20 . . .Y. . . . . . . . . . . . . . . . . . . . . . . .X. . 21 Y . . . . . . . . . . . . . . . . . . . . . . . . . . . X