File DQL4.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 0704 4314 6664 4212 6703 5212 0303 5240 0240 5240 0240 6640 2720 
6322 7720 4323 6705 5212 0303 5240 0240 5240 0240 5240 0240 6240 7724 6240 7703 
6715 2720 5324 0305 6711 2316 6705 1307 5301 4314 6705 0330 6650 4255 6251 3252 
5303 4324 5330 6251 6640 2723 6315 2715 6304 7640 6726 1305 4240 6730 5212 0303 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 6306 7722 5715 0240 6240 7724 6240 7311 6306 7311 6711 4724 
4251 6656 4212 6703 5212 0303 5240 0240 5240 0240 6640 1725 6301 2707 6215 1612 
5240 0240 5240 0240 5240 0240 6240 1640 6301 6314 6640 0704 5314 0264 6250 1706 
6724 4654 4251 5215 5303 0240 5240 0240 5240 0240 5240 0240 6720 1301 6301 2715 
6724 1305 6240 1706 6724 1240 6705 2721 6311 2722 6323 0640 6316 2640 6330 2724 
6322 0716 6714 1640 6724 2301 6305 2715 4316 6724 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 6240 1706 5324 0240 
5240 6640 6240 4324 6305 7240 6301 2715 6240 3317 6240 7301 6640 4305 6724 1305 
6316 6301 6240 7704 6325 6302 6705 0240 6322 1705 6311 4723 5317 0316 6306 7325 
6303 4724 4317 6716 5212 0303 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 6640 2723 6702 1320 6717 1307 5301 0315 6325 2723 4304 6656 5212 0303 
5240 0240 5240 0240 5240 0240 5240 0331 5240 0240 5240 6640 6240 4324 6705 1240 
6705 2723 6314 4724 5316 0307 6704 2717 6302 2714 6640 1320 6305 4703 6323 7711 
6316 4640 6316 2724 6307 0722 6714 3240 6701 2714 4305 6656 4212 6703 5212 0303 
5240 0240 5240 0240 6240 2722 6715 1301 4313 6723 5212 0303 5240 0240 5240 0240 
5240 0240 6240 7716 4316 6705 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 6324 2710 6640 4305 6724 1305 6316 6301 6240 7704 
6325 6302 6705 0240 6322 1705 6311 4723 5317 0316 6306 7325 6303 4724 5317 0316 
6323 1325 6320 7722 6307 0722 6315 3240 5303 4324 4330 6651 5212 0303 5240 0240 
5240 0240 5240 0240 6640 2715 5323 0324 5302 0305 6706 1325 6716 1711 6310 2305 
6640 4702 6240 4324 6705 2640 6723 1305 4256 5215 4303 5215 5303 0240 5240 0240 
5240 0240 6715 2305 6310 2317 6215 1612 5240 0240 5240 0240 5240 0240 6240 2640 
6326 6301 6725 2301 6311 7317 6640 1711 6240 7704 5316 0305 5302 0331 6315 0705 
5316 0323 5317 0306 6664 0255 6317 7311 6324 3640 6701 1725 6323 0711 6316 6255 
6701 2707 6705 1322 4305 5215 5303 0240 5240 0240 5240 0240 5240 0240 6321 0725 
6304 0722 6724 1325 6305 3240 6317 6722 6325 0714 6654 3640 6310 1711 6310 4640 
6316 2724 6307 0722 6724 1705 6640 4305 6701 2303 5314 6331 6215 1612 5240 0240 
5240 0240 5240 0240 6640 3640 6310 7305 6305 2726 6322 3240 5303 4324 5330 0251 
5311 0323 6701 0240 6717 4714 6316 6717 6311 6301 6640 0325 6240 7724 6240 2704 
6307 2722 5705 3640 4256 5215 5303 0240 5240 0240 5240 0240 5240 0240 6706 1317 
6240 2722 6706 1305 6305 1716 5305 0254 6323 2705 6215 1612 5240 0240 5240 0240 
5240 0240 6640 1640 6310 7701 6257 4303 5305 7716 6306 0722 5316 6313 6240 0724 
6302 2714 6323 7640 6706 5240 6305 7722 6323 0640 5316 0304 6707 2701 6323 4723 
5301 0316 6327 4705 6707 2310 6323 7640 4306 5215 5303 0240 5240 0240 5240 0240 
5240 0240 6703 1305 6324 4701 6316 0640 6323 7723 6303 0711 6324 2305 6240 0714 
6307 2725 6322 2722 6240 7720 6314 7331 6317 4715 6701 1714 6240 7301 6704 2240 
5310 0305 6322 6305 6301 2724 4304 5215 5303 0240 5240 0240 5240 0240 5240 0240 
6307 7305 6305 0722 6714 5311 5305 0304 6710 1305 6715 2311 6705 0240 6717 4714 
6316 6717 6311 6301 5323 0254 6311 6702 6240 2724 6303 7310 6311 0703 6714 1240 
6305 7720 4322 6724 5212 0303 5240 0240 5240 0240 5240 0240 6640 1324 5260 7260 
5661 0261 5260 4240 6715 1301 5303 0310 5661 3271 5264 6251 6640 0320 5656 2262 
5655 2662 4256 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 5215 0212 5240 0240 6640 1640 6725 1302 
6717 2325 6311 2716 6640 0704 5314 4264 6706 2303 5254 4731 6215 1612 6215 1612 
5215 0212 5240 0240 6240 2240 6317 1325 5314 0305 6320 2722 6703 1711 6311 7317 
5240 6330 6331 3254 4303 6724 4212 6703 5212 0240 5240 0240 5640 6730 5656 1671 
5671 0265 5667 4660 5661 1662 5660 0661 6263 2263 4261 5215 5240 0240 5240 0240 
5331 7275 5665 4663 5662 2271 5667 2660 5665 0666 5663 3662 6264 2265 5255 5263 
6706 2303 5250 4730 5215 0212 5240 0240 6640 4240 5675 2256 5665 3263 5666 0262 
5662 3271 5671 0662 5661 4262 5660 0704 5215 0212 5240 0240 6640 4640 5275 5731 
5656 4263 5670 3670 5671 4260 5665 2661 5660 2660 5663 2270 5704 0655 6252 1706 
6724 4250 4251 5215 5240 0240 5240 0240 5330 7275 5661 2267 5665 3267 5661 0261 
5661 2661 5670 2263 6266 2266 4261 5215 5240 0240 5240 0240 6731 4675 5653 1656 
5665 2267 5661 3270 5671 2262 5663 3667 5671 3271 5671 0304 6252 1706 6724 4250 
4251 5215 5240 0240 5240 0240 5330 7275 5663 1262 5665 3664 5666 4670 5666 4661 
5663 1271 6263 2261 4260 5215 5240 0240 5240 0240 6731 4675 5653 3256 5660 0663 
5665 0664 5660 1664 5664 3261 5663 3263 5660 0304 6252 1706 6724 4250 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 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