File CSP.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 1703 4320 5215 4303 5215 5303 0240 5240 0240 5240 0240 6720 1325 
6720 1717 4305 5215 5303 0240 5240 0240 5240 0240 5240 0240 6303 6717 6720 2325 
6705 2240 5310 0305 6326 6301 6725 1705 6240 3317 6240 4324 6705 1640 6310 3311 
6324 2305 6240 4303 6705 4702 6323 2710 6726 0240 6717 4714 6316 6717 6311 6301 
4323 5215 5303 0240 5240 0240 5240 0240 5240 0240 5324 4323 6716 4254 6251 3240 
5317 0322 6301 3722 6325 2715 5316 0324 6330 0640 5316 0304 6317 2322 6705 1722 
5240 0260 5325 0320 5324 0317 4316 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 1703 6720 4650 5254 6330 4316 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 0331 5240 0240 5240 0255 
6722 1705 6725 2314 6240 2726 6303 7724 6322 7640 6306 2240 6311 2715 6316 4723 
5317 0316 5716 0653 6240 7703 6316 0724 6311 4716 5316 0307 6324 2710 6240 0726 
6314 2725 4323 5215 5303 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
6240 7640 6706 1640 6310 3311 6324 2305 6240 4303 6705 4702 6323 2710 6726 0240 
6717 4714 6316 6717 6311 6301 6323 7640 6306 7640 6322 2704 5722 0240 6640 0325 
6240 7724 4240 6716 5212 0303 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 
5240 0240 6706 1317 6240 4707 6326 7305 6640 1301 6307 6725 6705 2316 5240 7330 
6215 1612 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 6240 0726 
6314 2725 6323 0640 5322 0305 6317 2322 6305 2722 6304 3240 6322 6717 6240 7714 
6727 2240 6317 4240 6311 4307 6640 1317 6704 1305 6215 1612 5240 0240 5240 0240 
5240 0240 6640 4240 5240 0240 5240 6640 6640 1301 6307 6725 6705 2316 6240 3317 
6240 4323 6711 2306 5305 0304 6303 2710 6702 1731 6710 3305 6240 7720 6314 7331 
6317 4715 4301 6714 5212 0303 5240 0240 5240 0240 5240 0240 5240 0316 5240 0240 
5240 0255 6317 2322 5305 0322 5317 0306 6323 4710 6306 2724 6304 1640 6310 1305 
6331 4323 5305 0326 6320 6317 6331 7716 6315 0711 4314 5215 4303 5215 5303 0240 
5240 0240 5240 0240 6322 6705 6301 5722 4323 5215 5303 0240 5240 0240 5240 0240 
5240 0240 6316 6240 6705 1723 6240 4324 5301 0316 6260 4640 6723 2240 6322 0705 
6324 2305 6640 1701 6240 3311 5240 0316 6727 1305 5705 0240 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 6305 0726 6314 0725 6324 7711 6316 4640 6323 1240 
6301 2723 6304 7640 6716 2240 5310 0305 6322 1705 6725 1322 6305 1716 6305 2640 
6321 0725 6324 7711 6316 3240 4317 6722 5212 0303 5240 0240 5240 0240 5240 0240 
6240 4323 6711 2306 5305 0304 6303 2710 6702 1731 6710 3305 6240 7720 6314 7331 
6317 4715 6701 1714 6640 1724 5250 6316 4330 6651 5212 0303 5240 0240 5240 0240 
5240 0240 6640 1724 5250 5716 6661 4254 5251 4275 6664 4252 5255 4662 6652 1724 
5250 6316 5330 6651 5324 4323 5716 0655 5254 4730 4254 5215 5303 0240 5240 0240 
5240 0240 5240 0240 6327 2710 5322 0305 6324 2710 6240 4706 6722 2323 6240 2724 
5322 0315 5311 0316 6302 0722 6303 2713 5324 0323 5311 0323 6324 2710 6640 1317 
6704 1305 4254 5215 5303 0240 5240 0240 5240 0240 5240 0240 6324 2710 6240 2723 
6303 7317 6304 4640 6723 2240 5310 0305 6301 3722 6325 2715 5316 7324 6215 1612 
5240 0240 5240 0240 5240 0240 6640 1640 6724 1301 6324 7311 6707 3240 6701 2714 
5305 0323 6301 2722 6640 1724 5250 6260 5730 6651 5261 0254 5324 4323 6661 4254 
5651 1275 5252 6730 4261 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 1640 5323 4320 6731 4254 5254 4716 6215 1612 
5215 0212 5240 0240 6240 2240 6311 2715 6316 4723 5317 0316 5731 0650 4251 5215 
4303 5215 5303 0240 5240 0240 5240 0240 6724 1705 6324 7640 6306 7640 6322 2704 
4322 5215 5240 0240 5240 0240 5731 0650 5651 0675 4256 5215 5240 0240 5240 0240 
5311 4306 5716 0651 5254 6261 4262 5215 5240 0240 5240 0261 6722 2305 6325 7322 
6215 1612 5215 0212 5240 0240 6662 4640 5250 4662 5275 5730 5730 0655 4256 5215 
5240 0240 5240 0240 5311 4306 5716 0655 5251 6261 5661 1654 6215 1612 6215 1612 
5240 0240 5240 0240 6240 4640 6716 2311 6311 6301 6311 0732 6324 7711 4316 5215 
5240 0240 5240 0263 6706 4675 5250 4662 5253 4331 4262 6651 4212 6703 5212 0240 
5240 0240 6240 7704 5240 0264 5711 1275 4254 6716 5212 0240 5640 2240 5240 4331 
5711 0653 6251 3275 5252 4331 5311 6651 6331 4650 5255 4661 5215 0212 5240 0240 
6640 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 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 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