File MORTT.FT (FORTRAN source file)

Directory of image this file is from
This file as a plain text file

2103 6411 2517 2122 2107 3501 2105 0440 2515 1117 2524 5111 2101 4524 1117 0116 
2124 1101 1114 0105 2107 7105 2105 0522 2524 1117 0015 6412 0012 5015 2103 3011 
2117 6522 1101 0124 2123 0524 2124 6505 2505 2116 0123 6472 0012 4503 1055 6455 
1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 0015 6412 1412 0061 0060 4460 
2506 1117 2515 2101 1050 7457 0057 6451 1412 0061 0060 4461 2506 1117 2515 2101 
1050 0047 2515 1117 2124 0507 1107 0105 2101 7515 2122 4524 2532 2101 2111 7117 
2040 0524 2102 2514 1047 7454 0057 6451 1412 0061 0060 4462 2506 1117 2515 2101 
1050 0047 2101 7515 2525 2116 2040 3117 2040 7514 1101 0116 1075 3440 1454 0506 
1460 1056 0051 5015 1461 0060 2063 3011 2117 6522 1101 4124 2047 6040 2117 7101 
2040 0522 1124 0105 1050 4445 1040 0075 2047 3054 1465 1056 0051 5015 1461 0060 
2064 3011 2117 6522 1101 4124 2047 6040 2117 7101 2040 2524 1122 0115 2050 2531 
2501 1522 1451 6440 1040 6047 1106 7065 0061 6451 1412 0061 0060 4465 2506 1117 
2515 2101 1050 0047 2115 7117 2124 6110 2531 0040 2101 6531 2505 2116 1523 6440 
1040 6047 1106 7067 1062 7454 0051 5015 1461 0060 2066 3011 2117 6522 1101 4124 
1106 7070 0062 6451 1412 0061 0060 4467 2506 1117 2515 2101 1050 6057 1047 0040 
2040 2040 2101 2524 1040 0040 2511 2116 2105 2522 1123 0124 2440 0040 2122 1516 
1120 0114 2440 0040 2122 1516 1120 3514 0051 5015 1461 0060 2070 3011 2117 6522 
1101 4124 1047 0040 1040 0040 1040 0040 1040 0040 1040 0040 1040 0040 1040 0040 
1040 0040 2040 0520 2131 2515 1116 0124 2440 1040 2105 0515 2111 4516 1116 3507 
1054 4457 1415 0412 1460 4460 2011 7506 2122 0515 1124 7450 0051 5015 1461 0460 
2060 3011 2117 6522 1101 4124 1047 0040 2047 4454 2063 4454 1063 3454 1040 0040 
2047 3054 1470 1056 1054 0047 1040 0040 2047 3054 1470 1056 1054 0047 1040 0040 
2047 3054 1470 1056 0051 5015 1461 0460 2061 3011 2117 6522 1101 4124 1057 0047 
2514 1501 2524 0040 2101 6531 2505 2116 1040 0075 2047 3054 1466 1056 0051 5015 
1461 0460 2062 3011 2117 6522 1101 4124 2447 1440 2524 1101 2124 7111 2107 6440 
2517 2116 1110 4040 1115 4515 1075 3440 0051 5015 1461 0460 2063 3011 2117 6522 
1101 4124 2447 1440 2524 1101 2124 7111 2507 4440 2505 1101 2440 4450 1531 6451 
1040 4447 1415 0412 1460 2061 2011 7506 2122 0515 2124 4450 0064 6451 1412 0061 
0061 4465 2506 1117 2515 2101 1450 0506 1460 0056 0051 5015 1461 0460 2066 3011 
2117 6522 1101 4124 1057 3454 2040 7111 2524 1105 2505 2123 2040 0520 1111 0104 
2124 4510 2523 4440 2505 1101 1075 3440 1454 4106 1056 4462 1415 0412 1460 3461 
2011 7506 2122 0515 1124 7450 1054 0047 2524 2117 1101 0114 2511 2116 2105 2522 
1123 0124 2120 4501 1104 0075 2047 3054 1470 1056 0051 5015 1461 0460 2070 3011 
2117 6522 1101 4124 1057 3454 2514 1511 2124 7111 2107 2040 2105 4523 2122 2105 
1040 0077 1133 0131 1117 0122 1516 5135 1040 4447 1415 0412 1460 4461 2011 7506 
2122 0515 1524 0450 1101 4466 0015 6012 2503 0011 2101 2507 0040 6462 0012 5015 
2015 1412 2011 2507 2124 1040 2101 4523 2103 6440 2517 2122 2107 3501 2105 2040 
2101 0524 0072 5015 1103 6411 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 
1055 6455 1055 6455 0055 6455 0012 5015 2461 3411 2522 2111 1505 2050 1454 0061 
1060 4461 0015 4412 2127 4522 1124 4105 1464 0454 1460 1060 0051 5015 2011 2522 
1101 4104 1464 0454 1460 2461 2051 6501 2117 7125 0124 5015 2411 1127 2111 2524 
1050 6064 1461 0060 0063 6451 2412 1011 2105 2101 1050 6064 1461 0460 2465 1051 
2101 2524 0015 4412 2127 4522 1124 4105 1464 0454 1460 2060 0051 5015 2011 2522 
1101 4104 1464 0454 1460 2461 2051 2524 0122 6515 0012 5015 2015 1412 2011 0503 
2514 2503 2514 2101 2105 6440 2517 2116 2510 4514 2040 0520 2131 2515 2516 1524 
2015 1412 1011 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 
1055 6455 1055 6455 0015 6412 1412 0061 2411 1122 2101 2524 2075 0522 1124 7505 
1450 1061 1456 0452 1060 7060 0051 5015 2411 2124 2105 6522 2075 2524 1122 5115 
1061 7062 0015 4412 1504 0505 2475 4105 2120 0450 2114 3517 1050 7061 2453 1122 
2101 2524 2451 2052 2524 1105 0115 6451 2012 2011 1505 6462 1061 7456 1504 0505 
0015 4412 1504 1505 1075 7061 2055 2504 0062 5015 2011 2504 2064 0475 2515 2517 
1116 5124 2122 0522 0124 6505 2412 0011 2101 6531 2075 2050 1105 7464 1504 1505 
1051 7053 0060 6461 2412 3411 2522 2111 1505 2050 1454 0061 1060 4465 2520 4501 
0115 5015 0015 6412 0012 4503 2514 1511 2124 7111 1107 0123 2504 1505 2111 2522 
1504 7440 2015 1412 1011 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 
0055 5015 0015 4412 1501 6531 1047 0131 1040 0040 0040 6447 2012 0411 1116 3475 
1116 0040 1040 0040 0047 5015 0061 4461 2127 4522 1124 4105 1464 0454 1460 4061 
0051 5015 2011 2522 1101 4104 1464 0454 1460 4461 2051 7101 0123 5015 0061 4462 
1111 4106 2501 1516 2055 7101 1451 1461 1054 6061 0061 6463 1412 1461 2011 3111 
2050 7101 2123 0455 1531 0451 1461 0454 1465 0454 0061 5015 0061 4465 2127 4522 
1124 4105 1464 0454 1460 1061 0051 5015 2011 2522 1101 4104 1464 0454 1460 2061 
2051 7515 0015 4412 2127 4522 1124 4105 1464 0454 1460 1461 0051 5015 2011 2522 
1101 4104 1464 0454 1460 2061 2451 4511 0122 5015 2015 1412 2011 4514 1123 0124 
2110 0505 2104 7111 2107 7440 2116 6040 2111 2516 2120 4522 2116 2524 0122 5015 
1103 6411 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 
1055 6455 0055 6455 0012 5015 0062 4460 2127 4522 1124 4105 1464 0454 1460 0060 
0051 5015 2411 1127 2111 2524 1050 6064 1461 0060 0061 6451 2412 3411 2522 2111 
1505 2050 1454 0061 1060 4462 2101 7515 2525 2116 0015 4412 2127 4522 1124 4105 
1464 0454 1460 1460 2051 0522 0124 6505 2412 3411 2522 2111 1505 2050 1454 0061 
1060 4464 2524 1105 0115 5015 2411 1127 2111 2524 1050 6064 1461 0060 2465 0051 
2101 6531 0015 4412 2127 4522 1124 4105 1464 0454 1460 3460 0051 5015 2411 1127 
2111 2524 1050 6064 1461 0060 0070 6451 2012 1414 2011 0520 1107 0105 0063 5015 
0015 6412 0012 4503 2103 6517 2520 2125 1105 3040 2040 4514 1123 0124 2101 7515 
2122 4524 2532 2101 2111 7117 2040 0524 2102 2514 2015 1412 1011 6455 1055 6455 
1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 1055 6455 
1055 6455 0055 5015 1415 1412 2060 6411 2517 2116 1510 0475 0015 4412 2111 2524 
1522 6515 2524 1105 1515 0452 0062 6456 2412 1411 1524 0075 0056 5015 2411 2124 
1075 7060 0015 4412 2120 7122 2103 6120 2075 6501 2117 7125 0124 5015 0063 4461 
1111 4106 1115 6517 1061 4463 1063 6063 1063 6062 0063 6463 1412 1063 2011 7515 
0075 6461 2012 4411 1531 6522 2511 1131 0053 6461 2412 3411 2522 2111 1505 2050 
1454 0061 1061 4466 0123 6524 2412 3411 2522 2111 1505 2050 1454 0061 1060 4471 
0015 4412 1524 6524 1124 5524 0123 6524 2412 1411 1524 0075 0056 5015 2411 1127 
2111 2524 1050 6064 1461 0060 0071 6451 1412 1463 2011 3111 2050 7515 2116 4124 
2455 2111 2105 6522 1451 2063 1454 3063 1454 2063 1415 1412 2464 0011 2511 2116 
2475 1120 2516 0103 2514 1052 2101 2524 1457 0450 1060 7060 1452 1061 0056 6451 
2412 0011 2517 0075 2101 6531 2055 4520 1116 6524 1456 0460 0015 4412 2120 7122 
2103 6120 2475 1120 2516 0103 2514 0055 0117 5015 0063 4465 2127 4522 1124 4105 
1464 0454 1460 0061 2051 7515 2454 4511 2522 0054 2511 2116 2054 7520 2454 1120 
2516 0103 0114 5015 2411 2123 2475 2123 2053 4520 0116 6524 2012 6411 2117 6475 
1517 0453 0015 4412 2115 7117 1524 6510 2115 7117 1124 5510 0061 5015 2011 7507 
2040 7524 1440 0463 0015 6412 0012 5015 2103 1411 2517 0115 2125 2524 2040 0514 
1123 0124 2520 4501 2115 7105 0124 5015 1103 6411 1055 6455 1055 6455 1055 6455 
1055 6455 1055 6455 1055 6455 0055 5015 1415 1412 2466 0011 2511 2116 2475 1120 
2516 0103 2514 1052 2101 2524 1457 0450 1060 7060 1452 1061 0056 6451 2412 0011 
2517 0075 2122 1516 0120 6514 2412 0011 2122 1516 1520 6514 0060 6456 2412 2011 
1514 6520 1120 5517 2120 7111 0124 5015 2411 1127 2111 2524 1050 6064 1461 0460 
2060 6451 2117 4454 1131 6122 2120 7111 2524 0054 2517 0054 2122 1516 0120 6514 
2412 3411 2522 2111 1505 2050 1454 0061 1061 4461 2524 0114 0015 4412 1523 6524 
1123 5524 2120 7111 0124 5015 2411 1127 2111 2524 1050 6064 1461 0460 2466 1451 
0124 5015 2411 2124 2475 2124 2453 2123 0015 4412 2127 4522 1124 4105 1464 0454 
1460 3461 2451 2124 0015 4412 2127 4522 1124 4105 1464 0454 1460 0060 0051 5015 
2411 1127 2111 2524 1050 6064 1461 0060 0060 6451 2012 3411 2517 2040 1517 0440 
0015 6412 2012 2411 0116 6504 0012 6414 0232 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search