File KUWA2A.FT (FORTRAN source file)

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

6215 1612 4211 4611 4211 4611 6323 4705 5324 0305 4261 5215 6303 5611 6325 0727 
4262 6701 4212 6703 5212 0303 5240 0240 5240 0240 6713 1325 6323 0727 5310 0314 
6655 1640 6717 2322 6711 1305 5305 0316 6255 3240 6701 1714 6303 2710 6240 0704 
6324 7305 5240 0255 6306 4305 6314 7305 5304 0305 6323 4303 6325 6305 4305 6722 
4212 6703 5212 0240 5240 0240 5240 0240 6303 6717 6315 7317 6240 3311 6317 6722 
6254 4311 6301 1314 6654 1711 5324 6301 6711 2323 6302 4654 6323 2324 6654 1711 
5324 6305 6711 2323 6306 4654 6323 3724 6654 1711 5324 6314 6711 2323 4315 5215 
5240 0240 5240 0240 6240 1640 6317 6715 5317 0316 6314 7301 6306 4654 6301 3316 
5254 6311 5311 6262 6311 3332 6305 4654 6332 0706 5215 0212 5240 0240 5240 0240 
6240 4704 6315 7305 6323 7711 6316 4640 5650 0661 5654 2261 5270 6251 5311 4262 
5661 4264 6251 4654 5661 3250 5654 2261 5270 6251 5714 0650 5264 4671 5215 0212 
5240 0240 5240 0240 6240 0703 5314 0314 6322 0724 5320 4305 6261 4654 6323 6324 
5654 2261 6271 6254 4251 5215 6211 0714 5716 6706 5714 0650 5264 4671 4215 4612 
5304 0317 5262 0260 5713 6661 5661 0654 4264 6670 5612 0262 5611 1311 5650 0713 
5651 0275 5615 0612 5260 0240 5240 0240 6240 7706 6322 0715 5324 4240 5301 4662 
5215 0212 5240 0240 5240 0240 6640 5311 5706 6705 4260 5215 5240 0240 5240 0240 
6240 4640 6332 0706 4275 6660 5212 0240 5240 0240 5240 0240 6311 2727 5711 6703 
4261 5215 5303 0240 5240 0240 6640 1640 6717 2322 6711 1305 4305 6716 5612 0261 
5260 0240 5240 0240 5713 6660 5661 4264 5215 0212 5240 0240 5240 0240 6240 7704 
5640 0661 6260 5640 6263 6275 6301 3316 5654 2261 4270 5215 5240 0240 5240 0240 
6240 5640 5664 0675 5264 6670 5313 5663 6314 7301 4306 5215 5240 0240 5240 0240 
6240 2240 5717 0640 5262 0260 5713 6665 6261 5654 4260 5215 5240 0240 5240 0240 
6240 4640 5306 4240 5711 0650 5654 2713 6251 6255 5650 2313 5651 0651 5262 6260 
5661 0263 5654 1261 4260 5215 5661 0263 5240 0240 6240 2240 5717 0640 5265 0260 
5713 6666 5661 0654 4261 5215 5240 0240 5240 0240 6240 4640 6324 6705 5275 4311 
5313 6266 5313 4665 5215 0212 5240 0240 5240 0240 5240 4311 5313 6266 5313 4665 
5275 4311 5313 6266 5313 4660 5615 0612 5265 0260 5240 0240 5240 4311 5313 6266 
5313 4660 6675 2311 4305 6715 5212 0240 5240 0240 5240 0240 5713 6660 5313 6660 
4261 5215 5240 0240 5240 0240 6240 3640 6317 7724 5640 0661 4260 5215 5661 0262 
5240 0240 6240 1640 6717 2316 6711 2716 4305 5215 5303 0240 5240 0240 6640 1640 
5303 7310 5316 7322 6240 4716 6703 2310 6240 4705 6316 2707 6714 1705 4305 6716 
5212 0240 5240 0240 5240 0240 6707 2317 5717 1650 5260 6260 5661 0261 5654 0661 
5660 0654 5261 4660 6654 3711 6305 1711 5615 1612 5260 0260 5240 0240 6640 5311 
5706 6705 6311 3332 5705 0653 5215 0212 5240 0240 5240 0240 5640 1311 6650 5311 
5306 4705 5275 4314 5313 4664 5615 1612 5261 0260 5240 0240 6240 7706 6322 0715 
6324 4650 4263 6651 5612 0661 5260 0240 5240 0240 6303 7317 6324 7311 4325 6705 
5212 0303 5240 0240 5240 0240 6701 1725 6704 2722 5303 0313 6704 1305 6240 0706 
6314 1723 6310 7305 6240 1723 6310 7256 4322 5215 5240 0240 5240 0240 6240 3640 
6317 7724 5650 0263 5654 0262 5660 3254 5260 6260 5664 0262 6251 4654 6327 4705 
4303 5215 5263 0260 5240 0240 6240 2240 5717 1640 5264 0260 5713 6663 6261 5654 
4260 5215 5240 0240 5240 0240 6240 4640 5306 4240 5711 0650 5654 1713 5651 1651 
5265 6260 5663 0264 5654 2663 4260 5215 5663 0265 5240 0240 6240 3640 6317 7724 
5640 1650 5266 6260 5663 0267 5654 3663 5660 1654 5267 4660 6654 3711 6305 1711 
5615 1612 5266 0260 5240 0240 6640 1327 6311 2724 5640 0650 5654 3263 4261 6651 
5612 3263 5261 0240 5240 0240 6706 1317 6715 2301 5250 7657 6247 0706 6314 1723 
5310 0305 6323 4303 6325 6305 6305 7322 6325 6715 6305 7322 5240 3641 4257 6651 
5212 0240 5240 0240 5240 0240 6311 2727 5711 6703 4262 5215 5663 0267 5240 0240 
6640 3640 6722 2311 5305 4240 5661 1654 5261 4660 5711 0650 5654 1713 4251 5215 
5240 0240 5240 0240 6240 4640 5250 6261 5313 4663 4275 6660 5212 0240 5240 0240 
5240 0240 6311 3332 6301 4675 6332 0706 4253 6661 5612 2263 5260 0240 5240 0240 
6303 7317 6324 7311 4325 6705 6212 1611 6301 6314 6640 2327 6301 2720 5250 6261 
6655 1711 5324 6304 5661 1266 6270 4654 4251 5215 6611 3711 6305 1711 4275 6663 
4212 6703 4212 4703 4211 4611 6611 1611 6705 2311 5705 1240 6215 1612 4215 4612 
5304 0317 5666 0261 5640 0713 5275 6261 5661 4264 5615 3212 4261 4660 5711 0650 
5654 0713 5651 0275 4215 4612 6303 6301 6714 1240 6724 0301 5705 0650 6654 1711 
5324 6305 5661 1266 6270 4654 4251 5215 6211 7707 5324 0317 5661 0260 5615 3212 
4260 4660 5304 0317 5666 0264 5640 0713 5275 6261 4313 6660 5612 2266 6260 4611 
5250 6261 5313 4661 4275 6660 6212 1611 6301 6314 6640 2327 6301 2720 5250 6261 
6655 1711 5324 6305 5661 1266 6270 4654 4251 5215 6211 7704 5640 3262 6260 5640 
5661 0675 5654 2261 4270 5215 5662 0266 5211 4311 6261 5654 5661 6651 4260 5215 
6211 0703 5314 0314 6322 0724 5320 4305 6261 4654 6323 3324 5654 4270 6270 4654 
4261 6651 5212 0240 5240 0240 5240 0240 5304 0317 5267 0260 5713 6661 5661 0654 
4264 6670 5212 0240 5240 0240 5240 0240 5304 0317 5267 0260 5713 6662 5661 3254 
5615 3612 5260 0240 5240 0240 5240 4311 5313 6262 5313 4661 5675 0711 5650 1313 
5654 0713 4251 5215 5240 0240 5240 0240 6240 4640 6327 4705 5703 1275 5215 0212 
5240 0240 5240 0240 6240 7707 5324 0317 5661 0260 5615 1212 5260 0260 5240 0240 
6240 7704 5640 1662 6260 5640 5661 0675 5654 0313 5615 1212 5263 0260 5240 0240 
5240 4311 6261 5654 5661 6651 4260 5215 5240 0240 5240 0240 6240 2240 5717 1240 
5261 0260 5713 6661 5661 0654 4264 6670 5212 0240 5240 0240 5240 0240 5304 0317 
5662 0261 5640 1313 5275 6261 4266 5215 5662 0261 5240 0240 6240 4640 6261 5650 
6262 5654 5661 6651 6311 5650 6262 5654 4261 6651 5212 0240 5240 0240 5240 0240 
6303 6301 6714 3640 6724 0301 5705 0650 6654 1711 5324 6306 5670 4270 5654 0711 
4251 5215 6611 3711 6305 1711 4275 6664 6212 2211 5717 2240 5260 0260 5713 6661 
5661 0654 4264 6670 5612 0264 6260 4611 5250 6261 5313 4661 4275 6660 6212 1611 
6301 6314 6640 2322 6301 2720 5250 6261 6655 1711 5324 6307 5661 1266 6270 4654 
4251 5215 6211 7707 5324 0317 5661 0260 5615 2212 4262 4660 5304 0317 5664 0264 
5640 0713 5275 6261 5661 4264 4215 4612 5304 0317 5664 0264 5640 1313 5675 0261 
5654 0661 4215 4612 5311 4306 6311 5650 6262 5654 5261 4651 5640 2264 5660 2254 
5265 6260 5664 0264 5615 2212 4265 4660 6311 5650 6262 5654 5661 6651 5661 0260 
5615 2212 4264 4660 6303 7317 6324 7311 4325 6705 6212 1611 6301 6314 6640 2327 
6301 2720 5250 6261 6655 1711 5324 6307 5661 1266 6270 4654 4251 5215 5240 0240 
5240 0240 6240 4640 6301 3316 5675 0313 4253 6661 5212 0303 5240 0240 5240 0240 
6701 1725 6704 2722 5303 0313 6704 1305 6240 2706 6310 2714 6316 2704 6716 1640 
6703 2710 6305 2714 4322 5215 5240 0240 5240 0240 6240 4640 5306 4240 6311 3332 
5705 1251 5265 6260 5662 0265 5654 2262 4260 5215 5662 0264 6211 0703 5314 0314 
6322 0724 5320 4305 6261 4654 6323 6724 5654 3261 5262 6270 4311 6651 5212 0240 
5240 0240 5240 0240 6327 4722 5324 0305 5250 6261 5665 0265 4251 5215 5665 0265 
5240 0240 6240 3240 6317 6722 5301 0324 5250 7657 6247 2706 6310 2714 6316 2704 
6240 1723 6310 2725 6714 1305 5241 7647 4251 5215 5240 0240 5240 0240 6240 2240 
5717 2640 5266 0260 5713 6661 6261 4654 6332 2706 5215 0212 5240 0240 5240 0240 
6240 7704 5640 3265 6260 5640 6262 6275 6301 3316 5654 2261 4270 5215 5240 0240 
5240 0240 6240 4640 5306 4240 5711 0650 5654 1313 6251 4655 6262 4650 6332 2706 
5655 0713 5253 4661 5651 3265 5660 2654 5267 6260 5665 0266 5615 2612 5267 0260 
5240 0240 6640 1327 6311 2724 5640 0650 5654 0270 6251 4650 5650 1713 5654 1313 
6251 5654 5663 0675 5654 0661 4251 5215 5270 0260 5240 0240 6240 3240 6317 6722 
5301 0324 5650 1711 6654 4262 5654 0261 5301 4662 5615 2612 5266 0260 5240 0240 
6240 7703 6316 4724 6316 2725 5615 1212 4265 4660 6303 6301 6714 1240 6724 0301 
5705 0650 6254 4655 6323 3324 5654 4270 6270 4654 4261 6651 6212 2211 5717 4640 
6260 5640 5661 0675 5654 2261 4270 5215 6211 7704 5640 0271 5640 1313 5275 6261 
4266 5215 4271 4660 6311 5650 6262 5654 5661 6651 5311 4261 5313 6262 5313 4661 
4215 4612 6303 6301 6314 1640 6310 4701 5316 4240 6647 2713 5727 1301 5302 4647 
5215 0212 5240 0240 5240 0240 6240 7305 4304 5215 4215 6212 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 



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