File EXPI.FT (FORTRAN source file)

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

C*M+CB * B *.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.2MNJ2MNJ* B * B 6 N 7UKB7OSU3IWN6 EP7I"J7C*JCC* B * B 6 WP3R?PS7E*JCC* B * B * B 2 ?C7MWP7TOE2 T3EV 3X?P3N;E3TGI3L& 3NWT3GGR+L6 +EI*-	X2MNJ2MNJ* B * B 6 V 3

AE*M+CB * B * B * B 3C3A3LV 3X	P*(3X7ROE")*MC*M+CB * B * B 7DOE3C	R3P	T+OCN+OCF7PKA3AWM7TKES*M+CB * B * B * B +XB * B 2-F 7RWG3M;E3T> 3FV 3X?P3N;E3TGI3L& 3NWT3GGRL*M+CB * B * B * B 7ROE* B 6-J 7EWS+LCT3V3AU7E*JCC* B * B * B 6 WA+XB * B-7ROE7USL7ASN6 WA3X3
7IKA7YZ 7AWLE*MC*M+CB * B * B 3R7E3A/RS*M+CB * B * B * B 3X^ /TF *7B0*(CX+LCT.-^1*4B)7M	A2 GC3UWS2 ;U7DKE3F?L+W" 3OWV3R3F+O	W2MNJ* B * B * B 6 ^ 3IT2 T3EV 3X?P3N;E3TGI3LZ 3UON3T?IN*M+CB * B * B * B 7FKO* CX.=B 2 T7EJ 7EWS+LCT3V3A+UCE+ICS7SSE2 ?T. F-2.V7*3
8* B * B * B * B * B * B * B . B 2MNJ2MNJ* B * B 6 N 7UKB7OSU3IWN3SF +NCD3F;U3C	T+OCN3SKU3P?R3GGR+MCS7RGE7UKIE7D*JCC* B * B * B 2 ?NN7E"J7C*JCC* B * B 2 WM3T?HD*M+CB * B * B * B 3D[E3I	N3T?IN*M+CB * B * B * B 7ROE2=;I3T
E3R3A6(E+P6(+T>)+TB,3S7U3MSE6 [O+ECR3TZ 3R7O* CX+TCO3I[N3I	N+T	Y".*M+CB * B * B * B 3EGV3LGU3T?IN*M+CB * B * B * B 7TKH+ECE3D[I7FKE7ESN2 GR3T?I3N3A6 CA3P?R3X7I3A	T7OON6 KA7EV 3SSE2 ;I2 TE*M+CB * B * B * B 3R;A7GOE* B1+LCE+XB,3X2 +E6 29F +NCD*-B9+LCT3X2 +E
 63J 7ECS7ESC3IWV+L3Y2MNJ* B * B * B 2 F 2 ?P3L;Y3O	M+ACL7ACP7RO3IGM3T?I3N& 7SV 3SSE2 ;I. N-6 SL* CX+LCT"16."J7C*JCC* B * :.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.*.:.".*MC*M* B * B 3SKU7RWO3T;I3EV 3X	P*(3X7ROE6,WA
6)*JB * B 2 [I*(7X*1&..2F,",61*JB . F . 7Y*1>.X*M* B * B 7AU*=:1*-+Y*("(/YN+..^3.7V3.8CE6)&**+:2.0J5.1Z5+E&0**/Y.2^..0R927V9*-&1*/"(6(&("**M* B . F .1B..7V225V3.0V+..F7.6R9.3CE6)&**+:6.9V4.2&3+E&0**/Y.2V..9"328V8*0*)/YJ+..B7.9&4*67E"16)*JB * B 2 WR3SF=+U+
3YV*+XP*-	X*MBJ* B 6 J 7EWTR7N*JB . J 2 [I*(/X*3&..6Z,",63*JB . N 6 WA+X"=*("(*("(.7F..2R225V2*-*7/XF-..Z7.6R3*57E*6*)/XJ+..J9.8N4*37E*5*)/XJ-..N3.5^3*97E"4*M* B . F 6)"**+:1.6R6.1Z5/EN-6)"**-:1.0F4.5Z7/EJ-6)"**+:5.5V5.6J8/EJ-6)"**-:2.5B0.0F0/EF-6)"**MBJ*
B * .2.9&..9&929V9"-61*JB * B 2 WR+S6=.1^./E"3* B * B * B * B * B * B * B * B * B * B * B * B * B * B * B * B * B * B * B * B * B "0*M* B * B +IF/XR)*,25"4*M* B * B47ROE*=+X7AU2-3A+OG7AOB*(	X.)V-..^7.2V1*77E"1*M* B * B57RSE3U;R*MBJ* B 26& 7F"(*+:9*)28.8^,
MBJ* B 27F /U7X*16.*("(*(:5.1Z7.2V4/EJ-**/X.3B..6B123V7*0*)/XN+..R2.3Z6.5GE6)"**+:2.2R4.2R3+E&2"*7X*JB * B .1J+.."4.6&6.7KE*)"/*("(/XN+..&9.5Z1.1CE6)"**+:3.8N9.9R4+E&1**/X.2J..6"321V8*1*)X*M* B . J *+:1.8^0.8^3+E&2*MBJ* B 2 ^ 3O?T" 69*JB . " . 7Y*9>.X*M* 
 * B 7AU*=:1*-+Y*("(/Y^+..V6.9J8*47E*1*)/Y^-..^2.1F0*57E*1*)/YF-.."0.0&6.3CE*)"/*("(Y*M* B . F **:2.5"1.7B5+E.0.1F..2&222V7*1*)/YV+..J9.1B4.5CE6)&**-:8.6Z6.7J0+E&0**7Y.9^..2J421V6"06)*JB . & 2 WR3SF=+U+X7ECX6("-6)"/*MBJ* B 6 J 7EWTR7N*JB * B 2 ;ED*M"ZB"B"
"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B

Note: Lines longer than 256 characters were wrapped



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