File CALEND.FT (FORTRAN source file)

Directory of image this file is from
This file as a plain text file

5303 6655 6240 1640 6301 2714 5316 0304 5240 0255 6640 1320 6711 2316 6240 0703 
6314 7305 6704 1301 6240 2731 5301 0322 5317 0306 6731 2717 6322 1640 6310 4717 
5303 7305 6215 1612 6215 1612 5240 0240 5640 0640 5671 1267 6240 4715 6303 0710 
5305 0314 6310 1725 4313 5215 4303 5215 6303 6611 6317 4704 6306 2711 6304 1240 
6331 3640 6705 1317 5307 0305 6307 7317 6332 6301 5305 6332 6640 2712 5314 0331 
5661 3671 4270 5215 5303 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 
5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 
5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 5255 6655 
5255 6655 4255 6655 4212 5215 6211 7311 6324 3705 5305 0322 6704 4701 5650 1264 
5654 0640 4264 6651 6212 4611 6316 2724 6707 1305 6240 0704 6331 6723 6717 2316 
5710 0650 5264 6251 6640 2716 6315 2723 5707 2650 5654 0640 5260 6251 6240 0704 
6331 4714 5724 1650 4262 6651 6212 4611 6316 2724 6707 1305 6240 2731 5301 6322 
6240 2727 6313 0704 5331 0254 6325 4716 4324 5215 6211 2722 5301 0314 6314 7311 
6323 3705 5650 3261 5251 0254 6315 7317 5324 4310 5262 0254 5261 4662 4215 4612 
6704 2301 6301 2240 6701 1731 6315 7317 5324 7710 5263 6261 5263 6261 5262 6270 
5263 6261 5263 6260 5263 6261 5263 6260 5263 6261 5263 6261 5263 6260 5263 6261 
5263 6260 5263 6261 5263 7661 4215 6612 6212 2211 6301 0724 6640 2716 6315 2723 
5707 4657 5254 6266 5666 3254 5254 6271 5261 6263 5671 0654 5663 0654 5663 4254 
5254 6271 5666 0654 5663 0654 5661 0654 4266 6654 5212 0240 5240 0240 5661 4640 
5654 2261 5254 6270 5261 6264 5671 3254 5254 6266 5261 6266 5261 6264 5261 6264 
5261 6266 5667 0654 5654 2261 5254 6261 5671 3654 5254 6261 5666 4654 4254 5215 
5240 0240 5640 1240 5640 3261 5654 2261 5654 1661 5654 0661 5254 6267 5671 3254 
5254 6271 5666 4654 5254 6271 5666 4254 5654 2261 5254 7671 4215 6612 6212 2211 
6301 0724 6240 4714 6316 2723 4307 6657 5212 0240 5240 0240 5661 2240 5310 2244 
5244 6240 6240 4264 5244 0244 5244 0254 5264 2310 5244 0240 5654 2240 5310 0244 
5244 6244 6240 4264 5244 2240 5240 0254 5215 0212 5240 0240 5240 0262 5264 2310 
5240 2240 5654 2240 5310 0244 5240 6240 6240 4264 5240 2244 5244 0254 5264 0310 
5244 0244 5654 2240 5310 2240 5240 6244 4240 5215 5240 0240 5640 1640 6240 4264 
5240 0244 5240 0254 5264 0310 5240 2244 5654 2240 5310 0240 5244 6240 6240 4264 
5240 0240 5244 0254 5264 0310 5240 0240 5240 0254 5264 2310 5244 2244 4240 6657 
4212 5215 6211 0704 5324 0301 6704 4701 6714 2311 5257 0247 5261 6247 5647 1240 
5247 3654 5240 3663 5254 0247 5264 6247 5647 2640 5247 3654 5240 3666 5254 0247 
5267 6247 5647 4240 4247 6654 5212 0240 5240 0240 5261 3640 5240 3671 5654 0647 
5260 6247 5647 0661 5247 3654 5261 3662 5654 0647 5263 6247 5647 2261 5247 3654 
5261 3665 5654 0647 5266 6247 5215 0212 5240 0240 5240 0262 5647 3661 5247 3654 
5261 3670 5654 0647 5271 6247 5647 0262 5247 3654 5262 3661 5654 1247 5262 6247 
5647 1662 5247 3654 5262 3664 4254 5215 5240 0240 5640 1640 5640 1247 5265 6247 
5647 3262 5247 3654 5262 3667 5654 1247 5270 6247 5647 4662 5247 3654 5263 3660 
5654 1647 5261 6247 5647 1263 5247 7640 4215 6612 6212 2211 6301 0724 6240 7715 
6316 4324 5240 0257 5247 0240 6312 7301 5247 3654 6725 1301 5331 3640 5254 0247 
6240 2706 5302 6247 6647 2722 6701 4722 5247 3654 6240 0715 5322 3703 6254 4247 
5240 0240 5240 6247 5215 0212 5240 0240 5240 0261 5247 0240 6640 0301 5247 3654 
6322 6311 5240 3640 5254 0247 5240 0240 5315 6247 6647 4701 5240 0240 5247 3654 
6240 5240 5325 3716 6254 2647 5240 0240 5240 6247 5215 0212 5240 0240 5240 0262 
5247 0240 6240 5240 5247 3654 6725 4714 5240 3640 5254 0247 6240 0640 5325 6247 
6647 2707 5323 0324 5247 3654 6240 2723 5320 3724 6254 2647 6315 2702 5322 6247 
5215 0212 5240 0240 5240 0263 5247 0240 6717 2303 5247 3654 6317 2702 5322 3640 
5254 0247 6240 7716 5326 6247 6247 6705 6702 1305 5247 3654 6240 2240 5305 3703 
6254 2647 6315 2702 5322 0247 4257 5215 4215 4612 6325 4716 5724 6640 4240 4661 
5211 0300 6717 2325 6720 2325 6240 7724 6640 2324 4331 5215 4215 4612 6327 4710 
5314 0305 5250 7240 6724 2722 5305 0256 4251 5215 6611 1327 6311 2724 5250 6261 
5640 0261 4251 4611 6300 0640 5323 0313 6706 1317 6240 2731 4301 6722 6612 1211 
6305 2301 5250 6261 5640 0262 6251 2731 4301 6722 6212 4611 6706 4650 6705 1301 
6240 6256 5305 0256 5260 0251 6323 7724 4320 5215 4303 5215 5303 6655 6240 2240 
6305 2724 6322 4715 5316 0305 6314 0705 6720 4640 6705 1301 4256 5215 4303 5215 
5303 0240 6240 6240 6705 0301 6240 2731 6701 1722 6640 1301 6705 4640 6705 1301 
6323 2240 6311 4726 6323 1311 5314 0305 5302 0331 6264 2640 6330 2703 5320 0324 
6331 0705 5322 0323 6305 2316 6311 3716 6215 1612 5240 0240 6240 7311 5640 0260 
6240 4324 5301 0324 6303 7301 6716 2317 6240 2702 6240 4704 6726 1711 6311 6302 
6305 1240 5731 2240 5260 7260 6215 1612 4215 4612 5311 4306 6315 2317 6250 2731 
5301 6322 5240 4664 6240 2656 5321 0256 5260 7240 6301 2316 4256 5215 5240 0240 
5240 2240 6240 7256 5317 7324 5240 0250 6315 2317 6250 2731 5301 6322 5640 0261 
5260 0251 6656 0705 5656 0240 6240 0656 5316 7304 6240 7715 6704 4650 6705 1301 
5654 2240 5260 4660 6240 7256 5305 0256 5260 4651 6240 4324 4305 6716 5212 0211 
6240 2240 6701 1731 6315 7317 5324 4310 5263 0251 5675 1240 4271 5215 6211 6305 
4323 6705 5212 0211 6240 2240 6701 1731 6315 7317 5324 4310 5263 0251 5675 1240 
4270 5215 6211 7305 6304 3311 6215 1612 6215 1612 5255 0255 6240 2732 6314 2714 
6722 1647 6240 7703 6716 1307 6325 7305 5303 0305 5240 0333 5311 0324 5275 6640 
6315 2317 5240 7256 6656 6640 6215 1612 6215 1612 5240 0240 5240 0306 5275 4240 
6711 2316 5250 7262 5266 6715 5660 1256 5251 5640 5240 0313 6253 2240 5240 0253 
5704 2257 5240 0253 5703 2257 6255 1662 6251 6640 5317 0304 4267 5215 4303 5215 
5303 0240 6240 5640 5240 0275 6704 4701 6240 3317 6240 7715 6316 4324 6215 1612 
5240 0240 5240 0303 6275 7240 6325 1315 5305 0322 5317 0306 6310 7325 6304 2722 
5304 0323 5311 0316 6324 2710 6240 2731 4301 6722 5212 0303 5240 0240 5704 6640 
6240 2731 5301 0322 5311 0316 6324 2710 6240 2703 6716 2724 4322 6731 5212 0303 
5240 0240 5715 6640 6240 7715 6316 4324 6640 2716 6315 2702 5322 4240 5261 0254 
6715 1301 5303 4710 5640 1250 6254 0640 6320 4722 5314 0251 5256 7256 5640 0650 
5260 0254 6304 1705 6305 1315 5305 4722 6215 1612 5211 0240 5650 0661 6254 5240 
6701 2716 6701 4722 5251 4240 5261 6262 6240 2706 6702 2722 6701 4722 4251 5215 
5303 0240 6240 3240 5240 0275 5250 6260 6640 2723 5316 0251 5250 6261 6240 7715 
5316 0251 5250 6262 6640 2724 5305 0251 5250 6263 6240 2727 5304 0251 5250 6264 
6240 4324 5325 0251 5250 6265 6640 1306 5311 0251 5250 6266 6240 0723 4324 6651 
4212 6703 5212 0303 5240 0240 6305 0730 6315 6320 5305 0272 6240 1717 5724 0640 
5262 0254 5661 2671 4266 6656 4212 6703 5212 0303 5240 0240 5713 6640 5640 1261 
6254 1640 5240 0275 5261 6271 5240 0304 5675 2640 5266 0254 5715 6640 5240 0270 
6240 4324 5305 0316 5240 0306 5675 2640 6240 3250 6322 2311 5301 4731 4256 5215 
4303 5215 6211 0714 6723 4724 6705 1301 5240 0275 6331 0705 5322 6640 4240 6661 
6212 4611 5662 6640 6240 0714 6723 4724 6705 1301 5240 0257 5661 0260 4215 4612 
5311 0263 6275 6640 5317 4304 6714 1701 6324 2731 5301 6322 5640 0261 4260 6651 
6612 3611 6305 2313 5301 0331 5275 6640 6315 2317 5650 3262 5240 0253 5311 7663 
5264 5640 5640 1311 5257 0264 6253 4640 5663 1255 5240 0252 5311 6262 5240 4667 
4215 4612 5311 4306 6327 5705 6704 4701 6240 2656 5321 0256 5260 0251 6327 5705 
6704 4701 5240 0275 6327 5705 6704 4701 5240 0255 4267 5215 4303 5215 5303 6655 
6640 1640 5305 0324 6303 6301 6305 2316 5301 0322 6704 2301 5305 0323 5311 0316 
6701 1322 5301 0331 6306 7722 6315 2240 6305 2703 6315 2702 6322 7640 6706 2240 
5310 0305 6331 0705 4322 5215 5303 0240 6240 1240 6305 7706 5322 0305 5324 0317 
6312 7301 6725 1301 6331 7640 6706 2240 5310 0305 6331 0705 6322 0640 6306 2724 
5322 4240 6724 2317 5301 0314 5317 0306 5261 0264 6315 7317 6724 1710 4251 6656 
4212 6703 6212 2211 5717 7640 5240 0312 5675 0640 5654 0640 6264 0211 6240 7706 
6322 0640 5314 0314 6315 7317 6724 1710 4215 4612 5240 0240 6311 4724 5240 0275 
6255 2727 6313 0704 4331 5215 5211 0240 6240 5312 5240 0275 6704 4701 6323 7715 
6316 4324 5250 4712 4215 6612 5212 0211 6240 2240 5717 7640 5640 1312 5240 0275 
5261 0254 4264 4662 6300 3240 5317 0322 6301 6314 6240 0704 4331 6723 4212 4611 
6327 5705 6704 4701 5240 0275 6327 5705 6704 4701 5240 0253 4261 5215 6211 4611 
6706 3650 6305 2313 5301 0331 6656 2307 5656 0240 6240 0656 5316 7304 6240 2727 
6313 0704 5331 7240 5314 7305 6240 5312 4251 5215 5211 0240 5240 0240 5240 0240 
5240 0240 6240 0704 6331 5250 5262 0254 5312 0251 6275 2240 6301 6331 5311 4324 
6327 5705 6704 4701 4251 5215 5211 0240 5240 0240 5240 0240 6705 1714 4305 5215 
5211 0240 5240 0240 5240 0240 5240 0240 6240 0704 6331 5250 5262 0254 5312 0251 
5275 3640 5240 3640 4215 4612 5240 0240 5240 0240 6240 2640 6316 4704 4306 5215 
5211 0240 6240 7305 6304 7704 6240 0211 6240 7706 6322 0640 5314 0314 6704 4701 
4323 5215 4215 4612 5240 0240 6327 5705 6704 4701 5240 0275 6255 7715 6304 5250 
5312 5640 6640 2311 5311 0254 4267 6651 6212 2611 6316 2304 6317 0211 6240 7706 
6322 0640 5314 0314 6315 7317 6724 1710 6215 1612 6215 1612 5255 0255 6640 1320 
6711 2316 6640 2717 6324 1240 6314 1717 6313 7240 6325 1315 6705 1722 6240 7706 
6722 4640 6705 1301 6240 2710 6301 2704 4322 6656 4212 6703 6212 5611 5661 6640 
6240 2731 5301 0322 5657 0640 4260 5215 5611 2313 5240 0275 6315 2317 6250 2731 
5301 6322 5640 0261 5251 5640 4240 6661 6212 5611 5663 6640 6240 7715 6304 5650 
5261 0254 5261 4660 5240 0253 4261 5215 5611 0713 5240 0275 5313 0261 5657 0640 
4260 5215 5611 1313 5240 0275 6315 2317 5650 0713 5654 0640 5260 0251 5653 0640 
4215 4612 5313 0261 6275 5640 5261 7640 5640 0261 5240 0253 4261 5215 6611 1327 
6311 2724 6250 7325 5311 6324 5640 0263 4251 5215 4215 4612 5304 0317 6277 7240 
5240 0275 5261 0254 4265 5215 5211 0240 5640 0716 5240 0275 6316 6725 6323 3705 
5250 6316 5640 0713 4251 5215 5211 0240 5640 1316 5240 0275 6316 6725 6323 3705 
5250 6316 5640 1313 4251 5215 5211 0240 5640 1716 5240 0275 6316 6725 6323 3705 
5250 6316 5640 1713 4251 5215 5211 0240 5640 2316 5240 0275 6316 6725 6323 3705 
5250 6316 5640 2313 4251 5215 5211 0240 6640 1327 6311 2724 6250 7325 5311 6324 
5640 0264 6251 4714 6316 2723 6307 7250 5261 6251 6240 4714 6316 2723 6307 7250 
5262 6251 6240 4714 6316 2723 6307 7250 5263 6251 6240 4714 6316 2723 6307 7250 
4264 6651 6212 2611 6316 2304 4317 5215 6215 1612 6215 1612 5255 0255 6640 1320 
6711 2316 5640 1261 6240 7715 6316 4324 6323 7640 6706 1240 6705 2721 6705 2323 
5305 0304 6331 0705 4322 6656 4212 6703 6612 3611 6722 2311 6705 2650 6716 2311 
5654 2640 4260 6651 4212 5215 6211 7704 5240 0277 5712 6640 5240 6262 5640 1661 
5654 1640 4215 4612 5240 0240 6327 4722 5324 4305 6325 4716 5324 0254 5266 4660 
4215 4612 5240 0240 5316 0261 6275 5240 5240 0255 4261 5215 5211 0240 5640 1316 
5240 0275 5312 5640 4240 6661 5212 0211 6640 3640 6722 2311 6705 2650 6716 2311 
5654 3640 6260 6651 6717 2316 5710 0650 6254 7240 5261 6251 6240 7715 6316 4324 
5250 6262 5640 0716 5251 0254 6315 7317 5324 4310 5261 0254 5312 6251 4240 5215 
5240 0240 5240 2240 5240 0240 6240 6640 6717 2316 5710 1250 6254 5240 5251 0254 
6315 7317 5324 4310 5261 0254 5316 4662 6254 6640 6717 2316 5710 1250 6254 7240 
4262 6651 5212 0211 6240 2240 5717 7640 5240 0314 5675 0640 5654 2240 5262 0254 
4267 5215 5211 0240 5240 0240 5640 0716 5240 0275 5314 5640 4240 6666 5212 0211 
5240 0240 6640 3640 6722 2311 6705 2650 6716 2311 5654 0270 5251 4240 6704 4701 
5250 6315 5312 6251 5715 6640 5240 6314 5316 4661 6254 2250 5301 4331 6315 5254 
5240 0253 5261 6251 5715 6640 5240 6314 5316 4661 4254 5215 5240 0240 5240 2240 
5240 0240 5240 0240 6240 2250 5301 4331 5315 0254 5312 5640 5240 4662 6254 6640 
5240 0275 5314 0254 5316 4661 4215 4612 5240 0240 6305 2316 4304 6717 6212 2611 
6316 2304 4317 5215 4303 5215 5303 6655 6640 0240 6322 7311 6324 6640 6717 2316 
6310 1240 6305 7706 5322 0305 6301 2316 6240 3301 6724 1305 6240 2731 5301 7322 
6215 1612 4215 4612 6327 4722 5324 4305 6325 4716 5324 0254 5266 4660 4215 4612 
5716 6640 6240 2731 5301 0322 5653 0640 4215 4612 6327 4722 5324 4305 6325 4716 
5324 0254 5271 4660 6315 7317 5324 4310 5261 0254 5261 4662 6254 6640 6717 2316 
5710 1250 5654 0640 5262 6251 6240 0714 6723 4724 6705 1301 4254 6640 5212 0240 
5240 0240 5244 0240 6315 7317 5324 4310 5261 0254 5261 6251 6240 7715 6316 4324 
5250 6262 5240 4661 6254 7240 4215 4612 5304 0317 6277 6240 5240 0275 5261 0254 
5264 6262 4240 6667 5212 0211 6240 7240 5661 6640 5240 0314 5653 3240 4215 4612 
5240 0240 6327 4722 5324 4305 6325 4716 5324 0254 5661 0260 6251 2250 5301 4331 
5315 0254 5261 6251 5240 0315 6275 6240 6254 7240 5261 6251 6240 2250 5301 4331 
5315 0254 5261 4664 6254 6640 5240 0275 5314 0254 5316 4661 4215 4612 6305 2316 
4304 6717 6612 3611 6722 2311 6705 2650 6716 2311 5654 3240 4260 6651 6612 3611 
6722 2311 6705 2650 6716 2311 5654 2640 4260 6651 6212 2611 6716 3704 6310 6311 
4305 5215 5615 0612 6260 3211 6317 6722 5301 4324 6247 7311 6720 2325 6240 2731 
5301 3722 4251 5215 4262 4660 6706 1317 6715 2301 5650 2311 4251 5215 4263 4660 
6706 1317 6715 2301 5650 0647 5247 7654 5257 7657 4251 5215 4264 4660 6706 1317 
6715 2301 5650 0262 5730 2254 6650 4263 5654 2301 4251 6651 5612 0271 6211 7706 
6322 0715 5324 3650 5240 3643 6654 4266 6254 0662 6265 4654 5665 4254 5330 3654 
5243 6247 5270 6330 5247 3643 6654 4266 6254 0662 6265 4654 5665 4254 5330 3654 
5243 6247 4257 6654 5212 0240 5240 0240 5261 3640 5240 3643 6654 4262 5654 3262 
5250 6647 5247 6251 5247 1640 5647 4254 5330 3654 5243 6247 5262 6330 5262 4266 
5247 3655 5251 3654 5240 3643 5254 6257 5215 0212 5240 0240 5240 0262 5247 1640 
5240 0240 5323 0240 5240 0315 6640 2240 5240 0240 5327 0240 5240 0324 6240 3240 
5240 0240 5323 1640 5647 4254 5330 3654 5243 6247 5263 6330 5215 0212 5240 0240 
5240 0263 5247 0323 6240 6640 5240 0240 5324 0240 5240 0327 6640 2240 5240 0240 
5306 0240 5240 0323 5243 4647 5615 0612 4260 4660 6706 1317 6715 2301 5250 0247 
5243 6247 5667 1250 6330 0654 5262 6251 5247 1640 5647 4254 5330 3654 5243 6247 
5667 1250 6330 0654 5262 6251 5247 1640 4247 6651 5612 0266 6211 7706 6322 0715 
5724 0650 5730 3654 5260 3650 5243 4647 4251 5215 4267 4660 6706 1317 6715 2301 
6650 4261 5254 4263 5247 3643 6654 4266 6254 0662 5665 3254 5330 6251 5247 3643 
5254 6257 5261 6330 5263 3650 5243 3640 5654 0262 5250 6647 5247 6251 5261 4730 
5254 1647 4247 6654 5212 0240 5240 0240 5261 7640 6654 4261 5254 4263 5247 0243 
5240 0323 5240 0315 5240 0324 5240 0327 5240 0324 5240 0306 5240 0323 5247 6251 
5247 3643 4251 5215 4270 4660 6706 1317 6715 2301 5250 4263 5247 1640 5647 3654 
6650 4261 5654 1301 5251 6251 5247 1640 4247 6651 5612 0265 6211 7706 6322 0715 
5324 7650 4257 6651 6212 2611 4316 6704 4612 5214 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 



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