File EXPON.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 6701 0315 5314 0305 
6315 4701 6716 0240 6322 3717 6322 6701 6240 7706 6722 2240 6722 0311 5314 0305 
6705 0330 6317 2716 6316 4724 5301 0314 6323 7715 6317 4324 6311 3716 5240 0255 
6705 0330 4317 6716 4212 6703 5212 0303 5240 0240 5240 0240 6640 2720 6322 7720 
4323 6705 5212 0303 5240 0240 5240 0240 5240 0240 5640 0650 6651 1240 6305 2301 
6240 4324 6705 0240 6322 1317 6314 6705 6240 0720 6322 6701 6305 2724 6322 1640 
6301 2322 6240 7301 6304 0640 6240 4724 5315 0305 6723 1305 6711 1705 4254 5215 
5303 0240 5240 0240 5240 0240 5240 0240 5250 4662 6240 0703 5314 0314 6324 2710 
6640 2723 6302 7722 6325 4724 5316 0305 6705 1730 5315 0317 5324 0317 6323 7715 
6317 4324 6240 4324 6705 2240 6311 2715 6240 2723 6322 2711 4323 6654 5212 0303 
5240 0240 5240 0240 5240 0240 6240 7301 5304 4240 5263 0251 6320 4722 5316 0324 
6324 2710 6240 2722 6323 6325 4324 6656 4212 6703 5212 0303 5240 0240 5240 0240 
6240 2722 6715 1301 4313 6723 5212 0303 5240 0240 5240 0240 5240 0240 5240 0301 
6323 7715 6317 4324 6311 3716 6240 7703 6716 2323 6701 2316 6640 0323 6305 4703 
6306 2711 6304 4640 6716 2240 5310 0305 6320 7722 6302 2714 6715 0240 6301 0722 
6715 2305 4305 6722 5212 0303 5240 0240 5240 0240 5240 0240 6240 0703 5322 0304 
6715 1725 6324 1240 6305 3640 6322 0705 6724 1305 6240 4324 5301 0316 6732 1305 
6317 1240 5325 0324 6714 1705 6723 2240 6310 7301 6240 7317 6305 4640 6316 7640 
6322 2704 4322 5215 5303 0240 5240 0240 5240 0240 5240 0240 5324 0317 6717 2302 
6301 7311 6240 2722 6301 7723 6316 1301 5314 0305 6722 1705 6725 2314 4323 6656 
4212 6703 5212 0303 5240 0240 5240 0240 6640 2723 6302 7722 6325 4724 6716 1705 
6240 7301 6304 3240 6325 1716 6324 7711 6716 1640 6725 0302 6322 3717 6322 6701 
6723 1240 6705 2721 6311 2722 4304 5215 5303 0240 5240 0240 5240 0240 5240 0240 
6705 1730 4315 6717 4212 6703 5212 0303 5240 0240 5240 0240 6240 2715 6324 7710 
4304 5215 5303 0240 5240 0240 5240 0240 5240 0240 6322 3305 5305 0322 5324 0317 
5322 0256 5307 0256 6302 7722 5327 6316 6640 1647 6315 7717 6324 4710 5316 6307 
6240 7706 6322 1705 6701 2323 6311 3716 6240 7301 6704 0240 6322 2305 6711 2303 
6311 7317 6215 1612 5240 0240 5240 0240 5240 0240 6240 7640 6306 2240 6311 1723 
6722 2305 6705 2240 6311 2715 6240 2723 6322 2711 5323 6247 6640 1320 6705 2316 
6311 2703 6255 0710 5314 6314 5240 7316 5312 6256 5640 4661 5266 6263 6215 1612 
5240 0240 5240 0240 5240 0240 6640 0240 5320 0256 5661 0264 6240 7724 5640 2261 
4264 6656 4212 6703 5212 0303 5240 0240 5240 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 4256 5215 4303 5215 5303 0240 5240 0240 6324 2710 6240 7706 
6314 7714 6327 7311 6307 2240 6311 2715 6316 4723 5317 0316 6715 1725 6324 1240 
6305 3640 6322 0705 6724 1305 6240 4324 5301 0316 5317 0322 6705 2721 5301 0314 
5324 0317 6324 2710 6215 1612 5240 0240 6240 7240 6325 1315 5305 0322 5317 0306 
6704 2301 6701 0240 6317 7311 5324 0323 5311 0316 6301 3640 6311 2726 6716 2240 
6311 2715 6240 2723 6322 2711 5323 7256 6215 1612 5215 0212 5240 0240 5240 0240 
6240 2240 6311 2715 6316 4723 5317 0316 5730 0650 5660 0260 6651 1654 5650 0261 
5260 4660 6215 1612 6215 1612 5240 0240 5240 7240 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 4256 6656 4212 6703 5212 0240 5640 0640 6240 7706 6322 0715 
6324 0650 6264 0654 6262 4654 6264 3254 5665 0256 6254 3263 5261 7260 4260 6651 
5212 0240 5640 1240 6240 7706 6322 0715 5724 0650 5662 3306 5256 4660 5215 0212 
5240 0240 6263 3240 6317 6722 5301 4324 6263 4264 6661 1324 6311 6320 6305 2640 
6330 7720 6316 7305 6324 0711 6714 1640 6315 7717 6324 4710 5316 7307 5256 7256 
6256 0654 6264 0654 5262 7657 6262 4262 6640 2716 6315 2702 6322 7640 4306 6640 
5212 0240 5240 0240 6261 0704 5324 0301 6320 4717 6716 1724 5654 3311 5657 4661 
6710 1640 6315 7717 6324 4710 5316 0307 6303 7317 6323 0724 5316 6324 5306 7271 
5263 4657 5215 0212 5240 0240 6264 3240 6317 6722 5301 4324 6261 4263 6260 7703 
6305 3306 6311 4703 6705 2316 5723 4654 5730 0654 5310 6301 6661 4264 6254 4261 
5702 0654 5264 6330 6261 1710 4251 5215 5240 0240 5240 0265 6706 1317 6715 2301 
6250 4271 6660 1317 6311 4707 6316 6301 5654 0706 5671 2656 6254 3262 5261 7265 
4265 6651 5212 0240 5640 3240 6240 7706 6322 0715 5724 4250 6710 2660 6320 0704 
6324 2305 5654 1306 5660 2656 6254 3262 5261 7265 5265 4657 5215 0212 5240 0240 
6267 3240 6317 6722 5301 4324 5661 0310 5654 3662 5730 0654 6663 1710 6315 7717 
6324 2710 6304 2240 6301 0724 6657 4267 5654 0261 6310 7311 6720 2325 6240 0704 
5324 6301 6661 4262 5654 0261 6310 3250 6317 2722 6703 1701 4324 6651 5212 0240 
5240 0240 4261 6651 5212 0240 5640 4240 6240 7706 6322 0715 6324 3250 5261 7267 
5665 4254 6330 3254 5261 7265 4265 6651 4212 4703 6317 2720 5316 4240 6325 4716 
5724 2675 6254 2240 6305 4726 5703 6705 6247 2303 5322 6247 6240 1701 6703 1705 
5323 3675 6723 0705 5311 3716 4251 5215 6303 7611 6320 7305 6640 2650 6716 2311 
5275 6266 6240 2704 6326 1711 5305 3675 6714 2320 5247 0254 6301 1703 6705 1723 
6675 1647 6305 7721 5325 3724 4251 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 6215 1612 5240 0240 
6640 1240 6305 2301 6640 1320 6317 6302 5305 0315 6720 1301 6301 2715 6724 1305 
6240 0703 4322 6704 4212 6703 6212 6211 6317 4707 6303 6301 6240 7705 4306 5215 
6211 0703 5314 0314 6303 5710 6305 3317 6240 2650 5317 4706 5215 0212 5640 0261 
6660 1240 6305 2301 5640 2650 5254 4661 6640 1320 6654 1320 6261 7254 6330 0654 
6314 0654 5254 6302 4303 5215 6211 3311 6240 2650 5317 4706 6240 7707 5324 0317 
5671 4671 6215 1612 5240 0240 5240 0240 6640 0240 5322 7256 5256 7256 6656 1320 
6317 6302 5305 0315 6316 6725 6702 1305 6240 6650 5301 0331 5302 0305 6701 0314 
6310 6701 6305 4722 4303 6651 5212 0303 5240 0240 5240 0240 6640 1320 5261 7256 
5256 7256 6320 7722 6302 2714 6315 7240 6325 1315 5305 0322 6250 7703 6316 4724 
6316 2725 4304 6651 5212 0303 5240 0240 5240 0240 6640 4316 5256 7256 5256 7256 
6316 6725 6702 1305 6240 3317 6240 0704 5324 0301 6320 4717 6716 1724 6240 7311 
6240 4724 5315 0305 6723 1305 6711 1705 6215 1612 5240 0240 5240 0240 6240 0640 
5314 7256 5256 7256 6256 6723 6717 2317 6310 7311 6307 1640 6717 1716 6324 7301 
4324 5215 5303 0240 5240 0240 5240 0240 6301 1254 5254 7303 6256 1656 6317 3305 
6306 1711 6311 7305 5324 0323 5317 0306 6324 2710 6640 1320 6305 4704 6303 4724 
5317 0316 6705 2721 6301 4724 4317 6716 4212 6703 5212 0240 5240 0240 6640 1327 
6311 2724 5640 3250 5254 4663 6640 1320 6654 1320 6261 7254 6330 0654 4314 5215 
4303 5215 5303 0240 5240 0240 6320 4722 5316 0324 6317 4722 6307 7311 5301 0314 
6303 2717 6306 4706 6303 2711 6716 1724 6215 1612 5215 0212 5240 0240 6640 3640 
6722 2311 5305 4240 5666 2254 4251 5215 5240 0240 5240 0240 6327 4722 5324 0305 
5250 6266 5265 0251 6301 1254 4254 6703 4212 6703 5212 0303 5240 0240 6240 2722 
5301 0304 6324 6711 6705 1640 6305 4722 5305 0323 6704 2301 4301 5215 4303 5215 
5240 0240 5240 0240 6322 0705 5304 4240 5665 1254 5251 4240 6330 4650 6251 4654 
5275 6261 5316 4730 6215 1612 5215 0212 5240 0240 6240 1640 6301 6314 6640 4305 
6323 7715 6640 4250 6654 4316 6254 6301 5254 6301 6302 1654 5254 4723 6215 1612 
6215 1612 5240 0240 6640 0240 6322 7311 6724 2640 6320 0704 6324 2305 6240 7703 
6305 3306 6311 4703 6705 2316 4323 5215 4303 5215 5240 0240 5240 0240 6327 4722 
5324 0305 5250 6266 5266 0251 6301 1254 4254 6703 4212 6703 5212 0303 5240 0240 
6640 1320 6711 2316 6240 7311 6720 2325 6240 7301 6704 1640 6315 7717 6324 2710 
6304 2240 6301 0724 6215 1612 5215 0212 5240 0240 6640 3640 6722 2311 5305 4240 
5666 3654 4251 5215 5240 0240 5240 0240 5304 0317 5662 0260 5640 6711 6261 7254 
4330 5215 5640 1240 5260 0260 6327 4722 5324 0305 5250 6266 5270 0251 6330 4650 
6651 1654 5250 4711 5215 0212 5240 0240 6240 3640 6717 2240 5717 0640 4260 6660 
5612 4671 6671 1611 6724 0317 5215 0212 5240 0240 6240 2640 4316 6704 4212 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 



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