File GMMMA.FT (FORTRAN source file)

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

4303 5215 5303 0240 5240 0240 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 
5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 
5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 
5256 7256 6215 1612 6215 1612 5240 0240 5240 0240 6640 1640 6725 1302 6717 2325 
6311 2716 6240 6707 6315 0715 6215 1612 6215 1612 5240 0240 5240 0240 6640 0240 
6725 0322 6317 2723 6215 1612 5240 0240 5240 0240 5240 0240 6240 1640 6717 0315 
6325 2724 6723 2240 5310 0305 6307 6701 5315 0301 6306 7325 6303 4724 5317 0316 
6706 1317 5240 0301 6707 3311 5305 0316 6301 3722 6325 2715 4316 6724 4212 6703 
5212 0303 5240 0240 5240 0240 6640 1725 6301 2707 6215 1612 5240 0240 5240 0240 
5240 0240 6240 1640 6301 6314 6240 6707 6315 0715 6650 4330 6654 4307 6254 2711 
4322 6651 4212 6703 5212 0303 5240 0240 5240 0240 6240 2704 6723 1303 6711 2320 
6311 7317 6240 3317 6240 0720 6322 6701 6305 2724 4322 6723 5212 0303 5240 0240 
5240 0240 5240 0240 6640 4330 6640 2255 5310 0305 6301 3722 6325 2715 5316 0324 
6706 1317 6240 4324 6305 3640 6301 6715 6301 3240 6325 1716 6324 7711 4316 5215 
5303 0240 5240 0240 5240 0240 5240 0240 5307 0330 6255 4324 6705 1240 6705 2723 
6314 0724 5316 0324 6307 6701 5315 0301 6306 7325 6303 4724 5317 0316 6326 6301 
4325 6705 5212 0303 5240 0240 5240 0240 5240 0240 6240 2711 6722 1255 6705 2723 
6314 0724 5316 0324 6705 1322 5317 0322 6303 2317 6705 3640 6710 1305 4305 5215 
5303 0240 5240 0240 5240 0240 5240 0240 5240 0240 6240 2711 5722 0275 6240 7240 
6317 2640 6322 7722 4322 5215 5303 0240 5240 0240 5240 0240 5240 0240 5240 0240 
6240 2711 5722 0675 6640 4240 6330 4640 6723 3640 6311 4324 5311 0316 5656 0260 
5660 0260 6261 7640 6306 1240 6305 7311 6307 0640 6240 2716 6707 2301 6311 2726 
6240 7311 6324 3705 4305 6722 5212 0303 5240 0240 5240 0240 5240 0240 5240 0240 
6240 4640 5705 6722 5262 0240 5330 0330 5307 0324 5265 6267 6640 3317 6305 3322 
6714 3717 6254 3640 6730 1640 5305 0324 5324 0317 5661 0256 5705 2667 6215 1612 
6215 1612 5240 0240 5240 0240 6640 1240 6305 0715 6722 1713 6215 1612 5240 0240 
5240 0240 5240 0240 6240 7240 6317 2716 6215 1612 6215 1612 5240 0240 5240 0240 
6640 1640 6725 1302 6717 2325 6311 2716 6323 0640 5316 0304 6306 7325 6303 4724 
5317 0316 6323 1325 6320 7722 6307 0722 5315 0323 6722 0705 6725 1311 4305 6704 
5212 0303 5240 0240 5240 0240 5240 0240 6240 7716 4316 6705 4212 6703 5212 0303 
5240 0240 5240 0240 6240 2715 6324 7710 4304 5215 5303 0240 5240 0240 5240 0240 
5240 0240 6324 2710 6240 2722 6703 1325 6323 7711 6716 1240 6305 0714 6324 7711 
6316 0640 5316 0304 6320 6317 6331 7716 6315 0711 6314 0640 6720 1320 6317 4730 
6715 2301 6311 7317 6215 1612 5240 0240 5240 0240 5240 0240 6240 1240 6331 1640 
6256 0710 6323 4724 6716 1707 6654 1312 5256 0254 6647 0301 6320 7722 6330 6711 
6301 4724 6717 1716 6240 7706 6322 2240 6311 4707 6324 6301 6240 7703 6715 2720 
6724 1305 5323 6247 6215 1612 5240 0240 5240 0240 5240 0240 6640 0240 6322 7311 
6703 2305 5317 0316 6325 4716 6726 1305 6723 2311 6731 0240 6722 1705 5323 0254 
5661 2671 4265 5215 4303 5215 5303 0240 5240 0240 5256 7256 5256 7256 5256 7256 
5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 
5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 5256 7256 
5256 7256 5256 7256 5256 7256 6215 1612 5215 0212 5240 0240 6640 1640 6725 1302 
6717 2325 6311 2716 6240 6707 6315 0715 6650 4330 6654 4307 6254 2711 4322 6651 
5212 0240 5240 0240 6240 3311 6650 4330 5655 3665 5656 3251 5254 6266 4264 5215 
5240 0240 5240 0264 6711 1305 4275 6662 5212 0240 5240 0240 6640 4307 5275 7261 
5667 1705 5270 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 4260 5215 
5240 0240 5240 0240 6722 2305 6325 7322 5215 0212 5240 0240 6666 4240 6675 4330 
5215 0212 5240 0240 6240 2640 5722 6722 5661 0256 5705 3255 5215 0212 5240 0240 
6240 4640 5705 6722 4260 5215 5240 0240 5240 0240 5707 6730 5661 0256 5215 0212 
5240 0240 6240 4640 6706 4250 5255 7262 5660 2651 5660 2654 5660 0654 4265 5215 
5240 0240 5261 0260 5311 4306 5730 1255 5256 4660 5661 0261 5654 0661 5660 0654 
4265 5215 5240 0240 5261 0265 6730 4275 5255 7261 4260 5215 5240 0240 5240 0240 
5707 6730 5307 5330 4330 5215 5240 0240 5240 0240 5307 0317 5324 0317 4261 6660 
5212 0240 5640 0265 6240 3311 5250 6730 5661 0256 5651 0266 5654 1261 5660 0654 
4261 6660 4212 6703 5212 0303 5240 0240 5240 0240 6240 2723 6305 4640 6706 4240 
6640 1711 6240 2716 5301 0322 6316 3705 6301 4724 5326 0305 6711 2316 6305 2707 
6322 7640 6722 5240 6305 7722 6215 1612 5215 0212 5640 3240 6260 4640 6706 4250 
6655 1305 5722 3251 5662 3254 5662 4254 4260 5215 5240 0240 5266 0262 6331 3275 
6314 0717 6324 4650 5316 4324 5330 4651 4255 6730 5212 0240 5240 0240 6240 3311 
6250 1301 6723 4650 6251 2655 5322 4722 5661 0263 5654 1661 5660 3254 4264 5215 
5240 0240 5266 0264 5311 4306 5661 0256 5255 6731 6705 1322 5651 1661 5660 0654 
5263 6260 4267 6660 4212 6703 5212 0303 5240 0240 5240 0240 5240 0330 6716 2317 
6240 2716 5301 0322 6301 7240 6305 0707 6724 3311 6305 4640 6316 2724 6707 1305 
6640 1317 6240 2732 4322 6717 4212 6703 5212 0240 5640 0267 6240 3311 5250 6730 
5661 0256 5651 0270 5654 0270 5654 0661 4260 5215 5240 0240 5270 0260 5707 6730 
5307 7730 4330 5215 5240 0240 5240 0240 6730 4275 5253 7261 4260 5215 5240 0240 
5240 0240 5307 0317 5324 0317 4267 6660 5212 0240 5661 0261 5640 6731 5730 0655 
4256 6660 5212 0240 5240 0240 6640 4707 5275 7261 6660 4653 5252 6650 5660 2656 
5667 0667 5660 3661 5253 5331 5650 0253 5656 4271 5665 2670 5264 5660 5331 4252 
5255 7260 5670 3267 5664 0662 6670 4653 5252 5650 5660 4256 5663 4262 5662 1261 
4253 5215 5240 0240 5640 0640 5331 4252 5255 7260 5665 4266 5664 1267 6671 4653 
5252 5650 5660 1256 5665 4264 5662 2660 5253 5331 5650 0255 5656 2660 5661 4664 
5671 0263 5251 4651 5251 4651 4251 5215 5240 0240 5240 0240 5707 6730 5307 5330 
4307 6731 5212 0240 5661 0262 6240 2722 6724 1325 4316 5215 5640 0640 5263 0260 
6711 1305 4275 6661 5212 0240 5240 0240 6240 2722 6724 1325 4316 5215 5240 0240 
5240 0240 6305 2316 4615 5212 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 
4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 
4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 4200 0200 



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