File AB6.FT (FORTRAN source file)

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

2I	D3M;E3S?I3N& .(F1.,R1*82)3IWF.(J2*72)+LK.6F,*4&82,SL+AT*92)3IGZ*(&4"M&J7ISS/AF=.0B0"M&J7ISS/CF=*4.87ISSA*M6IOI/T7M*3.87ISSA*M2IGC+LCL3RGT+PE*16,7ISS/MF,.6"2*,	I"M&J3C3A7LJ 7TCA/EF(2,&-3SOT.,J227&,+F	E"M&J3C3A3L& 3OWP+N^(3RKK*12	2	KA/IN1*2&	"M&J3L;A3F&=
FE"96)2J&I3A[N2=[I/EF("06)2JRI/OF 20. 21&=3A[N.,R1"8*M2IWR+AD.4J,*0")3LGD3T.(2).,*=21"96).JB22I?F3RGM/T&(+I&4"M&J+LK21.,.16)3LGD/TF(")*M2I/L*(22+K&12=SL+AT*5>)"1602J2I/KN(.,GK2)2=7DSA*(&5.-B12*/L*(22+K&1"M&J+LK24.,.16)3LGD/T&(")*M"1&0+LK25.,.16)"0*M2I?D. 
220. .3F=*721.2^2"M&J+IF3IWF.(OK.)J+.0Z1.)N .0J,*020"360.JB32I?D. B6. 7M.1R,.MZJ20&I+ZA/M6)"0*M2I?D. B4. GK2=GL+N3F.1"4"M&J+IF+LK22.,*16)+K.3.1B6.)R .0V,.0R,"0*M"5&03IGZ2(/L*(23+K&12)&=+ZA+LK23.,*1&)"+612J2I/KV(.,GK.)F=.MRJ20NI7OSN7IWNE*M2I?D. B7. 7M.1R,"
&J+IF3IGZ*(	M.)^ .0^,.0","0*M"8&03W	R+TE.1F,*0&03IWF.(OK2)6,.MFJ"0&07FKO7MSA.(B1*(&/2,.	7UOR*:^ .,KA.,GI")*M6IKW3IWT*(21.1B1")*M.1B12I?F3RGM+T>(*/^/3N7A+EB:.	J,*03X6	WP7NSK/EF .3J.*:2	*23X6	KP3U[E7NSO3E6 +ICT"	6,.JFI2	WT3NWD+N
Z*/"5*	^-.)J,*13X*1"2*	^-.)J,/XJ,*2^(*-&	*/&/"M&J+DCO.1B2. GK2=GL+N3F.1"4"M&J+IF+LK25.,*1&). J1.0F,*220.1B3.MFJ"3&0+IF+LK23.,*16)+MB).1B2.,R1.0F,"260.JR160^I7RSI/EF(.,V1*0")3I.(22.,*12)/K62.2F,*12)+LK24.,"16).JV120ZI3O7R+AT21F0.2F,*03X+I>2")*M2I/L*(25+K&1
=60.JJ120NI7OSN7IWNE*M"7&03C;O3T;IU7E.JB220NI7OSN7IWNE*M2I;ED*MBLBZ

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