File WAHLK.FT (FORTRAN source file)

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

6215 1612 5240 0240 5240 0240 6240 4705 6316 0707 5302 0305 6704 1305 6640 2713 
6722 3723 6301 6310 6301 3325 6314 3701 4305 6716 5212 0240 5240 0240 5240 0240 
6303 6717 6315 7317 6240 0713 6313 2702 6654 1713 6313 2702 6254 7716 6316 5714 
6254 0713 6325 3706 5215 0212 5240 0240 5240 0240 6240 4704 6315 7305 6323 7711 
6316 5640 6301 1313 5705 2650 6251 5654 6323 1313 5705 2650 5254 4670 6254 7716 
6316 5714 5650 2661 6251 5654 6301 3325 5707 1650 5654 2661 4251 5215 5240 0240 
5240 0240 6240 4640 6323 0720 5703 6705 5655 0262 4261 6666 5212 0240 5240 0240 
5240 0240 6322 0705 5304 4240 5661 2254 5260 4661 6311 7706 4322 6715 5612 0264 
5261 0240 5240 0240 6706 1317 6715 2301 5240 3650 6313 0714 6323 2723 6716 2323 
6325 2706 6272 0647 4262 6651 5212 0240 5240 0240 5240 0240 6322 0705 5304 4240 
5661 2254 5260 4662 6311 0710 4314 6702 5612 0264 5262 0240 5240 0240 6706 1317 
6715 2301 5240 3650 6310 6301 6302 0712 5710 5322 5240 0240 5240 3640 5301 4661 
5215 0212 5240 0240 5240 0240 6240 4706 6314 1305 4275 6660 5212 0323 5240 0240 
5240 0240 6324 2301 6240 4734 6310 6301 4302 5215 5323 0240 5240 0240 6240 0640 
5316 0304 5650 3667 4260 6660 5212 0323 5240 0240 5240 0240 5667 0261 4262 5215 
5323 0240 5240 0240 6640 2240 5301 0304 5650 0262 4260 5215 5323 0240 5240 0240 
6240 2240 5303 0301 6334 4706 6314 1305 6615 1612 5240 0240 5240 0240 6240 0724 
6704 6240 6311 7706 4322 6715 5212 0323 5240 0240 5240 0240 6304 0703 6240 3334 
6311 2714 4302 6643 5212 0303 5240 0240 5240 0240 6314 2717 6323 4303 5305 0316 
6704 1305 6640 1301 6302 4705 6324 3323 6305 2314 4305 6722 5212 0240 5240 0240 
5240 0240 5711 6732 4260 5215 5240 0240 5240 0240 6240 4640 5732 6661 4260 5215 
5240 0240 5240 0240 6240 2240 5717 0640 5640 0713 5275 6261 4265 5215 5240 0240 
5240 0240 6240 2240 5717 0640 5640 1313 5275 6261 4270 5215 5240 0240 5240 0240 
6240 5640 6301 1313 6305 5650 5661 6651 4260 5215 5261 0240 5240 0240 6240 5640 
6323 1313 6305 5650 6261 5654 5662 6651 4260 5215 5240 0240 5240 0240 6240 2240 
5717 1240 5640 0713 5275 6261 4263 5215 5240 0240 5240 0240 6240 2240 5717 1240 
5640 1313 5275 6261 4261 6665 5212 0240 5240 0240 5240 0240 6316 7317 5314 4313 
5313 4662 4275 6660 5212 0262 5240 0240 5240 0240 6713 2701 5306 4307 5313 6261 
5313 4662 4275 6660 5212 0240 5240 0240 5240 0240 6327 4722 5324 0305 5250 6261 
5664 0260 4251 5215 5664 0260 5240 0240 6240 3240 6317 6722 5301 0324 5250 3657 
6307 1305 5305 0316 6323 2711 6240 4704 6705 3640 6301 6310 6301 3325 6314 3701 
5305 0316 5301 0716 4247 6651 5212 0240 5240 0240 5240 0240 6327 4722 5324 0305 
5250 6261 5664 0261 4251 5215 5664 0261 5240 0240 6240 3240 6317 6722 5301 0324 
5250 3657 6701 1702 6717 2714 6724 5240 6325 1240 6305 2714 6307 7305 5304 0305 
6306 2701 6303 2710 5322 3641 4251 5215 5265 0240 5240 0240 6240 4640 6332 4675 
5732 0653 5615 0612 5260 0240 5240 0240 6240 2722 5301 0304 5250 6261 5667 0263 
6251 0713 6313 2702 6650 5311 4251 5215 5240 0240 5240 0240 6240 4640 5306 4240 
6313 5701 5302 4305 5311 4732 5255 4661 5265 6260 5261 6261 4265 5215 5261 0261 
5240 0240 6240 4640 6332 4675 5732 0655 5215 0212 5240 0240 5240 0240 6240 7707 
5324 0317 4261 6660 5612 0265 5240 0240 5240 0240 5711 6732 4260 5215 5240 0240 
5240 0240 6640 3640 6722 2311 5305 4240 5661 2254 5264 4660 5615 2212 5264 0260 
5240 0240 6240 7706 6322 0715 5324 4240 6657 1647 6725 1702 6724 2311 6325 2711 
6322 0702 5322 0305 6306 1701 6710 1307 6725 0320 5305 0716 4247 6651 5612 0266 
5240 0240 5240 0240 5711 0732 6675 5311 5661 0653 5215 0212 5240 0240 5240 0240 
6640 1327 6311 2724 5640 0650 5654 2664 6260 4651 4332 6661 5612 2664 5260 0240 
5240 0240 6706 1317 6715 2301 5240 7650 6247 0706 6303 3710 6722 0325 5720 5305 
5240 6247 5311 4661 5615 3612 5260 0240 5240 0240 6640 5311 6675 5311 4253 6661 
5612 0270 5240 0240 5240 0240 6322 0705 5304 4240 5661 3654 5263 4660 6313 5723 
5302 4305 5711 0732 6654 5311 4251 5215 5664 0266 5240 0240 6240 3240 6317 6722 
5301 0324 5650 1311 4251 5215 5240 0240 5240 0240 6240 4640 5306 4240 6313 5723 
5302 4305 5711 0732 6654 5311 5651 0655 5651 0261 5660 4254 5661 3654 4260 5215 
5270 0261 5240 0240 6240 4640 6332 4675 5732 0655 5215 0212 5240 0240 5240 0240 
6240 7707 5324 0317 4270 6660 5612 0261 5260 0240 5240 0240 6327 4722 5324 0305 
5250 6261 5664 0267 6651 1711 6320 1701 4305 6654 5612 3664 5260 0240 5240 0240 
6706 1317 6715 2301 5250 3657 6727 1301 6240 4704 5305 0323 6304 2711 6240 2714 
6724 2332 6305 3240 6301 4303 6707 2722 6320 2720 5277 6247 5301 4661 5615 0612 
5261 0260 5240 0240 6240 2722 5301 0304 5250 6261 5665 0267 6251 3311 6322 3701 
4305 5215 5240 0240 5240 0240 6240 4640 5306 4240 6711 1306 6301 2707 5655 3666 
5662 3251 5660 0654 5262 6260 4266 6660 5612 1261 5260 0240 5240 0240 6327 4722 
5324 0305 5250 6261 5667 0260 4251 5215 5667 0260 5240 0240 6240 3240 6317 6722 
5301 0324 5250 3657 6305 7311 6324 4705 6314 7325 6307 2240 5305 0322 6306 2701 
6303 2710 6322 4640 6316 0640 6325 3706 6301 2702 6316 2706 6314 2704 5322 3641 
4257 6651 5212 0240 5240 0240 5240 0240 5304 0317 5667 0262 6640 5311 5661 0675 
4254 6663 5212 0240 5240 0240 5240 0240 5711 6732 4260 5215 5240 0240 5240 0240 
6640 3640 6722 2311 5305 4240 5661 3654 5261 4660 5711 0732 5615 3612 5261 0260 
5240 0240 6240 7706 6322 0715 5324 4240 6257 4657 5261 7247 6640 2701 6306 0707 
6302 7305 6306 6305 5304 4647 5615 3612 5267 0260 5240 0240 6640 5311 6675 5311 
4253 6661 5612 3267 5260 0240 5240 0240 6322 0705 5304 4240 5661 3654 5263 4660 
6713 2701 5306 4307 5711 0732 6654 5311 4251 5215 5667 0263 5240 0240 6240 3240 
6317 6722 5301 0324 6250 3247 6301 4303 5272 0240 6247 4654 4262 6651 5212 0240 
5240 0240 5240 0240 5311 0306 6250 0713 6325 3706 6650 5311 6261 4654 5332 6651 
5661 3651 5262 6260 5667 0265 5654 3667 4260 5215 5667 0265 5240 0240 6240 4640 
6332 4675 5732 0655 5215 0212 5240 0240 5240 0240 6240 7707 5324 0317 5667 0266 
5615 3612 5262 0260 5240 0240 6240 7703 6316 4724 6316 2725 5215 0212 5240 0240 
5240 0240 6640 1327 6311 2724 5640 0650 5654 0665 6260 4651 6323 0720 5303 6305 
5615 2612 5261 0260 5240 0240 6240 7706 6322 0715 5324 4240 6657 3647 6711 3305 
6311 6305 6305 5640 6725 1722 6305 6640 6725 1705 6323 7305 6240 4715 6316 2704 
6323 2724 5316 0323 6302 6305 6705 2307 6240 2723 5711 7716 6247 0654 4261 6651 
5212 0240 5240 0240 5240 0240 6322 0705 5304 4240 5661 2254 5266 4660 6711 2713 
4322 6701 5212 0240 5240 0240 5240 0240 5711 6732 4260 5215 5240 0240 5240 0240 
6640 3640 6722 2311 5305 4240 5661 2654 5262 4660 5615 2612 5262 0260 5240 0240 
6240 7706 6322 0715 5324 4240 6657 3647 6305 1714 5310 0305 6306 2701 6303 2710 
6722 1640 6311 2316 6240 4716 6703 2310 6240 6301 6323 6240 5313 0323 6332 3725 
6305 0714 6323 2723 5316 3677 4251 5215 5662 2671 5240 0240 6240 4640 6332 4675 
5732 0653 5215 0212 5240 0240 5240 0240 6240 7707 5324 0317 5663 2660 5615 1612 
5260 0260 5240 0240 6640 5311 6675 5311 4255 6661 5612 0263 5265 0240 5240 0240 
6322 0705 5304 4240 5661 3654 5263 4660 6316 7317 5314 4313 5311 4732 5215 0212 
5240 0240 5240 0240 6240 3311 6240 7250 6317 6316 6313 4650 5332 6651 5661 1651 
5262 6260 5663 0260 5654 4662 4265 5215 5303 0240 5240 0240 6640 1640 6320 4705 
6303 2710 5322 0316 6704 1305 6640 2713 6722 3723 6301 6310 6301 3325 6314 3701 
4305 6716 5612 1263 5260 0240 5240 0240 6303 6301 6314 7640 6317 2720 5316 4240 
6647 2304 5301 3661 6254 4706 6314 1305 4251 5215 5240 0240 5240 0240 6240 2240 
5717 0640 5271 0265 5711 6732 5661 2654 5615 0612 5271 0265 5240 0240 6640 1327 
6311 2724 5640 2250 5654 3665 6260 5651 6301 1313 6305 4650 4332 6651 5212 0240 
5240 0240 5240 0240 5304 0317 5662 0260 6640 5311 5661 0675 4254 6665 5212 0240 
5240 0240 5240 0240 5304 0317 5662 0260 6640 5311 5275 6261 4270 5215 5662 0260 
5240 0240 6640 3640 6722 2311 5305 4240 5664 2654 5267 4660 6313 5723 5302 4305 
5711 0732 6654 5311 4251 5215 5240 0240 5240 0240 6240 2240 5717 1240 5261 0260 
5711 0732 5275 6261 4263 5215 5240 0240 5240 0240 6240 2240 5717 1240 5261 0260 
5711 6732 5661 0654 4265 5215 5662 0261 5240 0240 6640 3640 6722 2311 5305 4240 
5664 2654 5267 4660 6713 2701 5306 4307 5711 0732 6654 5311 4251 5215 5240 0240 
5240 0240 6240 2240 5717 1240 5262 0260 5711 6732 5661 0654 4265 5215 5662 0262 
5240 0240 6640 3640 6722 2311 5305 4240 5664 2654 5267 4660 6316 7317 5314 4313 
5311 4732 5215 0212 5240 0240 5240 0240 6640 1327 6311 2724 5640 2250 5654 3665 
6260 4651 6713 1325 4301 5215 5665 0267 5240 0240 6240 3240 6317 6722 5301 0324 
5650 1301 4251 5215 5240 0240 5240 0240 6240 1640 6301 6314 6240 1717 6714 1717 
4305 5215 5240 0240 5240 0240 6240 2640 4316 6704 4212 5215 0243 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 



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