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 * NOWARN 0004 * NARROW 0005 * EULER 0006 L VY.K=INTGRL(AY.JK) 0007 R AY.KL=GRAV 0008 L Y.K=INTGRL(VYR.JK) 0009 R VYR.KL=VY.K 0010 L X.K=INTGRL(VXR.JK) 0011 R VXR.KL=VXO 0012 N Y=7000 0013 N X=0 0014 N VY=0 0015 C VYO=0 0016 C VXO=2000 0017 C GRAV=-32.2 0018 PARM DT=.01 0019 PARM STOP=21 0020 PARM PLTPER=1 0021 PARM PRTPER=1 0022 NOTE IMPACT OF GRAVITY 0023 PRINT X,Y 0024 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