File P1TEST.FT (FORTRAN source file)

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

6703 0211 6301 1723 5301 0314 6655 1640 6640 3324 5640 0670 5640 1260 5640 3260 
4215 4612 6303 6717 6315 7317 6240 2716 5322 6322 6711 1305 5322 6323 5314 6303 
6311 1703 6254 4704 6316 3254 5311 6316 6311 4303 6254 6314 6254 4714 4316 6705 
6212 1611 6317 6715 5317 0316 6711 4723 6315 6254 5305 6316 6311 7727 5322 6304 
6311 7720 6711 2316 6254 2311 6254 0711 4314 5215 6211 7703 6315 7715 6316 7240 
6301 2715 6654 1311 6332 4705 6307 6254 6332 4705 6307 6654 5301 6330 5311 6314 
6711 2323 4301 6702 6212 1611 6317 6715 5317 0316 6715 4301 6305 6654 6311 2716 
6254 6713 5301 6330 6316 0715 6330 4654 5323 6330 6314 2714 5316 6307 6311 6323 
6305 3716 6654 1711 6715 4301 4215 4612 6304 6711 6705 1716 6311 7317 6240 4714 
5316 4305 5270 4660 6654 5314 6305 3711 5650 0262 5260 6251 6711 5322 6305 3711 
5650 0262 5260 6251 6316 6701 5705 1250 5260 6260 5261 4660 4215 4612 6304 6711 
6705 1716 6311 7317 6640 3711 6317 2322 5650 4662 5654 0261 6251 4654 6320 4717 
5316 4324 5262 6266 5262 6251 5311 4304 5261 4660 6254 2714 5716 1250 4271 6651 
6212 2211 6311 2715 6316 4723 5317 0316 6711 1305 5322 4323 5266 6261 5263 6251 
6711 2323 5301 4302 5666 0260 6251 4654 6332 4705 5714 2250 4260 6651 6212 4611 
6316 2724 6707 1305 5240 4321 5262 4660 6254 4704 5716 1250 6251 3254 5311 4316 
5264 6251 6311 5254 5254 6313 6303 7720 6723 0254 6720 1717 4215 4612 6314 3717 
6311 0703 6314 1240 4215 4612 6711 4723 4275 6660 6212 4611 6322 2732 5311 4307 
5661 6651 4255 6661 6212 6211 6332 4705 5707 0650 5251 6675 4261 5215 6211 0715 
5730 0275 4215 4612 6716 1305 5722 0275 4215 4612 6314 2714 5716 6707 4267 6662 
6212 4611 6323 0715 5730 3275 4260 6660 6212 6611 6301 2730 5675 4671 4215 4612 
6315 7311 5305 6675 4271 6671 6212 5611 6715 4301 4275 6664 6212 7211 6715 4301 
5675 0262 4264 6666 5212 0303 6240 4705 6316 2714 6323 7305 6240 2704 6722 1640 
6303 6310 6725 1705 6323 6305 6327 2717 6322 2724 4322 5215 6211 0711 5714 0675 
4260 5215 6211 0703 5314 0314 6711 0317 5305 4316 6647 4723 5323 3700 6654 3647 
6317 2322 6300 2300 5301 4647 4215 4612 5304 0317 6265 4640 5275 6261 4262 6671 
6612 1211 6305 2301 5250 6264 5266 4251 6311 7727 5322 4304 6311 5254 6251 5254 
5275 6261 5261 4660 5615 3212 6211 7706 6322 0715 5724 0650 5660 0701 4251 5215 
5303 0240 6314 2701 6316 2707 6240 2704 6722 1640 6303 6310 6725 1705 6323 6305 
6327 2717 6322 2724 6322 1240 6705 2323 6311 6715 4305 6716 6212 4611 6314 4675 
4301 6714 5612 2664 6211 3311 6650 3711 6317 2322 5250 6311 5311 4714 5653 0262 
5261 4666 5264 6267 5264 6266 4264 6667 5612 3264 6211 6311 6275 6311 4255 6661 
6212 3611 6317 7724 5640 2664 5615 2212 6267 6211 5305 4316 5711 6651 4311 6714 
4212 4665 6303 7317 6324 7311 4325 6705 6612 1211 6305 2301 5250 6264 5261 4661 
6650 0311 6317 7311 6324 4650 5254 4661 5654 6711 5661 1254 4266 6651 6612 1211 
6305 2301 5250 6264 5261 4661 6650 0311 6317 7311 6324 4650 5254 4662 5654 6711 
5661 1254 4266 6651 5612 0661 6211 7706 6322 0715 5724 1250 5666 1311 4251 5215 
6211 7704 5640 0262 5640 6711 5661 1654 4261 5215 6211 2722 5301 4304 5664 1254 
5261 4251 5311 4304 5312 6251 5712 0675 5654 0261 4251 5215 4262 4661 6706 1317 
6715 2301 5650 0261 5301 4661 4215 4612 6303 6301 6314 7240 6301 6315 4311 5215 
4262 4660 6303 7317 6324 7311 4325 6705 5612 0261 6211 2722 5301 4304 5661 0654 
5261 4660 5250 4321 5311 6251 5711 0675 5654 0262 4251 5215 5661 0261 6211 7706 
6322 0715 5324 3650 5252 6247 6262 0660 4261 6651 6212 1611 6720 1717 5240 0275 
4260 5215 6611 0320 5317 0323 5675 0240 4215 4612 5304 0317 5661 0661 5640 6711 
5661 1254 4215 4612 6240 2240 5311 4316 5711 6651 4260 5215 5661 0661 5211 0240 
6306 7311 5250 4711 4275 6660 6212 3211 5311 4316 5663 6651 4260 5215 6211 7704 
5640 1262 6262 4640 5275 6261 4262 6660 5212 0211 5240 4321 5711 6651 6321 4650 
5651 3257 4264 5215 5211 0240 6713 0675 5250 4711 4215 4612 6240 4640 5306 4240 
5713 0274 4251 5215 5211 0240 6640 0640 5250 4711 5275 4321 5311 5651 4266 6663 
5212 0211 5240 0240 6713 0675 5250 4711 4215 4612 6240 2640 6316 4704 4306 5215 
5211 0240 5311 0306 5250 7313 5305 7321 5263 4662 5240 4321 5711 6651 4260 4611 
6300 6302 6301 5716 5240 0275 5264 0260 6717 2303 5640 7275 6240 0242 4242 5215 
5211 0240 5311 0306 5250 7313 5305 7321 5265 4670 6640 0303 5317 0323 6275 4640 
6211 0211 5242 1272 5240 0240 5675 3640 6262 7640 4303 6724 5212 0211 6240 3311 
6240 5650 6656 0705 5656 3264 6651 0240 6720 1717 5240 0275 4311 4611 5300 7242 
5242 0240 5240 0275 5265 0266 6717 2303 5615 1212 4262 4662 6303 7317 6324 7311 
4325 6705 6212 4611 5306 4240 6303 7720 5723 2676 6240 7656 5322 0256 6320 7720 
5723 0676 5270 7240 5317 7322 6640 0303 5717 7323 6320 7720 4323 6651 5612 0661 
5265 0211 6640 1327 6311 2724 5250 6261 5263 4660 5615 1612 6260 3211 6317 6722 
5301 0324 6250 4647 6314 2714 6307 6301 6705 1640 6731 2316 5301 3730 4251 5215 
5211 0240 6707 2317 5717 0640 4260 5215 6211 7305 6304 3311 4215 4612 5311 0306 
6650 0303 5317 0323 6656 0705 5656 0240 4251 5215 5211 0240 6304 7311 5250 4661 
5240 0275 6647 1704 4247 5215 5211 0240 6304 7311 5250 4662 5240 0275 6247 0313 
4247 5215 6211 6305 4323 6705 5212 0211 5240 4321 6303 7720 5323 0251 5675 0240 
6211 0211 5247 3700 4215 4612 6240 4640 4275 6661 5212 0211 5640 6712 4261 5215 
5211 0240 6327 4710 5314 0305 5650 6311 6303 7720 4323 6651 5212 0211 5240 0240 
6304 7311 5250 4712 5640 6640 5240 4321 5311 5251 5266 0264 6653 0640 5250 5711 
4261 6651 5212 0211 5240 0240 6312 5275 4253 6661 5212 0211 5240 0240 6311 4675 
4253 6662 5212 0211 6240 7305 6304 4327 6311 2714 4215 4612 6305 2316 4311 6706 
6212 4611 5306 4240 6320 7720 6323 2656 5721 0256 4251 5215 5211 0240 6320 7720 
5723 6640 5640 0262 4215 4612 6240 3240 5311 4316 5264 0251 5275 3640 5320 3723 
4215 4612 6705 1714 4305 5215 5211 0240 6721 0250 6720 1717 5651 6640 4240 4660 
5211 1300 4300 6642 5212 0211 6240 4706 5716 2250 5651 6640 5240 4321 6320 7720 
5723 0653 5651 3252 5264 5640 5240 4321 6320 7720 5723 1253 4251 5215 6211 7305 
6304 3311 4215 4612 6311 1675 6720 1717 4253 6661 6212 5211 4275 6661 6612 3611 
6310 6311 5305 4240 5712 2274 6240 0656 5316 7304 5640 6311 6320 7720 4323 6651 
5212 0211 6240 4706 6316 5250 6651 0675 5250 4711 5652 2266 5240 0253 6321 4650 
5253 4661 4215 4612 6240 5240 5275 5712 4261 5215 5211 0240 6311 4675 4253 6662 
6212 2611 6716 3704 6310 6311 4305 5215 6611 1327 6311 2724 5250 6261 5263 4671 
4311 6654 5612 4663 6211 7706 6322 0715 5324 7650 6247 0720 6323 0703 5314 6640 
5240 0323 6240 1240 6305 3722 6716 2705 6323 0724 5304 0324 6640 3324 5670 0261 
5662 3260 5240 0240 5240 6247 5311 4660 4215 4612 6327 4722 5324 4305 5661 2254 
5260 4251 6304 7311 5250 4711 5654 6711 5661 1254 5251 4254 6306 7311 5250 4711 
5654 6711 5661 2254 6251 4654 4254 5215 4264 4660 6706 1317 6715 2301 6250 0662 
5262 3654 5272 6247 5663 1301 5254 7247 6247 0654 5662 0654 5260 6330 5311 4660 
4215 4612 6303 6301 6314 2240 6701 2724 4315 5215 6211 0703 5314 0314 6711 0317 
5305 4316 6304 7311 6254 4706 4316 6651 6212 1611 6301 6314 6240 7717 6320 7305 
6650 1647 6331 0323 5247 3654 6320 3323 6324 0300 5304 3701 4251 5215 6211 1714 
4275 6660 6212 6211 6311 2716 5650 0270 5251 6675 5662 0660 4266 5215 6211 1711 
5703 4275 4260 5215 6211 6314 5675 0270 4215 4612 6311 4303 5675 1255 5660 3261 
5615 0612 4262 4660 6711 1726 5731 6715 6711 4723 4315 5215 6611 1711 5730 0675 
4215 4612 6303 6301 6314 3640 6705 1724 4331 6715 6212 4611 6306 4650 6323 6731 
5255 4661 5661 1662 5654 1261 5662 0654 4262 6663 5612 1261 6662 3611 6722 2311 
5705 2250 5654 0662 6261 4651 6323 6731 4215 4612 6303 6301 6314 7240 6301 6315 
4311 5215 5661 1662 6211 3311 6650 1711 5730 1251 5261 6262 5662 0260 5654 0662 
4262 5215 5662 1261 6611 1327 6311 2724 5250 6264 5662 0661 6651 1711 4331 6715 
5612 0262 6260 1611 6717 2316 6711 2716 4305 5215 5662 0661 6211 7706 6322 0715 
6324 0650 4261 6651 6212 4611 6306 4650 6323 6731 5655 0662 5651 1261 5660 0654 
5263 6260 5661 0262 5615 0612 4263 4660 5311 4306 6711 1726 5331 6715 5266 4660 
5661 0262 5654 1661 5665 0654 4262 6660 5612 1661 6265 1611 6301 6314 6240 1717 
6714 1717 4305 5215 6211 3311 6240 7250 6705 1322 5251 0240 5661 0260 5660 0654 
5660 0260 5654 1261 4260 6660 5612 0261 4260 4660 6327 4722 5324 4305 5661 0654 
4251 5215 6261 3211 6317 6722 5301 4324 6247 4320 6301 2723 5240 0260 6317 7310 
6305 3240 6305 6310 5305 3722 4251 5215 6211 0703 5314 0314 6303 0710 5311 4316 
6247 4320 6301 2723 6661 3323 4247 6651 5612 1261 4260 4660 6303 6301 6314 1640 
6310 4701 5316 3650 6705 1322 6317 6722 5323 3726 4251 5215 6211 7305 4304 5215 
4214 0232 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 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 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