1PAGE 1 COAL MINING PROBLEM (C) 1978 UND
* * * * * S O U R C E L I S T I N G * * * * *
0001 TITLE COAL MINING PROBLEM
0002 * NOSTATS
0003 * NARROW
0004 * EULER
0005 L LCG.K=INTGRL(-RCM.JK)
0006 R RCM.KL=CON*MULT.K
0007 N LCG=10E2
0008 A MULT.K=5/7
0009 C CON=10
0010 PARM DT=1
0011 PARM STOP=52
0012 PARM PLTPER=2
0013 PARM PRTPER=2
0014 NOTE COAL MINED
0015 PRINT LCG,RCM
0016 PLOT LCG=L/RCM=R
1PAGE 2 COAL MINING PROBLEM - COAL MINED (C) 1978 UND
TIME LCG RCM
E+00 E+03 E+00
0.000 1.0000 7.1429
2.000 0.9857 7.1429
4.000 0.9714 7.1429
6.000 0.9571 7.1429
8.000 0.9429 7.1429
10.000 0.9286 7.1429
12.000 0.9143 7.1429
14.000 0.9000 7.1429
16.000 0.8857 7.1429
18.000 0.8714 7.1429
20.000 0.8571 7.1429
22.000 0.8429 7.1429
24.000 0.8286 7.1429
26.000 0.8143 7.1429
28.000 0.8000 7.1429
30.000 0.7857 7.1429
32.000 0.7714 7.1429
34.000 0.7571 7.1429
36.000 0.7429 7.1429
38.000 0.7286 7.1429
40.000 0.7143 7.1429
42.000 0.7000 7.1429
44.000 0.6857 7.1429
46.000 0.6714 7.1429
48.000 0.6571 7.1429
50.000 0.6429 7.1429
52.000 0.6286 7.1429
1PAGE 3 COAL MINING PROBLEM - COAL MINED (C) 1978 UND
L=LCG R=RCM
L 620 715 810 905 1000
R 7.1 7.125 7.15 7.175 7.2
0 . . . . . . . . . . . . R . . . . . . . . . . . . . . . L
. . R . . L .
. . R . . L .
T . . R . . L .
I . . R . . L .
M . . R . . L .
E . . R . .L .
. . R . L. .
. . R . L . .
. . R . L . .
20 . . . . . . . . . . . . R . . . . .L. . . . . . . . . . .
. . R . L . .
. . R . L . .
. . R .L . .
. . R L. . .
. . L . . . LR
. . L R . . .
. . L R . . .
. . L R . . .
. . L R . . .
40 . . . . . . . L . . . . R . . . . . . . . . . . . . . . .
. L . R . . .
. L . R . . .
. L . R . . .
. L . R . . .
. L . R . . .
52 .L. . . . . . . . . . . R . . . . . . . . . . . . . . . .