mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-03-02 09:46:59 +00:00
1. Correct missing relocation pseudo-op in MONIT Library routine. 2. Rebuild Generator and Compiler tapes. 3. Recompile and generate corrected listings for example programs. 4. Add Simpson's Rule example from Algol-58 Preliminary Report.
33 lines
21 KiB
VHS
33 lines
21 KiB
VHS
0,100,0,1390000,310004,5103260022,1018500000,400012,2400013,1420008,12739,1400560000,1308520100,300100,0,5000,420000,412400024,1004500000,1100580000,420013,390000,250020,100012,10023,5112400022,300024,420027,10290012,290199,2400012,411180012,1350027,1100520100,410069,1400048,1420035,1450100,10000120200,10000120201,10000120202,10000120203,10000120204,5200036,310043,360048,40090092,9669009669,1101580000,300031,100101,420048,4330060,460071,299260071,401280071,10000410100,1280370072,370031,16400280100,10411400000,300053,6610400064,9999210000,412400064,10000429999,290000,1480007,120070,190048,300048,100101,1,99,6711180091,1350053,300200,1111,420074,10000100000,170075,490004,10400091,401260074,4450000,41000500091,1100520100,100100,10180091,350032,30090096,9669009669,300083,80000000000,21602020202,24348454352,20062645400,24559595659,21662454754,24555630045,25959565902
|
|
0,100,0,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,0,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,1111111111,0,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,30000000000,0,0,0,0,0,0,0,0,31111111111,31100111133,33322222222,22333333333,11103333331,11100000000,0,0,0,0,0,0,0,0,33333333333,33333333333,33333333333,33333333333,33333333333,33333333333,33000000000,0,0,0,0,0,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111
|
|
0,100,0,33333333333,33333333333,33333333333,33333333333,33333333333,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,31111111111,1000640232,300233,1008620129,5512400200,5401260200,310238,2000650238,300234,2000650240,300243,2004630158,2006630187,2008630229,1000650245,300246,1008630229,410013,300025
|
|
0,100,0,40950290200,300221,300400,102960,402959,440218,300209,102960,122959,402959,132958,1111310212,360214,1330214,300219,420214,2200201,422959,10000404970,300400,9430000,300201,300228,300400,100420223,2200222,402957,9430000,300222,300267,300400,102960,402959,440264,300237,102960,122959,402959,132957,1111310240,360242,1330242,300265,102960,402956,440263,300249,102960,122956,402956,132957,1111310252,360254,1330254,300264,102959,142955,1490010,122956,402954,422954,10000104256,420261,2200229,300400,300400,9430000,300229,309999,300400,102960,402959,449999,300276,102960,122959,402959,132957,1111310279,360281,1330281,309999,102960,402956,449999,300288,102960,122956,402956,132957,1111310291,360293,1330293,309999,102959,142955,0,0,16670488452
|
|
0,100,1,40900290295,1490010,122956,402954,422954,10000103631,420300,2200268,300400,300400,9430000,300268,300345,300400,102960,402959,440342,300315,102960,122959,402959,132957,1111310318,360320,1330320,300343,102960,402956,440341,300327,102960,122956,402956,132957,1111310330,360332,1330332,300342,102959,142955,1490010,122956,402954,422954,10000103006,420339,2200307,300400,300400,9430000,300307,300372,300400,102953,402952,440369,300354,102953,122952,402952,402954,102957,132960,132954,1111310360,360362,330362,300370,102951,142952,1402954,422954,10000102983,420367,2200346,300400,9430000,300346,309999,300400,102960,402950,449999,300381,102960,122950,402950,132958,1111310384,369999,1339999,0,0,40002670306,40002710303,70002800304,40002830302,70002920303,15410639932
|
|
0,100,2,40910290385,300391,422950,10000104941,420388,2200373,300400,9430000,300373,300400,300400,102949,420396,2200394,9430000,300394,300424,300400,102948,100420403,2200401,102960,402950,440421,300412,102960,122950,402950,132947,1111310415,360417,1330417,300422,422950,10000104912,420419,2200401,300400,9430000,300401,300448,300400,102948,100420427,2200425,102960,402950,440445,300436,102960,122950,402950,132946,1111310439,360441,1330441,300446,422950,10000104906,420443,2200425,300400,9430000,300425,309999,4200800,64601608,6600000,10000000449,4204800,24659456264,25363622346,24124492351,30414000000,6600300,6600200,10000000453,4204800,24259456264,25363622342,22449235104,31400000000,6600300,6600200,10000000461,4204800,24159456264,25363622341,22449235104,31400000000,6600300,6600200,0,0,40003720393,40003760390,40003830386,40003840386,18521101338
|
|
0,100,3,40940290476,10000000469,4203000,24841248855,36420810414,6600200,10000000477,4204200,25759455349,25449554159,26800425664,25544415968,20065415364,34562140000,6600300,6600200,10000000482,4204300,24356595945,24363454400,24256645544,24159680065,24153644562,31400000000,6600200,10000000492,4205000,24356556263,34155631400,6600200,10000000501,4200800,4900200,4200600,64601608,6600000,10000000506,4204000,26348450065,24153644562,20056460048,22459485623,26348040049,35500421400,6600300,6600200,10000000512,4201300,35948561400,4200600,38003851400,4201300,38103801400,4201300,38103851400,4201300,38203801400,4201300,38203851400,4201300,38303801400,6600000,10000000522,4200800,36348140000,6600000,10000000538,100543,10201,442807,302807,100547,10222,442807,302807,102960,402959,449999,300557,102960,122959,402959,132957,1111310560,360562,1330562,309999,102959,402956,449999,300569,102953,122956,402956,132957,0,0,40004480542,7523128460
|
|
0,100,4,40950290570,1111310572,360574,1330574,309999,102959,132956,402806,102956,122959,402950,412950,104971,442768,302768,412950,402954,104988,442768,302768,242767,402756,102806,442742,302742,242741,442757,302757,242756,222954,412950,402954,104999,442768,302768,242740,402756,102806,442742,302742,242739,442757,302757,242756,222954,402738,102951,402737,440649,300622,102960,122737,402737,132736,1111310625,360627,1330627,300650,412950,422737,10000104970,442768,302768,242735,402954,102737,132960,442742,302742,242734,402756,102806,442742,302742,242756,442757,302757,242954,222738,402738,300400,102733,402737,449999,300657,102960,122737,402737,132732,1111310660,360662,1330662,309999,412950,422737,10000104970,0,0,14313889121
|
|
0,100,5,40890290665,442768,302768,402954,102737,132731,442742,302742,242730,222741,402756,102806,442742,302742,242756,442757,302757,242954,222738,402738,300400,102959,142955,1490010,122956,402954,102950,442742,302742,402756,102729,2450000,252756,242730,242738,422954,10000404256,300400,300400,100704,10453,442489,302489,100708,10229,4400282489,10000400000,100712,10449,442489,100302489,102960,402956,440730,300722,102960,122956,402956,132957,1111310725,360727,1330727,300731,422956,10000104281,10000403031,300400,102951,402959,449999,300738,102960,122959,402959,132957,1111310741,360743,1330743,309999,102960,402956,449999,300750,102960,122956,402956,402954,102959,132960,132954,0,0,40005520702,70005610703,40005640701,70005730702,40006520684,70006610685,17638669124
|
|
0,100,6,40940290754,1111310756,360758,330758,300781,102959,142955,1490010,122956,402954,102956,142955,1490010,122959,402756,102956,142955,1490010,122956,402488,422756,10000113006,2450000,422488,10000253006,422954,10000403006,300400,102959,402956,449999,300788,102960,122956,402956,132957,1111310791,360793,1330793,309999,102959,142955,1490010,122956,402954,102959,142955,1490010,122956,402488,422488,10000104256,422954,10000403006,102960,402950,449999,300814,102960,122950,402950,402954,102959,132960,132954,1111310820,360822,330822,309999,102959,142955,1490010,122956,402954,102959,142955,1490010,122956,402488,102959,142955,1490010,122950,402756,102950,142955,1490010,122956,402487,422756,10000103006,422487,10000243006,422488,10000223006,0,0,40007450780,14314986073
|
|
0,100,7,40890290848,422954,10000403006,300400,300400,102960,402956,440898,300859,102960,122956,402956,402954,102959,132960,132954,1111310865,360867,330867,300899,102959,142955,1490010,122956,402954,102959,142955,1490010,122956,402488,102956,142955,1490010,122956,402487,102959,142955,1490010,122959,402756,422487,10000103006,2450000,422756,10000253006,442442,302442,422488,10000243006,422954,10000403006,300400,300400,102960,402959,449999,300907,102960,122959,402959,132957,1111310910,360912,1330912,309999,102959,142955,1490010,122959,402954,102959,142955,1490010,122959,402488,422488,10000103006,442442,302442,402488,102959,442742,302742,242488,402488,102441,2450000,252488,422954,10000403006,0,0,40007330899,70007420900,40007830851,70007920852,40008090850,70008210851,13144733771
|
|
0,100,8,40930290937,300400,100939,10461,442489,302489,100943,10307,4400282489,10000400000,100947,10449,442489,100302489,102960,402959,440982,300957,102960,122959,402959,132957,1111310960,360962,1330962,300983,102960,402956,440981,300969,102960,122956,402956,132957,1111310972,360974,1330974,300982,102959,142955,1490010,122956,402954,422954,10000463631,300400,300400,103032,403657,102951,402959,449999,300992,102960,122959,402959,132957,1111310995,360997,1330997,309999,102960,402956,449999,301004,102960,122956,402956,402954,102959,132960,132954,1111311010,361012,331012,309999,102959,142955,1490010,122956,402954,422954,10000463631,102956,402950,449999,301026,102960,122950,402950,402954,102959,132960,132954,0,0,40009020937,70009110938,19901344788
|
|
0,100,9,40900291030,1111311032,361034,331034,301063,102959,142955,1490010,122956,402954,102959,142955,1490010,122956,402488,102959,142955,1490010,122950,402756,102950,142955,1490010,122956,402487,422756,10000103006,422487,10000243631,422488,10000223631,422954,10000403631,300400,300400,102959,142955,1490010,122959,402954,102959,142955,1490010,122959,402488,422488,10000103006,422954,10000403631,300400,101080,10469,442489,302489,101084,10268,4400282489,10000400000,101088,10449,442489,100302489,102953,402956,449999,301098,102953,122956,402956,402954,102957,132960,132954,1111311104,361106,331106,309999,422956,10000464917,102960,402737,449999,301115,102960,122737,402737,132736,1111311118,369999,1339999,309999,0,0,40009871078,70009961079,40009991063,70010111064,40010211062,18770107480
|
|
0,100,10,40910291120,422737,10000104970,10000244970,402954,10000104971,10000244971,222954,412956,402954,10000104971,442768,302768,402488,102956,442742,302742,242734,402487,102737,442742,302742,242487,442385,302385,242488,412956,402488,422737,10000104970,442768,302768,402487,102737,132960,442742,302742,242734,402756,102956,442742,302742,242756,442385,302385,242487,232488,242954,422956,10000234917,402954,112954,10000404917,300400,102731,402737,449999,301180,102960,122737,402737,132732,1111311183,361185,1331185,309999,422737,10000104970,10000244970,402954,10000104971,10000244971,412956,402488,10000104971,442768,302768,402487,102737,132736,442742,302742,242730,222741,402756,102956,442742,302742,242756,442385,302385,242487,0,0,40011101172,70011191173,40011171120,40011181120,12066637259
|
|
0,100,11,40910291211,412956,402487,422737,10000104970,442768,302768,402756,102737,132731,442742,302742,242730,222741,402384,102956,442742,302742,242384,442385,302385,242756,232487,242488,232954,422956,10000234917,402954,112954,10000404917,300400,300400,102953,402952,449999,301249,102953,122952,402952,402954,102957,132960,132954,1111311255,361257,331257,309999,102951,142952,1402954,422954,10000462983,102953,402956,441293,301269,102953,122956,402956,132952,1111311272,361274,1331274,301294,102951,142952,1402954,102951,142952,1402488,102952,142955,1490010,122956,402487,422487,10000103631,422956,10000244917,422488,10000222983,422954,10000402983,300400,102951,142952,1402954,102951,142952,1402488,102383,422488,0,0,40010931241,70011051242,40011751240,70011841241,13160190969
|
|
0,100,12,40930291302,10000242983,422954,10000402983,300400,101307,10477,442489,302489,101311,10346,4400282489,10000400000,101315,10449,442489,100302489,102953,402956,441366,301325,102953,122956,402956,402954,102957,132960,132954,1111311331,361333,331333,301367,422956,10000462960,102956,402952,441365,301342,102953,122952,402952,402954,102957,132960,132954,1111311348,361350,331350,301366,102951,142952,1402954,102952,142955,1490010,122956,402488,422954,10000102983,422488,10000243631,422956,10000222960,10000402960,300400,300400,102960,402737,449999,301374,102960,122737,402737,132731,1111311377,361379,1331379,309999,422737,10000464941,102953,402956,449999,301388,102953,122956,402956,402488,102957,132960,132488,1111311394,369999,339999,0,0,40012441305,70012561306,19896601205
|
|
0,100,13,40900291395,301421,412956,422737,10000104970,442768,302768,422956,10000242960,402488,102737,132960,442742,302742,242734,402954,102956,442742,302742,242954,442757,302757,242488,422737,10000224941,10000404941,300400,300400,102733,402737,441477,301429,102960,122737,402737,132958,1111311432,361434,1331434,301478,422737,10000464941,102953,402956,441476,301443,102953,122956,402956,402488,102957,132960,132488,1111311449,361451,331451,301477,412956,422737,10000104970,442768,302768,422956,10000242960,402488,102737,132731,442742,302742,242730,222741,402954,102956,442742,302742,242954,442757,302757,242488,422737,10000224941,10000404941,300400,300400,101479,10482,442489,302489,101483,10373,4400282489,0,0,40013691421,70013781422,40013831420,40013931396,40013941396,17586225914
|
|
0,100,14,40950291485,10000400000,101487,10449,442489,100302489,462382,102960,402737,441509,301498,102960,122737,402737,132958,1111311501,361503,1331503,301510,422737,10000104970,10000244970,222382,10000234941,402382,300400,102382,2450000,252381,402949,101515,10501,442489,302489,101519,10394,4400282489,10000400000,101523,10449,442489,100302489,102960,402737,441542,301533,102960,122737,402737,132958,1111311536,361538,1331538,301543,422737,10000104941,222949,10000404941,300400,101544,10492,442489,302489,101548,10373,4400282489,10000400000,101552,10449,442489,100302489,102960,402959,449999,301562,102960,122959,402959,132947,1111311565,361567,1331567,309999,102959,132960,142947,1402948,102960,402956,449999,301578,102960,122956,402956,132947,1111311581,0,0,14520113622
|
|
0,100,15,40920291580,361583,1331583,301629,102949,422956,10000404912,102953,402737,441627,301593,102953,122737,402737,402488,102957,132960,132488,1111311599,361601,331601,301628,102956,442742,302742,242740,412737,442768,302768,422737,10000242960,402488,102959,132960,442742,302742,242380,402954,102737,442742,302742,242954,442757,302757,242488,422956,10000224912,10000404912,300400,300400,101630,10512,442489,302489,101634,10522,442489,302489,101638,10538,442489,302489,101642,10401,4400282489,10000400000,101646,10506,442489,100302489,300400,102946,402959,449999,301657,102960,122959,402959,132379,1111311660,361662,1331662,309999,102959,132960,142947,1402948,102960,402956,449999,309999,102960,122956,0,0,40015571649,70015661650,40015731628,17682266148
|
|
0,100,16,40660291672,402956,132946,1111311676,361678,1331678,301724,102949,422956,10000404906,102953,402737,441722,301688,102953,122737,402737,402488,102957,132960,132488,1111311694,361696,331696,301723,102956,442742,302742,242740,412737,442768,302768,422737,10000242960,402488,102959,132960,442742,302742,242380,402954,102737,442742,302742,242954,442757,302757,242488,422956,10000224906,10000404906,300400,300400,101725,10401,4400282489,10000400000,101729,10506,442489,100302489,300400,102378,137007310,300546,9669009669,1000600000,40010292960,1,40010292951,2,40010292958,29,40010292947,5,40010292946,6,40010292955,25,40010292953,4,40010292731,18,40010292736,17,40010292733,19,40010292732,28,40010292379,10,40010292378,1234,0,40016521732,70016611733,40016681723,40016691673,18371405433
|
|
0,100,17,40010292441,5110000000,40010292735,5120000000,40010292767,5115000000,40010292741,5059341195,40010292740,5050000000,40010292739,5078539816,40010292734,4934906585,40010292730,4917453293,40010292729,5180000000,40010292383,5140000000,40010292381,5229000000,40010292380,4987266463,40140292742,6450000,2200362746,480001,1202743,1480008,10000102752,1490008,222755,422742,10000300000,58,59,60,5800000000,40560292489,100010000,410402525,422493,10292725,300290101,422489,412402574,10000419999,9437557,2200372502,420100,10000440000,12201370001,400132,412402556,410130,372523,100134,460133,5246372685,5267372661,5249372599,5262372712,5241372514,302700,412532,1270129,442657,302648,100129,362539,2299372553,1490010,302515,422490,312332,109999,401262525,332541,412532,1332557,2214362525,442657,9900302648,2299372525,1490010,302530,100129,190125,190125,100130,3300362523,3300362543,132726,400130,210400131,0,0,11617619218
|
|
0,100,18,40950292545,1480002,310400129,7242362536,7266362577,7257362585,7263362587,7243362576,300362525,100132,400134,9332536,309999,422525,6600362573,1490003,300372567,132726,3300362569,16301279999,10000419999,411402525,302525,13310409999,302561,10000109999,1480003,16610409999,302525,100132,9339999,302564,1008610124,1480003,3111402579,2408442365,101302365,422583,10292725,240290101,302539,1008610124,302581,300362592,10092591,1122569,302587,21602020202,100125,362539,122662,1480004,3211402597,990090101,302581,422609,362658,1100362659,400134,3450080,2400128,460126,410400126,1400127,100134,2480010,1430023,120129,130128,1332700,190125,5000190125,100134,412653,442657,1332647,1270128,322633,410127,372539,412610,442657,302647,100127,132615,422545,460129,3260129,302602,1270126,410126,372641,410133,372643,1270133,412603,0,0,12799405927
|
|
0,100,19,40890292640,302647,412570,302647,100134,412662,1490001,400134,1490018,1480008,1420125,10000490008,9400280125,24212657,430020,10000120125,10010400125,2260125,309999,9212603,490051,1212601,2457557,1480008,410182727,1400134,1342675,410402673,449272673,422673,100130,1480004,4211402674,102673,2459999,202604,437557,132727,210400133,211180130,352682,102727,302666,102659,1110400134,302666,304270129,322689,302699,102728,362688,2457557,2210402614,1480008,1400134,2480010,120130,172659,310180129,1342708,4260129,100129,190125,190125,2270125,412715,442657,302647,302539,412614,102645,420131,1202604,2457557,1480008,1400134,430014,132727,2457557,1332723,210180130,342700,122645,302710,10400133,302709,20000000000,10000000,50,5000000000,40050292807,2935010000,410402897,410402898,401262898,442904,0,0,19647087081
|
|
0,100,20,40950292812,302897,422935,10000460000,462943,442308,117302308,462945,502262945,422935,9999202825,6400282943,100101,9999202919,9400282945,10000100101,422945,10000490000,502262945,412943,372845,160212816,4400282943,2213362860,480008,10000490000,192942,4102272943,322825,102942,442904,302897,5212272943,302825,162212816,1108362876,2203362872,2220362870,2234362870,2223362865,2213362927,2214362858,422939,9999202825,442904,302883,302825,9416262945,302853,462943,102942,442904,9992202897,302825,1262941,442904,302883,1262938,302825,1262937,302825,412931,2211402936,1262940,302825,490001,412942,1490001,1402942,2201272936,1262939,302825,412938,372910,422937,112942,490008,9999202890,430000,1132944,1210272944,322897,430000,302897,422941,1212905,440090,300091,9332907,412402898,422915,462936,70292936,300097,402944,302901,0,0,14089797184
|
|
0,100,21,40390292907,422807,462935,10000300000,102942,422940,9999202915,122936,222936,422937,9999202895,1430000,302895,810182932,1352825,410102,11182933,1352825,422935,10001260000,302907,422939,9999202843,502272945,302855,5800000000,28562455563,24955455300,5110000000,0,0,0,0,0,0,0,0,0,0,0,40540292311,442344,302340,25945626453,26300566463,20056460059,24155474500,24955000000,442344,302340,25945626453,26300645544,24546495545,24400465659,20000000000,442344,302340,25945626453,26300495353,22044454649,25545440046,25659000000,462353,442344,302342,0,20041594963,24854456349,24300566545,25946535666,1402353,3450000,412402347,422364,50290033,1106442365,2348302365,300036,0,0,0,0,0,0,0,0,0,0,0,5000000000,0,0,5110000000,0,2348,40010292442,4450000,0,13982392725
|
|
0,100,22,40440292443,422442,10000360000,1332476,810402478,2310402479,102359,142479,132480,2310402479,3110182479,352456,1332456,2201262479,102481,242478,222482,242478,222483,402360,102478,252360,222360,242484,402360,102478,252360,222360,122479,352474,242485,10000300000,242484,10000300000,412486,302318,5110000000,0,2550000000,14916450338,5041117101,5062697923,5050000000,5015811388,26258596300,40380292768,2771010000,4400282768,312332,1402360,402363,422768,362797,102362,10000370000,402361,102359,142360,402360,372785,102361,242363,402361,412360,372791,102363,242363,402363,302778,312801,1210372794,10000300000,102362,252361,10000300000,1182335,10000340000,412805,302318,1450000,11210370000,412805,302311,24653466700,40110292385,6450000,412431,411402429,462363,242434,1490002,211402433,422433,9949202399,7212428,10001490018,0,0,13275469266
|
|
0,100,23,40450292396,402363,102398,1490050,1490018,402361,222361,10182362,1342407,430000,232435,1490000,402361,242361,402360,242436,222437,242360,222438,242360,222439,242360,222440,242361,222361,402361,102359,142363,102361,422385,10000370000,112361,10000300000,422385,412432,302325,2432,26249550000,0,5031830989,5120000000,4715148419,14846737656,4979689679,15064596371,5057079632,40100292757,6450000,412757,411402385,412764,222766,222766,302387,2765,24356620000,5078539816,40030292308,10000,1000600117,302818,40130292365,10000,422365,10000109999,480006,410402375,10000109998,4210402375,480008,132377,192375,2000610000,10000300000,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,80000002378,19454161738
|
|
0,100,9999999999,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,19999999999
|
|
6804*0,100
|
|
0,1,1
|
|
6832*1,100
|
|
1,1,1
|