File TYPEN.FT (FORTRAN source file)

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

6611 2723 6302 7722 6325 4724 5316 0305 6724 0331 6305 2316 6305 6313 6301 0722 
6324 7711 4316 5215 6211 7703 6315 7715 6316 7240 6705 1322 6254 2711 6722 1722 
6254 1714 6254 1703 6254 4704 6316 3254 4311 6716 6212 1611 6317 6715 5317 0316 
6323 6731 6254 2311 6254 7311 5325 6315 6722 2716 6715 1654 6314 7305 6307 1654 
6710 1654 6324 4722 4316 6707 6212 1611 6317 6715 5317 0316 6323 0724 5303 6313 
6702 2317 6324 6717 6254 7724 6320 5654 6711 2724 6315 5654 6332 4705 6707 1305 
6254 4716 6304 5705 6654 5316 6305 3711 4305 6722 6212 1611 6317 6715 5317 0316 
5711 0303 6254 1722 6660 1654 5303 6260 5320 6260 5311 6260 5324 6260 6707 2720 
6716 2313 4215 4612 6303 6717 6315 7317 6240 1711 6332 4705 6707 1305 6254 1722 
6332 4705 6707 1305 6654 5320 6305 3711 5305 6322 6311 2732 6311 2707 6722 2254 
6332 4705 6707 1305 6254 1723 6332 4705 6707 1305 4215 4612 6303 6717 6315 7317 
6240 1711 6324 1301 6254 1722 6324 1301 6254 1723 6324 1301 6254 1723 6732 0254 
6324 1301 6654 5320 6654 2311 5301 6302 5311 6332 6324 0724 6702 2254 4332 5215 
6211 7311 6324 3705 5305 0322 6320 7325 5313 6324 6707 2720 6716 2313 6654 0316 
6325 5716 6324 4654 6316 4713 6324 6725 6254 7311 5313 6311 6311 5716 5311 6260 
6311 5716 4311 6661 6212 4611 6316 2724 6707 1305 6240 2716 5322 6322 6711 1305 
5322 4323 5266 6261 5263 6251 5314 6303 4303 6703 6212 4611 6316 2724 6707 1305 
6640 4723 6315 4654 6304 4654 6316 6725 6254 6323 6305 3716 6254 4303 6654 2323 
6322 7311 5707 4250 4260 6651 6212 4611 6316 2724 6707 1305 6640 2323 6301 5703 
5650 0262 5260 6251 6702 2317 6324 6717 5650 0261 6651 2254 5317 4320 5261 4660 
6254 4713 6324 6725 5650 0262 5660 2254 4251 5215 6211 7311 6324 3705 5305 0322 
6316 2311 5305 4313 5661 0260 5254 4662 6654 5316 6305 3711 5305 6322 5711 0303 
6254 1722 6660 1654 5303 6260 5320 6260 5311 6260 4324 6660 6212 4611 6316 2724 
6707 1305 6240 1711 6332 4705 6707 1305 6254 1722 6332 4705 6707 1305 6654 5320 
6305 3711 5305 6322 6311 2732 6311 2707 6722 2254 6332 4705 6707 1305 6254 1723 
6332 4705 6707 1305 4215 4612 6711 2316 6305 2707 6322 4640 6303 0724 5702 1250 
5260 4660 6254 1723 6324 1301 5650 0262 5260 6251 6723 5303 5650 0265 6651 0254 
6324 1301 5650 0261 5260 6251 5320 4332 5265 4660 4215 4612 6711 2316 6305 2707 
6322 4640 6324 1301 5650 0261 5260 6251 5311 4332 5265 4660 6654 2324 5301 4302 
5664 0260 6651 2254 5732 2650 4260 6651 6612 1211 6305 6301 6240 7322 5325 6315 
6722 2303 5301 4302 5265 4660 4215 4612 6314 3717 6311 0703 6314 6240 6705 1305 
6254 2304 4254 6702 6212 4611 6316 4713 6260 5675 6332 4705 6707 1305 4255 6661 
6212 1611 6301 6314 6240 4705 6316 2713 6314 2714 5322 4316 5661 0654 4251 5215 
6211 0703 5314 0314 6305 7311 6313 6305 6714 1305 5716 1250 5254 4661 4215 4612 
6327 4710 5314 4305 6707 2720 6716 2313 6256 2716 5256 4660 4240 5215 5211 0240 
6707 2317 5317 4240 5661 0660 5654 0261 5662 0654 5260 6263 5661 2260 5654 0261 
5665 0654 5260 4666 6654 0307 6325 5716 4324 5215 5661 0660 6211 7703 6316 4724 
6316 2725 6211 2700 6305 7311 6324 0722 6707 1254 6705 2724 4322 6716 6212 3611 
6317 7724 5671 4671 5615 0612 4260 4662 6303 7317 6324 7311 4325 4705 6700 4724 
6320 0640 6314 3714 6305 2715 4311 6716 6212 4611 5306 4240 6323 6731 6656 0705 
5256 4661 6211 4700 6304 7305 4324 5215 5211 0240 6311 5716 6311 4675 6316 4713 
6324 6725 6250 2311 6705 2316 4251 5215 5211 0240 5311 0306 6250 7311 5313 7311 
5305 7321 5260 0251 6303 6301 6314 3240 6301 0724 5714 0650 5260 4664 4215 4612 
6240 4640 5306 4240 6713 2311 5325 4315 6311 5716 5711 1254 6251 7256 5705 1656 
6251 1640 6301 6314 6240 0706 6324 6301 5650 0261 4263 6651 5212 0211 6240 0703 
5314 0314 6305 7311 6313 6305 6714 1305 6316 5650 6711 2724 6315 4650 6316 4713 
5254 4663 5254 4665 6611 2300 4301 6725 5212 0211 6240 0703 5314 0314 6305 7311 
6313 6305 6714 1305 6316 5650 6711 2724 6315 4650 6316 4713 5254 4664 5254 4664 
6611 2300 6710 2305 4301 5215 5211 0240 6303 6301 6314 0640 6325 5723 6305 6314 
6305 7322 5250 4661 4215 4612 6240 1640 6301 6314 6240 2707 6724 4723 4315 5215 
5211 0240 6707 2317 5717 0640 4271 6671 6212 2611 6316 4704 4306 5215 6211 3311 
6640 1650 5331 0315 6656 0705 5656 3640 4262 4651 6300 2722 6703 1317 4304 5215 
5211 0240 6303 6301 6314 2640 6322 2723 6324 2732 5716 3250 5254 4661 4215 4612 
6240 1640 6301 6314 6240 4705 6316 2713 6314 2714 5322 4316 5665 0654 4251 5215 
5211 0240 6303 6301 6314 2640 6311 5716 6305 6314 6305 7322 5250 6260 4266 6651 
5212 0211 6240 0703 5314 0314 6707 2305 6323 6731 4215 4612 6240 3640 6317 7724 
5640 4661 4271 5215 6211 7305 6304 3311 4215 4612 5311 0306 6650 4723 6315 7256 
5705 2656 5262 0251 6303 6301 6314 3240 6301 0724 5714 3250 6251 0211 6311 6314 
6305 0707 6714 1640 6331 1315 5317 0314 6700 1301 6722 4701 6640 4305 4320 6656 
6212 1611 6301 6314 6640 1305 6723 2305 6332 7305 5250 6263 4261 6651 5612 0261 
6263 1611 6301 6314 6240 2706 5310 4314 5661 2660 4262 6651 5612 0261 6264 1611 
6301 6314 6240 0706 6324 6301 5650 0261 5265 4662 5615 0612 4260 4665 6303 7317 
6324 7311 4325 4705 5300 0240 6302 3705 5311 0316 5317 0306 6322 1705 6317 2322 
6215 1612 6240 1240 6705 1301 6702 3240 5317 0316 5240 0240 5240 0240 5240 4240 
5240 0326 5273 7240 5256 0256 6672 2240 4215 4612 6303 6301 6314 2640 6311 5716 
6305 6314 6305 7322 5250 6260 4266 4651 6300 2732 4324 6701 6212 4611 5306 4240 
6323 6731 6256 2716 5256 4661 6303 6301 6314 3240 6301 0724 5714 1250 6251 0211 
6311 2704 4316 6724 6612 3611 6310 6311 5305 4240 6323 6731 6240 2656 5321 0256 
4261 6651 5212 0211 6240 3311 6250 2304 6250 2311 6705 2316 6251 1651 6301 6314 
6240 0706 6324 6301 5650 0261 4261 6651 5212 0211 6240 4713 6324 6725 6650 5313 
6305 3711 5305 6322 5661 6651 6311 2704 4316 6724 5212 0211 6240 4713 6324 6725 
6650 5313 6305 3711 5305 6322 5662 6651 4264 5215 5211 0240 6303 6301 6314 2640 
6311 5716 6305 6314 6305 7322 6650 5313 6305 3711 5305 6322 4263 4651 6700 0305 
6323 6311 4317 6716 5212 0211 6240 0703 5314 0314 6301 3325 6301 2304 6711 1305 
5305 4316 5661 3254 4251 4611 6300 2732 4324 6701 5212 0211 6640 5313 6305 3711 
5705 6722 6313 2732 6311 2707 5722 0653 4215 4612 6240 4640 6306 5650 6332 4705 
6707 1305 6256 2707 5656 0262 5260 0251 6303 6301 6314 3240 6301 0724 5714 2650 
5262 4660 6211 5700 6715 4301 4215 4612 6240 1640 6301 6314 6240 2707 6724 4723 
4315 5215 5211 0240 5311 4306 6323 6731 6656 0705 5256 4667 6211 0211 5242 1254 
4215 4612 5240 0240 6240 0703 5314 0314 6707 2305 6323 6731 4215 4612 5240 0240 
6240 3311 6640 1650 5331 7315 5316 7305 5261 0251 6303 6301 6314 3240 6301 0724 
5714 1250 6251 0211 6311 2704 4316 6724 5212 0211 6240 6305 4323 6705 5212 0211 
5240 0240 5311 4306 6323 6731 6256 2716 5656 2262 6251 1640 6301 6314 6240 0706 
6324 6301 5250 4665 6211 0211 5242 1272 4215 4612 6240 2640 6316 4704 4306 5215 
6211 7305 6304 4327 6311 2714 4215 4612 6303 6301 6314 3640 6705 1724 4331 4715 
6211 3300 6725 1305 5640 5242 4242 5215 6211 0703 5314 0314 6705 1722 6705 5324 
5305 4316 5662 0654 6251 0211 6724 0331 6240 6301 6314 2707 6315 4705 4316 5215 
6211 7707 5324 0317 5661 4671 5615 0612 4260 4666 6303 7317 6324 7311 4325 4705 
6300 7305 6304 7640 6706 1240 6305 7703 4322 6704 5212 0303 6640 4724 6320 7305 
6240 2704 6722 2240 6305 6311 6702 1305 6305 1711 5310 0305 6305 7311 6324 0722 
6307 7305 4215 4612 6711 0275 6325 5716 5724 3250 4251 5215 5611 6712 6320 7325 
5313 4324 4265 6651 6212 5611 6675 2720 6716 2313 5250 4664 4215 4612 6303 6301 
6314 0640 6325 5723 6305 6314 6305 7322 5250 4666 4215 4612 6303 6301 6314 0640 
6325 0706 6304 4704 6305 2722 6316 4650 5254 4666 4215 4612 6303 6301 6314 0640 
6325 5723 6305 6314 6305 7322 5250 4665 4215 4612 6303 6301 6314 0640 6325 5723 
6305 6314 6305 7322 5250 4664 4215 4612 6327 4710 5314 0305 5650 7311 4260 6651 
5212 0211 6240 7311 5713 6711 6716 2720 6716 2313 5250 6311 4263 6651 5212 0211 
5640 6711 5711 0655 4215 4612 6240 5640 6711 2724 6315 4650 6316 4713 5254 4663 
4275 6712 5212 0211 6240 4713 6324 6725 6250 7311 5313 6311 5664 6651 4313 5215 
6211 7305 6304 4327 6311 2714 6215 1612 6640 2240 6705 2323 6640 2701 6306 1640 
6717 2316 6711 2716 6301 4724 4317 6716 6212 4611 5306 4240 6323 6731 6656 0705 
5656 1662 6251 0211 5242 1273 4215 4612 6240 1640 6301 6314 6240 2707 6724 4723 
4315 5215 5211 0240 6303 6301 6314 2640 6311 5716 6305 6314 6305 7322 5250 6265 
4261 6651 5212 0211 6240 7707 5324 0317 5661 4671 4215 4612 6305 2316 4311 6706 
6212 4611 5306 4240 6323 6731 6256 2716 5656 0266 6251 0211 6305 2316 4215 4612 
6240 1640 6301 6314 6240 2706 5310 4314 5261 4664 4215 4612 6240 1640 6301 6314 
6240 4705 6316 2713 6314 2714 5322 4316 5665 0654 4251 5215 5211 0240 6707 2317 
5717 0640 4271 6671 6212 2611 6316 4704 4306 5215 5303 0240 6705 1714 5305 1272 
6305 2316 6242 2673 6711 2316 6322 3701 4215 4612 6303 6301 6314 3640 6705 1724 
4331 6715 6212 1611 6301 6314 6240 4705 6316 2713 6314 2714 5322 4316 5660 2254 
6251 0211 6324 2710 4324 6701 6212 1611 6301 6314 6240 4705 6316 2713 6314 2714 
5322 4316 5324 6260 4265 4651 6300 0724 4325 5215 5611 6711 6320 7325 5313 4324 
4266 4651 6300 2732 4324 6701 6212 1611 6301 6314 6640 2701 6323 2713 6314 2714 
5322 4316 4266 6651 6212 4611 5306 4240 5324 4332 5324 4660 5253 5711 6262 3656 
5705 1256 5260 4660 6240 0703 5314 0314 6706 2301 5301 4314 5665 3262 6251 0211 
6324 0715 4330 5215 6611 5324 6305 3711 5705 6722 5324 4332 5324 4660 4215 4612 
5724 6660 5324 5660 4261 5215 6211 3311 6640 2250 6260 3656 5705 2656 5260 0251 
6303 6301 6314 3240 6301 0724 5714 2650 5262 4660 6211 5700 6332 0715 4330 5215 
6611 5324 5650 0324 6651 2275 6332 4705 6707 1305 5253 5711 4262 5215 6611 2324 
5301 4302 6324 2732 6311 2707 5722 6651 6266 0211 6322 1705 6317 2322 4215 4612 
6324 0724 6702 2250 6332 4705 6707 1305 5253 4661 4275 4711 6300 7301 6332 4301 
6314 2240 5305 0322 6313 6717 6320 7317 6705 2316 4305 6716 6612 2211 6332 4705 
6707 1305 6675 5324 6305 3711 5305 5722 4262 5215 6211 4327 6311 2714 6240 4650 
5276 4660 4215 4612 6640 2240 6324 1301 6650 5324 6305 3711 5305 4722 6675 2720 
6716 2313 5250 4663 4215 4612 6240 1640 6301 6314 6640 2701 6323 2713 6314 2714 
5322 4316 4263 4651 6700 0305 6323 6311 4317 6716 5212 0211 5640 6711 5711 0655 
4215 4612 6305 2316 6327 4710 4314 6705 5612 4661 6271 1611 6717 2316 6711 2716 
4305 5215 6211 7305 6304 4327 6311 2714 5615 4612 4271 4671 6303 7317 6324 7311 
4325 4705 6300 7305 6304 7640 6706 1240 6717 2325 6311 2716 6240 4705 6716 1324 
5301 0307 5311 0316 6321 2725 6314 2714 4215 4612 6713 2311 5325 4315 6311 5716 
5311 6260 5663 6651 6320 7325 5313 4324 4265 4651 6300 0724 4325 5215 6211 4713 
6324 6725 6250 7311 5713 0311 5254 4664 6675 2720 6716 2313 5250 4664 6611 2300 
6710 2305 4301 5215 6211 2722 6724 1325 4316 5215 6211 7305 4304 5215 0214 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 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