File AVCAL.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 3301 6303 6301 6215 1612 6215 1612 5240 0240 5240 0240 6640 0240 
6725 0322 6317 2723 6215 1612 5240 0240 5240 0240 5240 0240 6640 0240 6305 3322 
6317 6722 6240 4324 6305 1640 6301 1714 6725 2714 6323 7640 6306 0640 6240 0706 
6303 7724 6322 0711 6314 2640 6330 2720 6322 6711 6705 2316 6640 1725 6311 3716 
6215 1612 5240 0240 5240 0240 5240 0240 6240 7640 6720 1305 6301 7724 6722 1640 
6311 6707 6301 0640 5316 0304 6317 2720 6722 2301 5317 0322 6304 6305 5324 7301 
6640 2240 6710 1711 6640 2723 6302 7722 6325 4724 5316 0305 4311 6723 5212 0303 
5240 0240 5240 0240 5240 0240 6640 1320 6305 2703 6304 2305 6640 4702 6640 2723 
6302 7722 6325 4724 5316 0305 6701 3304 5301 0324 6301 2316 6240 7706 6314 7714 
6327 2305 6640 4702 6640 2723 6302 7722 6325 4724 4316 6705 5212 0303 5240 0240 
5240 0240 5240 0240 6240 2715 6701 0716 6240 7311 6240 4324 6705 0240 6305 3322 
6317 6722 6301 1716 6305 7640 6306 0640 6316 6301 6331 4723 6323 7640 6706 3240 
6301 4722 6301 1716 6305 3240 5317 0322 4301 5215 5303 0240 5240 0240 5240 0240 
5240 0240 6303 6717 6320 2714 5324 0305 6306 1701 6724 1317 6311 6301 6240 2704 
6323 3711 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 3301 6303 6301 
6240 5650 6254 2714 6326 6305 5254 6330 6314 4654 6323 2724 6320 6254 6701 2323 
4323 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 0313 5240 0240 5240 0255 6316 6725 6702 1305 6240 3317 
6240 0726 6322 0711 6302 2714 5323 4240 6306 1701 6724 1317 5323 7251 5240 0313 
6715 1725 6324 1240 5305 7240 5307 7324 6240 7317 4305 6656 5212 0303 5240 0240 
5240 0240 5240 0240 6240 2714 6326 6305 5240 0255 6711 0316 5325 0324 6326 1705 
6724 1317 6240 3317 6240 2714 6716 2307 6310 5640 6240 7703 6316 0724 6311 4716 
5316 0307 6714 3305 6705 1714 6240 1650 6301 2724 4255 5215 5303 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 6240 3640 6317 4722 5305 4723 6240 4727 
6324 4710 6316 2640 6301 4303 6240 0726 6322 0711 6302 2714 4256 5215 5303 0240 
5240 0240 5240 0240 5240 0240 5330 0240 5240 0240 6255 4640 6716 2720 6724 3240 
6705 2303 5317 0322 6303 7317 6324 4701 6316 7311 6307 2240 6301 0724 5256 0240 
6704 2301 6301 4240 6301 2726 6240 2702 5305 0316 6320 0714 6303 2305 6215 1612 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 6240 7311 6240 2726 
6303 7724 6722 4240 6640 4702 6640 2723 6302 7722 6325 4724 5316 0305 6301 2326 
5301 7324 6640 2240 5310 0305 6314 7305 6307 4324 6240 3317 4240 6730 5212 0303 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 5311 0323 6250 2714 
6326 6305 5250 4661 5253 4661 6252 6250 6305 2726 5714 1250 5651 0653 5251 7252 
5256 5256 6250 2714 6326 6305 5250 4713 5253 4661 4256 5215 5303 0240 5240 0240 
5240 0240 5240 0240 5314 0240 5240 0240 6655 2240 5310 0305 6720 1717 6311 4724 
5317 0316 5311 0316 6326 1705 6724 1317 5240 0330 6327 2710 5322 0305 6324 2710 
6240 0714 5323 0324 6711 0316 5325 0324 6704 2301 4301 5215 5303 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 6240 4640 6323 6240 6317 0703 6324 2305 
5256 0240 6314 4240 5301 0323 6302 2705 6316 1640 6301 1714 6325 0714 6324 2305 
6640 4702 6640 2723 6302 7722 6325 4724 4316 6705 5212 0303 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 6301 2326 5301 7324 6215 1612 5240 0240 
5240 0240 5240 0240 6240 4640 6323 2724 5320 6640 6240 7311 6720 2325 6240 2726 
6303 7724 6322 7640 6306 6240 6305 3716 5324 0310 6313 1640 6717 2316 6301 7311 
6311 3716 6640 2323 6317 0722 5307 0305 6303 7317 6324 7722 4314 5215 5303 0240 
5240 0240 5240 0240 5240 0240 5240 0240 5240 0240 6640 1640 6724 0305 6723 3640 
6310 1711 6310 4240 6301 2726 6240 2702 5305 0316 6303 6301 6303 6325 6301 2724 
6304 1240 6731 1640 6725 1302 6717 2325 6311 2716 6215 1612 5240 0240 5240 0240 
5240 0240 5240 0240 5240 0240 5240 0240 6640 3301 6704 2301 4256 5215 5303 0240 
5240 0240 5240 0240 5240 0240 6714 1701 5324 0323 6655 3640 6317 5722 6311 3716 
6240 2726 6303 7724 6322 7640 6306 6240 6305 3716 5324 0310 4313 6656 4212 6703 
5212 0303 5240 0240 5240 0240 6240 2722 6715 1301 4313 6723 5212 0303 5240 0240 
5240 0240 5240 0240 6240 4324 5311 0323 6323 1325 6722 2717 6324 7311 6305 6640 
6725 2323 6240 7706 6314 7714 6727 1640 6725 1302 6717 2325 6311 2716 6640 3301 
6704 2301 4256 5215 4303 5215 5303 0240 5240 0240 5240 0240 6323 1325 6722 2717 
6324 7311 5305 0323 6301 2316 6640 2706 6716 2303 6311 7317 6640 2723 6702 1320 
6717 1307 6701 1715 6240 2722 6321 4725 6322 2305 6215 1612 5240 0240 5240 0240 
5240 0240 6240 7240 6317 2716 6215 1612 6215 1612 5240 0240 5240 0240 6240 6640 
6305 4324 4317 6704 5212 0303 5240 0240 5240 0240 5240 0240 6240 4324 6305 6640 
6305 4324 5317 0304 5311 0323 6702 1701 5305 0304 5317 0316 6324 2710 6240 2724 
6303 7310 6711 2721 6305 2240 6311 1723 6725 1723 5305 0304 5302 0331 5310 0256 
4317 6656 5212 0303 5240 0240 5240 0240 5240 0240 6240 0710 6322 6324 5305 0331 
5311 0316 6247 0715 6324 2710 6715 2301 6311 0703 6314 6640 6305 4324 6717 1704 
6240 7706 6322 2240 6311 4707 6324 6301 6240 7703 6715 2720 6724 1305 5323 6247 
6215 1612 5240 0240 5240 0240 5240 0240 6240 2640 6704 2311 5305 0304 5302 0331 
5301 0256 6322 6301 6323 7724 6316 0640 5316 0304 5310 0256 6327 6311 5306 0254 
6312 4317 6716 3640 6311 2714 6331 0640 5316 0304 6323 7317 4323 6654 5212 0303 
5240 0240 5240 0240 5240 0240 5640 4661 5266 6262 6240 4303 6701 2320 5305 0322 
5262 7260 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 5240 0240 6640 2723 6302 7722 
6325 4724 5316 0305 6301 1726 5301 0314 5250 6313 6714 3305 5305 6314 6330 6254 
6654 1711 6724 0305 6254 0714 6723 1724 4251 5215 5240 0240 5240 0240 6304 6711 
6705 1716 6311 7317 6240 2714 6326 6305 5250 4661 5254 4330 5261 6251 6711 2323 
5305 4320 5261 6251 6714 1701 5324 4323 4261 6651 4212 6703 5212 0303 5240 0240 
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 4256 5215 4303 5215 
5303 0240 5240 0240 5240 0240 5311 0306 6301 2240 6317 1325 5314 0305 6320 2722 
6703 1711 6311 7317 6240 2726 6322 4723 5317 0316 5317 0306 6324 4710 6723 1240 
6717 2325 6311 2716 6640 1711 6240 2704 6723 1311 5305 6304 6240 4324 4305 5215 
5303 0240 5240 0240 5240 0240 6303 4640 6316 1640 6717 2714 5315 0316 6661 1640 
6710 2717 5314 0304 5302 0305 6322 6705 6317 2726 6304 3240 6322 6717 6240 4324 
6305 2240 6317 1325 5314 0305 6320 2722 6703 1711 6311 7317 6215 1612 5240 0240 
5240 0240 6640 1640 6724 2301 6305 2715 5316 0324 6327 4710 5303 0310 6306 6317 
6714 3717 4323 6656 4212 6703 5212 0303 5240 0240 6240 7704 6325 6302 6705 0240 
6322 1705 6311 4723 5317 0316 6730 1654 4325 6715 4212 6703 5212 0303 5240 0240 
5240 0240 6240 4324 6305 1640 6640 2715 5323 0324 6701 1714 6317 1240 6705 1240 
6305 7715 6326 2305 6640 1306 5317 0315 6704 2717 6302 2714 6640 1320 6305 4703 
6323 7711 6716 1640 6724 2301 6305 2715 6716 1724 6215 1612 5240 0240 5240 0240 
6240 0640 6320 2720 6301 4722 5316 0307 5311 0316 6317 4324 5305 0322 6722 2717 
6324 7311 5305 0323 6325 2723 6304 4640 6316 1640 6317 5316 6325 1716 6324 7711 
6716 3640 6311 4324 6240 4324 4311 6723 5212 0303 5240 0240 5240 0240 6240 7722 
6325 4724 5316 7305 6215 1612 6215 1612 5240 0240 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 4256 6656 4212 6703 5212 0303 5240 0240 6240 0703 
6714 2703 6714 2301 6705 2240 5310 0305 6714 1701 6324 2240 6301 0724 6240 7720 
6723 2311 6311 7317 6240 3317 6240 0705 5303 0310 6306 1701 6724 1317 6215 1612 
5215 0212 5240 0240 6240 6240 6701 2323 5723 0650 6251 6275 4253 6661 5212 0240 
5240 0240 6240 7704 5640 2261 6265 4640 5275 6262 4313 5215 5640 0640 5264 0265 
6714 1701 5324 4323 5711 6651 6714 1701 5324 4323 5711 0655 6251 4653 6323 2724 
6320 4650 4251 5215 4303 5215 5303 0240 5240 0240 6720 1305 6706 1317 6315 1640 
6301 1714 6725 2714 6323 7640 6306 7640 6720 1305 6301 4724 4317 6716 4212 6703 
5212 0240 5661 0265 6240 7704 5640 3661 6265 4640 5275 6261 4313 5215 5240 0240 
5240 0240 5714 0675 5215 0212 5240 0240 6240 6240 5714 0675 5215 0212 5240 0240 
6640 1640 5725 6715 5660 0256 5215 0212 5240 0240 6240 7240 6316 6275 6305 2726 
6314 4650 4251 5215 5240 0240 5240 0240 5706 6716 4316 6716 5212 0240 5240 0240 
6240 7311 6303 2722 6675 1711 6724 0305 5250 4711 5215 0212 5240 0240 6240 6240 
6701 2323 6275 0714 6723 1724 5250 4711 6215 1612 6215 1612 5240 0240 6640 1640 
6311 6707 6301 7640 6720 1305 6301 4724 4317 6716 4212 6703 5212 0240 5661 2665 
6240 7704 5640 3261 6260 5240 5275 6261 4316 6716 5212 0240 5240 0240 6640 2723 
6715 1675 5325 5715 6330 6250 4251 5215 5640 0640 5266 0260 6314 6275 6253 7311 
6303 2722 5215 0212 5240 0240 6640 4240 5250 4714 6675 2723 4315 5215 4303 5215 
5303 0240 5240 0240 6304 6305 5324 0301 6317 2720 6722 2301 6311 7317 6215 1612 
5215 0212 5240 0240 6240 2240 5717 0640 5266 0265 5712 0675 6254 7316 5215 0212 
5240 0240 6640 4240 6250 6314 6251 3275 6716 4252 6250 6314 6651 1655 4325 6715 
5212 0240 5661 2666 6240 6314 6275 6314 6253 7311 6303 2722 5215 0212 5240 0240 
6640 1640 5725 6715 5660 0256 5215 0212 5240 0240 6240 4640 6306 6250 6255 0714 
5323 4724 5640 3261 5267 0254 5661 2667 5654 0640 4267 6665 5212 0240 5661 3666 
6240 3311 5250 6714 6714 1701 6324 4653 6716 1303 5305 0251 5661 4266 5654 0640 
5266 6270 5640 3661 4260 5215 5640 0640 5266 0270 6314 6275 6253 7311 6303 2722 
5215 0212 5240 0240 6240 6240 6314 6275 6314 4653 6716 1303 4305 5215 5240 0240 
5240 0240 5307 0317 5324 0317 5661 2665 5215 0212 5640 3661 6260 6240 5275 5714 
6311 1716 5322 5705 6261 6255 6701 2323 5215 0212 5240 0240 6240 6240 6314 6275 
6314 4653 6716 1303 5705 0653 6255 0714 4323 6724 5212 0240 5240 0240 6240 7707 
6240 7724 5640 2661 4265 5215 5640 0640 5267 0265 6303 7317 6324 7311 4325 6705 
5212 0240 5240 0240 6240 2722 6724 1325 4316 5215 5240 0240 5240 0240 6305 2316 
4615 5212 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