File DTLEP.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 6725 1302 6717 2325 
6311 2716 6640 2304 6714 0305 6215 1612 6215 1612 5240 0240 5240 0240 6640 0240 
6725 0322 6317 2723 6215 1612 5240 0240 5240 0240 5240 0240 6240 0640 6240 2723 
6322 2711 6323 2640 6330 0720 6316 4723 5317 0316 5311 0316 6314 3705 6305 2316 
5322 0305 6320 6317 6331 7716 6315 0711 5314 0323 6727 2311 6310 4640 6316 2704 
6320 7305 6304 7305 4324 5215 5303 0240 5240 0240 5240 0240 5240 0240 6726 1301 
6311 1301 5314 0305 6330 4640 6723 2240 6322 7301 6323 7706 6322 2715 6704 2240 
6317 0640 6240 7720 6314 7331 6317 4715 5301 0314 6727 2311 6310 4640 6316 2704 
6320 7305 6304 7305 4324 5215 5303 0240 5240 0240 5240 0240 5240 0240 6726 1301 
6311 1301 5314 0305 5332 0254 6327 2710 5322 0305 6330 0675 5252 5732 4302 5215 
4303 5215 5303 0240 5240 0240 5240 0240 6325 0723 4307 6705 5212 0303 5240 0240 
5240 0240 5240 0240 6240 0703 5314 0314 6304 6324 5305 4320 6301 1254 6254 7720 
6314 7254 5254 6303 6727 1317 4313 6651 4212 6703 5212 0303 5240 0240 5240 0240 
6240 2704 6723 1303 6711 2320 6311 7317 6240 3317 6240 0720 6322 6701 6305 2724 
4322 6723 5212 0303 5240 0240 5240 0240 5240 0240 5240 0301 5240 0240 5240 0255 
6306 1701 6724 1317 6240 3317 6240 4714 6316 0705 6722 2240 6305 6722 6240 7311 
6240 4707 6326 7305 6240 4714 6316 0705 6722 2240 6322 7301 6323 7706 6322 0715 
6324 7711 4316 5215 5303 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
6240 2240 6317 1325 5314 0305 6320 2722 6703 1711 6311 7317 6240 0726 6322 0711 
6302 2714 6215 1612 5240 0240 5240 0240 5240 0240 6240 1240 5240 0240 5240 6640 
6240 7703 6716 2323 6701 2316 6240 2724 5322 0315 5311 0316 6707 3311 5305 0316 
6314 7311 6705 1301 6640 1324 6701 1716 6706 1317 6715 2301 6311 7317 6215 1612 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 6240 7704 6325 6302 
6705 0240 6322 1705 6311 4723 5317 0316 6726 1301 6311 1301 4314 6705 5212 0303 
5240 0240 5240 0240 5240 0240 6240 7720 5314 0240 5240 0255 6303 2717 6306 4706 
6303 2711 5316 0324 6326 1705 6724 1317 6240 3317 6240 7720 6314 7331 6317 4715 
5301 0314 6250 2722 6323 6325 6324 7301 6724 3240 6701 2714 4305 6651 5212 0303 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 6303 2717 6306 4706 
6303 2711 6716 1724 6640 1301 6305 7640 6322 2704 6322 2305 6640 1306 5317 0315 
6714 3717 6240 7724 6240 4710 4307 6710 5212 0303 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 6704 2717 6302 2714 6640 1320 6305 4703 6323 7711 
6716 3240 6705 2303 4317 6722 5212 0303 5240 0240 5240 0240 5240 0240 5240 0316 
5240 0240 5240 0255 6304 6711 6705 1716 6311 7317 6240 3317 6240 7703 6305 3306 
6311 4703 6705 2316 6240 2726 6303 7724 5322 0323 6320 6317 6240 7301 6304 1640 
6215 1612 5240 0240 5240 0240 5240 0240 6240 1640 5240 0240 5240 6640 6240 4707 
6326 7305 6240 7703 6305 3306 6311 4703 6705 2316 6240 2726 6303 7724 6322 7640 
6306 2640 6330 0720 6316 4723 4317 6716 5212 0303 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 6303 2717 6306 4706 6303 2711 6716 1724 6640 1301 
6305 7640 6322 2704 6322 2305 6640 1306 5317 0315 6714 3717 6240 7724 6240 4710 
4307 6710 5212 0303 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
6320 6317 6240 7301 6304 1640 6240 0715 6331 1240 6305 4640 6304 7305 6324 1711 
6301 6314 6331 6240 6317 0703 6324 2305 6215 1612 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 6240 7704 6325 6302 6705 0240 6322 1705 6311 4723 
5317 0316 6326 1705 6724 1317 6215 1612 5240 0240 5240 0240 5240 0240 6640 3640 
6317 5722 5240 6640 6240 7727 6322 4713 5316 0307 6323 7724 6322 3701 6305 7640 
6306 2240 6311 2715 6316 4723 5317 0316 6262 7252 6215 1612 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 6240 7704 6325 6302 6705 0240 6322 1705 
6311 4723 5317 0316 6701 1322 4301 6731 4212 6703 5212 0303 5240 0240 5240 0240 
6240 2722 6715 1301 4313 6723 5212 0303 5240 0240 5240 0240 5240 0240 6240 7703 
6305 3306 6311 4703 6705 2316 6240 2726 6303 7724 6322 1640 6240 2722 6315 4701 
5316 0323 6325 1716 6310 7301 6307 2305 6240 3311 6240 7716 6324 1640 6317 7311 
6303 2311 6311 3716 6215 1612 5240 0240 5240 0240 5240 0240 6640 3640 6311 4324 
6240 7703 6305 3306 6311 4703 6705 2316 6240 2726 6303 7724 6722 0240 5317 7314 
6215 1612 5240 0240 5240 0240 5240 0240 6240 7640 6720 1305 6301 4724 5317 0316 
5311 0323 6702 0331 6701 1723 5305 0304 5311 0316 6703 1701 6305 7240 6240 2714 
5323 0323 6324 0710 5716 0640 4256 5215 5303 0240 5240 0240 5240 0240 5240 0240 
6324 2710 6240 4714 6316 0705 6722 2240 6322 7301 6323 7706 6322 0715 6324 7711 
6716 4240 5275 5301 6332 1253 6640 1317 5640 6732 5250 7661 5301 4251 6330 1255 
6651 2240 6322 7301 6323 7706 6722 1715 6215 1612 5240 0240 5240 0240 5240 0240 
6640 2240 5310 0305 6322 7301 5307 0305 5650 0655 5654 0653 6251 4640 6716 4240 
6240 7724 6240 4324 6705 1240 6301 3716 5305 4240 5332 6314 5332 4722 6240 7311 
5240 6332 6240 4327 6305 2722 6215 1612 5240 0240 5240 0240 5240 0240 6640 5240 
5314 6675 5250 5661 5302 7651 6301 0640 5316 0304 5732 6722 5250 6661 5302 7651 
4301 6656 5212 0303 5240 0240 5240 0240 5240 0240 6240 7706 6322 3640 6311 2726 
6716 5240 5314 0254 5332 0322 5327 0305 6710 3301 6305 0640 5275 7662 6650 1332 
6255 6332 6251 0640 5316 0304 5302 6675 6650 1332 6253 6332 5251 4257 5332 6722 
5332 4714 6215 1612 6215 1612 5240 0240 5240 0240 6640 1640 6725 1302 6717 2325 
6311 2716 6323 0640 5316 0304 6306 7325 6303 4724 5317 0316 6323 1325 6320 7722 
6307 0722 5315 0323 6722 0705 6725 1311 4305 6704 5212 0303 5240 0240 5240 0240 
5240 0240 6240 7716 4316 6705 4212 6703 5212 0303 5240 0240 5240 0240 6240 2715 
6324 7710 4304 5215 5303 0240 5240 0240 5240 0240 5240 0240 6324 2710 6640 1324 
6701 1716 6706 1317 6715 2301 6311 7317 6640 1711 6240 0702 6323 2305 6240 7317 
6240 4324 6705 1240 6705 2703 6322 2722 6316 2703 6640 0705 6725 2301 6311 7317 
6215 1612 5240 0240 5240 0240 5240 0240 6240 3240 5317 0322 6314 3705 6305 2316 
5322 0305 6320 6317 6331 7716 6315 0711 5314 0323 6320 7250 5254 4730 6215 1612 
5240 0240 5240 0240 5240 0240 6640 0240 5250 5716 6661 4254 5651 1275 5252 5330 
6320 7250 5254 4730 5255 4320 5716 0655 5254 4730 6655 4250 5252 4320 6716 4254 
6651 0255 5250 6716 6661 4254 5251 7651 5250 5716 5261 6251 6215 1612 5240 0240 
5240 0240 5240 0240 6640 3640 6710 1305 6705 2240 5310 0305 6706 1311 5323 0324 
6724 1305 6315 4640 6316 1240 6322 1701 6713 2305 6323 4640 6723 2240 5310 0305 
6311 2316 5305 6330 6215 1612 5240 0240 5240 0240 5240 0240 6640 2240 5310 0305 
6323 1705 6317 2316 6640 1711 6240 4324 6305 0640 6722 2707 6315 7305 4324 6656 
5212 0303 5240 0240 5240 0240 5240 0240 6640 2323 6701 2322 6311 3716 6240 0726 
6314 2725 6323 0640 5322 0305 5720 0250 5254 4730 5275 6261 5240 4320 6661 4254 
6651 4275 4256 5215 5303 0240 5240 0240 5240 0240 5240 0240 6324 2710 6640 1324 
6701 1716 6706 1317 6715 2301 6311 7317 6640 1711 6240 6711 6320 4714 6703 2311 
5314 0331 6304 3305 6311 2716 6304 1240 6331 6640 6305 7301 6323 7640 4306 5215 
5303 0240 5240 0240 5240 0240 5240 0240 6330 0675 5252 5732 6702 2240 6317 2707 
6324 2710 6722 3640 6311 4324 6215 1612 5240 0240 5240 0240 5240 0240 6640 1640 
5325 4315 6320 6317 5250 4711 5252 5332 6252 4650 5255 4661 6654 1640 6325 6715 
5305 0304 6317 2726 6322 4640 6640 1306 5317 0315 6661 2240 6317 7240 4251 5215 
5303 0240 5240 0240 5240 0240 5240 0240 6675 2723 6315 1650 5250 4711 5252 4320 
5711 0655 5254 4730 6654 1640 6325 6715 5305 0304 6317 2726 6322 4640 6640 1306 
5317 0315 6661 2240 6317 7240 4251 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 5240 0240 
5240 0240 6323 1325 6722 2717 6324 7311 6305 2240 6324 2714 6320 0650 5254 6302 
6320 6317 5254 6316 6703 3654 6317 5722 4251 5215 4303 5215 5240 0240 5240 0240 
6304 6711 6705 1716 6311 7317 6240 7720 5714 0650 6251 1654 5250 4661 6254 7727 
5322 4313 4261 6651 5212 0240 5240 0240 6240 7704 6325 6302 6705 0240 6322 1705 
6311 4723 5317 0316 6301 1254 6254 7720 6314 1654 6254 7727 5322 6313 6710 0254 
5254 6321 5321 6261 4306 6711 4212 6703 5212 0303 5240 0240 5240 0240 6240 2724 
5323 0324 5317 0306 6304 6711 6705 1716 6311 7317 5215 0212 5240 0240 6240 4640 
6306 7250 5255 4661 5662 0654 4254 6663 4212 6703 5212 0303 5240 0240 5240 0240 
6240 4704 6315 7305 6323 7711 6316 6240 6705 1723 6240 4324 5301 0316 4262 5215 
5240 0240 5240 0261 6320 6317 5250 4661 5275 4303 4261 6651 5212 0240 5640 1240 
6240 2722 6724 1325 4316 5215 4303 5215 5240 0240 5240 0263 6320 6317 5250 4661 
5275 4303 5261 5651 6302 1652 5250 4662 5215 0212 5240 0240 6640 0240 5317 4314 
5662 6651 6301 1652 5250 4662 5215 0212 5240 0240 6240 4640 6306 7250 5255 4662 
5662 1254 4254 6664 4212 6703 5212 0303 5240 0240 5240 0240 6240 7311 6311 4724 
6301 4714 6732 2301 6311 7317 5215 0212 5240 0240 6664 3640 6317 5722 5250 4661 
5275 7261 4304 6660 5212 0240 5240 0240 6240 7727 5322 4313 5662 6651 4302 5215 
5240 0240 5240 0240 6727 1317 5713 1650 5651 0275 5656 0304 5215 0212 5240 0240 
6640 3640 6317 5722 5250 4664 4275 6701 5212 0240 5240 0240 6240 4706 5275 7261 
4304 6660 4212 6703 5212 0303 5240 0240 5240 0240 6240 0703 6714 2703 6714 2301 
6305 1640 6317 3305 6306 1711 6311 7305 6724 3240 6705 2303 5317 0322 5317 0306 
6716 4305 6324 6240 6305 2707 6716 1304 6705 0240 6717 4714 6316 6717 6311 6301 
6215 1612 5240 0240 5240 0240 6240 0640 5316 0304 6301 2304 6640 2715 6314 4724 
6320 2714 6240 3317 6240 4324 5311 0323 6326 1705 6724 1317 6240 7724 6240 7720 
6314 7331 6317 4715 5301 0314 6320 6317 5215 0212 5240 0240 6240 2240 5717 3240 
5640 6712 6263 7254 5215 0212 5240 0240 6240 3240 6311 3275 5711 0653 5656 0304 
5215 0212 5240 0240 6640 0640 5275 7261 5304 7660 5306 6711 6261 2256 4260 5215 
5240 0240 5240 0240 5721 6661 6261 2256 6660 0655 5215 0212 5240 0240 6640 0240 
5275 7260 4304 6660 4212 6703 5212 0240 5240 0240 6240 7704 5240 0265 5713 1275 
4254 6712 5212 0240 5240 0240 5640 6710 5250 5301 6320 1253 6252 7727 5322 4313 
6262 5652 5255 4662 6651 0652 6661 0653 6252 7727 5322 4313 6262 5652 5255 4663 
5215 0212 5240 0240 6640 0240 6275 7727 5322 4313 6262 5652 5255 4662 5215 0212 
5240 0240 6640 3640 6317 5722 5250 5262 5713 1255 6251 4275 5215 0212 5240 0240 
6640 3640 6317 5722 5250 5262 5713 1655 6651 0275 5215 0212 5240 0240 6665 0240 
5317 4314 5713 0655 6651 0275 5317 4314 5713 0655 6251 4253 5252 4303 4312 6651 
5212 0240 5240 0240 6240 7727 5322 4313 6262 5252 5255 4661 5275 7260 4304 6660 
5212 0240 5240 0240 6240 7727 5322 4313 6262 5252 6251 0675 5252 5320 4321 6661 
5212 0240 5640 3240 6240 7720 6314 5250 6251 1675 5250 4712 6252 7727 5322 4313 
6262 5252 4251 5215 5240 0240 5240 0240 6722 2305 6325 7322 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 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