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 * CHECK
0005 * EULER
0006 L LCG.K=INTGRL(-RCM.JK)
0007 R RCM.KL=CON*MULT.K*LCG.K*.05
0008 N LCG=10E2
0009 A MULT.K=5/7
0010 C CON=10
0011 PARM DT=1
0012 PARM STOP=52
0013 PARM PLTPER=2
0014 PARM PRTPER=2
0015 NOTE COAL MINED
0016 PRINT LCG,RCM
0017 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 357.14
2.000 0.4133 147.59
4.000 0.1708 61.00
6.000 0.0706 25.21
8.000 0.0292 10.42
10.000 0.0121 4.31
12.000 0.0050 1.78
14.000 0.0021 0.74
16.000 0.0009 0.30
18.000 0.0004 0.13
20.000 0.0001 0.05
22.000 0.0001 0.02
24.000 0.0000 0.01
26.000 0.0000 0.00
28.000 0.0000 0.00
30.000 0.0000 0.00
32.000 0.0000 0.00
34.000 0.0000 0.00
36.000 0.0000 0.00
38.000 0.0000 0.00
40.000 0.0000 0.00
42.000 0.0000 0.00
44.000 0.0000 0.00
46.000 0.0000 0.00
48.000 0.0000 0.00
50.000 0.0000 0.00
52.000 0.0000 0.00
1PAGE 3 COAL MINING PROBLEM - COAL MINED (C) 1978 UND
L=LCG R=RCM
L 1E-7 250 500 750 1000
R 3.7E-8 90 180 270 360
0 . . . . . . . . . . . . . . . . . . . . . . . . . . . . L LR
. . L . . . LR
. RL . . . .
T . L . . . . LR
I . L . . . . LR
M .L . . . . LR
E L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
20 L . . . . . . . . . . . . . . . . . . . . . . . . . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
40 L . . . . . . . . . . . . . . . . . . . . . . . . . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
L . . . . LR
52 L . . . . . . . . . . . . . . . . . . . . . . . . . . . . LR