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=.05/10E73
$
1) ***** E R R O R ***** ND0612
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 (C) 1978 UND
ERRORS DURING RUN 1:
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 0
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 1
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 2
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 3
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 4
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 5
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 6
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 7
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 8
UNDERFLOW HAS OCCURRED IN STATEMENT 0009 AT TIME = 9
RUN
1PAGE 3 COAL MINING PROBLEM - COAL MINED (C) 1978 UND
TIME LCG RCM
E+00 E+03 E+00
0.0000 1.0000 0.0000
2.0000 1.0000 0.0000
4.0000 1.0000 0.0000
6.0000 1.0000 0.0000
8.0000 1.0000 0.0000
1PAGE 4 COAL MINING PROBLEM - COAL MINED (C) 1978 UND
L=LCG R=RCM
L 800 900 1000 1100 1200
R -.2 -.1 0 .1 .2
0 . . . . . . . . . . . . . . L . . . . . . . . . . . . . . LR
. . L . . LR
. . L . . LR
T . . L . . LR
8 . . . . . . . . . . . . . . L . . . . . . . . . . . . . . LR