File CEL2.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 6240 2703 4314 6662 4212 6703 5212 0303 5240 0240 5240 0240 6640 2720 
6322 7720 4323 6705 5212 0303 5240 0240 5240 0240 5240 0240 6240 7703 6715 2720 
6724 1705 6240 4324 6305 3640 6305 2716 6322 6301 6311 2732 6304 1640 6717 0315 
6714 2305 6305 2640 6314 4714 6320 4724 6303 4640 6316 2724 6307 0722 6314 7640 
4306 5215 5303 0240 5240 0240 5240 0240 5240 0240 6323 1705 6317 2316 6240 4713 
5316 7304 6215 1612 6215 1612 5240 0240 5240 0240 6640 2640 6323 3701 4305 5215 
5303 0240 5240 0240 5240 0240 5240 0240 6303 6301 6314 1640 5705 1314 6250 2722 
6323 0654 6313 0654 5254 6302 6711 1305 4251 5215 4303 5215 5303 0240 5240 0240 
5240 0240 6704 1705 6303 4722 6320 4724 5317 0316 5317 0306 6720 1301 6301 2715 
6724 1305 4323 5215 5303 0240 5240 0240 5240 0240 5240 0240 6722 1705 5240 0240 
6655 1240 6705 2723 5314 0324 6326 6301 4325 6705 5212 0303 5240 0240 5240 0240 
5240 0240 6240 5701 5240 0240 5240 0255 6315 2317 6725 2714 5323 4240 6711 0316 
5325 4724 6215 1612 5240 0240 5240 0240 5240 0240 6240 0640 5240 0240 5240 6640 
6240 7703 6716 2323 6701 2316 6240 2724 5322 0315 5311 0316 6316 6725 6305 0722 
6724 1317 6215 1612 5240 0240 5240 0240 5240 0240 6240 1240 5240 0240 5240 6640 
6240 0706 6303 7724 6322 7640 6706 0640 6325 2301 6722 2301 5311 0303 6724 1305 
6315 4640 6316 7240 6325 2715 6722 2301 4317 6722 5212 0303 5240 0240 5240 0240 
5240 0240 6240 2711 5322 0240 5240 0255 6722 1705 6725 2314 6701 2316 6640 1305 
6722 1317 6240 7703 5304 0305 6327 2710 4322 6705 5212 0303 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 6711 1305 5275 0260 6240 7716 6640 1305 
6722 1317 6215 1612 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
6240 2711 5722 0675 6240 0640 6313 7240 5317 0324 5311 0316 6322 7301 5307 0305 
5255 0261 5324 0317 4253 6661 4212 6703 5212 0303 5240 0240 5240 0240 6240 2722 
6715 1301 4313 6723 5212 0303 5240 0240 5240 0240 5240 0240 6240 7706 6322 0640 
5302 4323 5301 4713 6240 2707 5240 0261 6324 2710 6240 2722 6323 6325 6324 4640 
6723 1640 5305 0324 5324 0317 5661 3656 5705 4263 6240 3311 5240 0302 5311 0323 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 4260 5215 5303 0240 5240 0240 
5240 0240 5240 0240 6720 1717 6311 4724 5326 6305 6240 7724 5640 0655 6256 2667 
5263 0270 5311 0306 6302 4640 6323 7240 6305 0707 6724 3311 5305 0256 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5640 0240 6215 1612 5240 0240 5240 0240 5240 0240 6640 1640 6320 1705 6311 6301 
6240 0703 6723 1705 6640 1301 4305 5215 5303 0240 5240 0240 5240 0240 5240 0240 
6313 5650 6251 7640 6302 0724 6311 2716 6704 3640 6311 4324 5240 0301 5675 0640 
6254 1240 5240 0275 4261 5215 5303 0240 5240 0240 5240 0240 5240 0240 6305 5650 
6251 7640 6302 0724 6311 2716 6704 3640 6311 4324 5240 0301 5675 0640 6254 1240 
5240 0275 5303 5313 5303 0313 6327 2710 5322 0305 5303 0313 4311 6723 5212 0303 
5240 0240 5240 0240 5240 0240 6240 7703 6315 6320 6305 2715 6316 0724 5322 0331 
6315 2317 6725 2714 4323 6656 5212 0303 5240 0240 5240 0240 5240 0240 5240 4302 
5313 0251 6717 2302 6301 7311 5305 0304 6727 2311 6310 0640 5240 0275 5261 0254 
5702 6640 4240 6660 5212 0303 5240 0240 5240 0240 5240 0240 5240 4304 5313 0251 
6717 2302 6301 7311 5305 0304 6727 2311 6310 0640 5240 0275 5260 0254 5702 6640 
4240 6661 5212 0303 5240 0240 5240 0240 5240 0240 6240 4327 6305 2722 5240 6313 
5240 6305 5240 6302 5240 0304 6304 3305 6311 2716 6640 0323 6305 4703 5301 0314 
6703 1701 5305 0323 5317 0306 6324 2710 6240 2707 6716 1305 6301 4714 6332 2305 
6215 1612 5240 0240 5240 0240 5240 0240 6240 1640 6717 0315 6714 2305 6305 2640 
6314 4714 6320 4724 6303 4640 6316 2724 6307 0722 6314 7640 6706 1640 6305 7703 
5316 0304 6313 7311 6304 4640 6716 2240 5310 0305 6725 2723 4301 6714 5212 0303 
5240 0240 5240 0240 5240 0240 6240 7716 6724 2301 6311 7317 6254 0640 5316 0304 
6324 2710 6640 1301 6307 6725 6705 2316 5240 0313 5317 0306 6324 2710 5323 0305 
6306 7325 6303 4724 6717 1716 6240 2715 6701 1716 6215 1612 5240 0240 5240 0240 
5240 0240 6640 2240 5310 0305 6315 2317 6725 2714 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 6316 7317 4305 5215 
4303 5215 5303 0240 5240 0240 5240 0240 6715 2305 6310 2317 6215 1612 5240 0240 
5240 0240 5240 0240 6240 2240 6305 4706 6716 2311 6311 7317 6215 1612 5240 0240 
5240 0240 5240 0240 6640 1240 5705 6723 6711 2316 6705 1307 5301 4314 5250 5701 
6702 2252 5252 4724 6657 1650 6721 2322 5650 0650 5253 5324 5324 5251 5250 5661 
6250 5703 5252 4724 5652 1252 5251 5251 5250 5661 6724 2252 4251 6651 5212 0303 
5240 0240 5240 0240 5240 0240 6640 2723 6315 2715 6304 7640 6726 1305 5240 0324 
6306 7722 5715 0240 6240 7724 6240 7311 6306 7311 6711 4724 4251 6656 5212 0303 
5240 0240 5240 0240 5240 0240 6640 3305 6701 2714 6301 4724 4317 6716 5212 0303 
5240 0240 5240 0240 5240 0240 6240 0714 6316 2704 5316 0323 6324 0722 6316 3323 
6317 6722 6301 4724 5317 0316 5311 0323 6325 2723 6304 3240 5317 0322 6303 6301 
6303 6325 6301 4724 5317 7316 6215 1612 5240 0240 5240 0240 5240 0240 6640 1240 
6305 2706 6322 7305 4303 6705 5212 0303 5240 0240 5240 0240 5240 0240 5240 7322 
6302 6325 6711 1722 5303 6310 6240 7247 6325 2715 6322 1711 5301 0314 6303 6301 
6303 6325 6301 4724 5317 0316 5317 0306 6305 6314 6711 2320 5311 0303 6711 2316 
6705 1307 6701 1714 6215 1612 5240 0240 5240 0240 5240 0240 6240 0640 5316 0304 
6305 6314 6711 2320 5311 0303 6306 7325 6303 4724 6717 1716 5247 0254 6310 7301 
6304 7702 5317 0313 6723 1305 6711 1705 6640 0323 6305 4703 5301 0314 6306 7325 
6303 4724 6717 1716 4254 5215 5303 0240 5240 0240 5240 0240 5240 0240 6316 6725 
6305 4722 6323 4303 6305 6640 6301 4324 6305 0715 6324 5711 6240 7726 5314 0256 
5267 0254 5661 3271 5265 0254 5320 7320 5640 4267 5655 0271 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 6240 2703 
5314 4262 6722 1705 6254 5701 5254 6301 6302 4654 5305 4722 5215 0212 5240 0240 
6240 4640 5705 6722 4260 5215 5240 0240 5240 0240 6301 4722 5275 7262 5215 0212 
5240 0240 6240 3640 5705 6717 5250 7260 6265 0655 5313 5651 5660 2656 5215 0212 
5240 0240 6240 3640 5705 6717 6307 7705 6253 2707 6317 0652 4313 5215 5240 0240 
5240 0240 6722 1705 4275 6701 5212 0240 5240 0240 5640 0701 5275 5701 4302 5215 
5240 0240 5240 0240 5702 6660 6302 1253 5215 0212 5240 0240 6240 4640 6306 3650 
5305 4717 5661 1254 4254 6666 5212 0240 5640 0640 6240 2711 5722 0675 5215 0212 
5240 0240 6262 4640 6306 1250 5251 6263 5670 2254 5215 0212 5240 0240 6663 1240 
5705 6723 5255 7261 5667 1705 5270 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
4240 6660 5212 0240 5240 0240 6240 2722 6724 1325 4316 5215 5240 0240 5240 0264 
6722 1705 5275 7261 5667 1705 5270 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5640 0240 5215 0212 5240 0240 6640 1240 6705 2724 4322 6716 5212 0240 5640 2640 
6240 2707 6317 3675 5305 5317 6701 1301 4311 5215 5240 0240 5240 0266 6307 7705 
6675 0723 5322 4324 6307 7705 4251 5215 5240 0240 5240 0240 6307 7705 6275 2707 
6317 3653 4305 6717 5212 0240 5240 0240 6240 0701 5722 6711 6301 4722 5215 0212 
5240 0240 6240 0640 5722 6711 6301 4722 6253 2707 4317 5215 5240 0240 5240 0240 
5702 6660 5302 5660 6722 1705 6252 2707 4317 5215 5240 0240 5240 0240 6722 1705 
5675 0701 5215 0212 5240 0240 6240 1240 6260 1275 6260 1253 4260 5215 5240 0240 
5240 0240 5701 6661 5302 7660 6301 4722 5653 0701 5215 0212 5240 0240 6240 4640 
6306 3650 5305 7717 6701 1301 5711 0255 5656 4671 5271 4671 5665 3654 4254 6667 
5212 0240 5640 3640 6240 2722 6323 0675 6261 0657 4322 6711 5212 0240 5240 0240 
6240 2722 6723 1275 5305 5723 5660 2656 5667 3660 5671 1666 5305 5260 6722 1705 
5215 0212 5240 0240 6670 1240 6705 2724 4322 6716 5212 0240 5240 0240 6240 7305 
4304 5215 4232 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