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*LCG.K 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 (C) 1978 UND ERRORS DURING RUN 1: OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 3 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 4 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 4 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 5 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 5 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 6 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 6 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 7 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 7 OVERFLOW HAS OCCURRED IN STATEMENT 0007 AT TIME = 8 RUN 1PAGE 3 COAL MINING PROBLEM - COAL MINED (C) 1978 UND TIME LCG RCM E+00 E+36 E+36 0.0000 0.000 0.000 2.0000 0.000 0.000 4.0000 10.000 10.000 6.0000 30.000 10.000 1PAGE 4 COAL MINING PROBLEM - COAL MINED (C) 1978 UND L=LCG R=RCM L 1000 7.5E+36 1.5E+37 2.25E+37 3E+37 R 7.1E+6 2.5E+36 5E+36 7.5E+36 1E+37 0 L . . . . . . . . . . . . . . . . . . . . . . . . . . . . LR L . . . . LR . . L . . R 6 . . . . . . . . . . . . . . . . . . . . . . . . . . . . L LR