File XLIB8.RL (Fortran library or relocatable file)

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

WRITE C>READ  C>IOH   C>GENIO C<OPEN  C<ERROR C<EXIT  C<CKIO  C<FIXIO C<FSB   C:FAD   C:ABS   C:ISTO  C:STO   C:FIX   C:IFIX  C:FMP   C:FDV   C:FLOAT C:FLOT  C:IFAD  C:CHS   C:OPENI C8OPENO C8CLOSB C8CLOSE C8IOHST C8READB C8WRITB C8RESET C8ALOG  C6EXP   C
IFPOW C6FFPOW C6TAN   C4COS   C4SIN   C4ATAN  C2MPY   C0DIV   C0IREM  C0IABS  C0IRDSW C0CLEAR C0SUBSC C0FIPOW C.IIPOW C.SQRT  C,CHAIN C*CHRIO C(SUBS^ C&KEY   C$.0ORSR["O""NO"S"C<> +WK$>($/RB$BB"B!B B
D]D[DYFVFSJNNHT^> 70HA3ESA> B 4AKW3IWTB G03IO* B 30TA3R?RSRB BA\VA?0DD>L(HDDNJ*! ONKX+>,FBJL+=0FXH[!DE\P*+CUPBNCR.".E\KB((403W	R+TCEG DNTF2+>A0GFZ)*L4BF"$.,FHZGNNN PG(NN8J(HDFTB2">A,GHZ+LHF;\*A0FGK:?P$GXH BOOI7HL03RGE+DB G4LBFJ-+T8FJ>0BHD(0BD:,5H0BF8G\CO(
C*(NN8J<J A\.AC]HP%PO8<AW=<19PABMS;HQEGPAPAAF$S??8IQ<,KQQDOGR5	POQ<]SWLQDOGX4.$OQ<C DQDD TE\G	=K<NFN
?=,B?:>($IJB<$II+8>$IIK?K7 OJJ?6TEI+4>$LIJRA+BNB[,,E\C
23BHDI;<0!HGNKV3, OJN;2(FC[B+J$39HEJ;
3$HBFSB,JIK1?*HGB;+D!LFTN2 >AHCO*(3]HDN^A3BHDN^ KBNF+,*.NB[B&E\C
&2J$;<XFJBPD)20PAAA6\	]APOGY=: OAA=;
/5APPF)5?4P30PA+ICV> B 4AKI+ECM" AAI	??>4CG
?+=NFJ[+<\JB	;?:<CO;(?$$BIO:S? ON !P[U E\BA>* BI:[Y < BI+:"NI	?	>,FC?=)NA\NAK7DNB!=?S4CO)KODNIK6?5(IC?=1( JNX ^\4BN\ />8JB	8	:0DO(HDE\E+>"<E\C;=! ONJY=OIS6*[JJ:I> BI+:B1A\NAS4OK[3"\ OIK:	%0DJ;Z>PCO.(?S$BI/:KSAAC5<.]APQE&O8AAC9<--APDE?<,O30LA3LGE?RB 0A7F+P
 B G03S?T* B 30XA7LSO> B 0AGF+DB B G07ISS+OB AB % OC;?0 8FFK[] NX KLNA\^A>ND?N,H\JI	=K<RDOKR82OR<MCU4RDOKS<K,OR6 <PFMP[! E\BAG5,HU 1I>AHPBM[) XH[!KE\PS2K4JD/L2
,FJ:M2 4FD+L^<4BOHHKKNI3;>I(CO((HE\EK>9$LGS:7M4JKC8HNA\VA7>0JF+KGY,HU 1H>ATPD+K7U4JI;P[1 A\BA=>\KH36 OTJ3->ATCB?4;4JCC32E\C/5
"IBPH I4TOAB=6\?]BPQJ A9HABA:\P=B<QA&0AWG3N?I> )APRFP%4REBI3>)1PRJ))5(REAI5^+EAPRF,-8HREK:
F5BPRKL><IA\NA+> OJJH	=HJ"LNJ&??0ID"+"P,J$+;(FB>+*(DJBJ*+:OJJ!J)NF:)< $CG+9*&(BIO8G7,HA XM"+E\KBP,HHB=?>(XIKB, E\C?>2 DJNJ+FOJ"=/L\JTF3F>A$GKJ2	5HB4.PHKP?F4BT332A0K82XBO* 7H NA\NAG7,HA M?2DBO((?GDBO((?GBO)H;M<BOI;.4BPJKI[-AB?.; =BPOK?0(OAB?1?3IBPI?O3<AB?4
JUBPOKM+7DPEBK8=")BPOH$7<4PABC=< 9B<PB+0A[I+ACD> 9APSHQ><SEAO4=O5APSIPW;<SAC<<IK>P[9 A\BA1><FF3P>I4CO((SMOJJR3<<DG;="$LCK=3;OJ"^P[! E\BA75DJ"RGQ,HU 1I>AHPB3:>I4GA\NA?9 BOJ(KPDNB==INI7P[- E\BA72DHLNIC=PNO+H?I4CN]H?=XCN\H?6TCN\H?54CO4?=LBG+="5$LCC=?24GA\.AB
$LCK=3; OH<%4HDKN	$+7NB[P7PHJHS1 OBK0/E\E;.84BO\(;.0BPKO
!,(AC=-Y6=CPN Q0AC=1
 ICPLGA3 AC=4
<UCPLRE6DAC=8
:%CPPN)A:PDAC-;
41CPHLE=ECI><YBPSF?SEO9^1BPSF,)>0SEAO6GAC [] D*+"H8DXH \C<BB**2Z$OLCOH2M?I+HB B \<& 4JNZ "+4BF:U 8CFQ>"N8CTF1?"AKD:NOX\HSFMPGXNNXT:* NA8G !8DJBRX3FXBB;?=8BO(X+0DTN2*A0CD>,0(DJB?F2(JD*,25XFA\NA*,0FB/FB,80!XFH3,>I4CFLUG<PFCC;G:LFB\S;;0HH3,>I4CB\UC=PNCK<<T0G
LDG;LBGO;S; NNJ?:$BIS83F(JKCG $LC;==D4GC;<<D0GC;;<D,GPKO,	8RACC9<0)CPLOG;ACC<<Q5CPLRC>(AC??CFG07F[D* B EAQ9<=BPTD[I<DTECQ?\	]CPTI]U;4TEAS3A(ADH\S4FA\NAK? OK&	>HPDOK(:0O<C1OC7< OR>K+:HQDOG;>A<OT1$HPT0>A4EK^[?KHHS OTN2A*ADK ^[<BO&(?<,COR *	\KIK:I=DNF"!2	HJH
SDG OJ:=J(NNJ?9 ID*!.6JI[77]LHB?]0X4JN8AFXNN<FH\CB
6(GDDJ+BB0BY>
[4BB:!]H<BF8G4LKX:!PJXH[!OE\PS5:!JA\.A]NA\NAK5NF*!?0PBIS8:!8JI+:^CQDPP*Y5XQAD=6
 ]DPRSL%8RADA9\?)DPSR);,PEDI<^,5DPQP
)>0SEDA?^)!BPTRH,PDTES?
MAPTS): BOHH*]FB9=$ ,FNX KNA\^AG?LFD>[(HTJI	>	=0TDOS 6MTOT>MS(TDBMFHTPSPNN=DPBPNBXT S4JBPS?0KA\VAK?DNH7A>\GN&?;(KI+96BTHO)J8DNE?P[U E\BAF*LFXH[<FP 3!DB<S,  JTB1=>A GB9=0 BB	7G6TDC<U)H8JB	5348JHF?TFB[3E\G?\78TC0G6ATKT0FATGNH DUTFK;!FHTPSXNB8SDDPBTF0S:A$KAD
3?<QDPRRPO5EDG6?S]DPPD[8XQEDS9<	)DPTPC;SEDK<=O5DPSR,3>0REDO?AO9DPUPDL\UECU.<	%BPUT	<<IK	>G=LFBS?<,IEK:PS NN9HIHOJ:C=G(CNH!9=OC?:HLJTK39>A CO*(*\BNH 9= OJJ?7XIJ"[2TKGEEI6^P]EPT )8,PEEQ9
F)EPTW9;DTAEA<\G5EPTWU!>TEEQ?(	:I^> 30<A3P;E> B 0AWG3N?IB G03E	X+TB 30TA3R?R?RB 0A/C+ICO" AHOUOHA00^C3E	NCOB GFHGPGPNN9F FNXAAM\BN8FFPNJ&\$FB2Q<\<BO2(YNXH[$C4KDCZPC!0\NA\FA>DLON(?X4N=J68PJCCX?<,BF>< BE\I+Y?T(BO((7L\DJKIK9 OJKO?8\BA\.A*-NF+W"<DLNG&?XXBGSX"
E\K>-??<OK0$QPJB0G VNXH B$LJ2T4N<JAC6<B]PBJG8(A?9?&)POA6;HLAC<<85PDB
?4O30LA3LGESRB B,PQEF+(D)PQDB)PQEF((DQPQKB,QEF"(KEPQKB ,QEF	%^5PQE-B$G?KTL2BNA4IJ+N? 8K3=BB\BT3>NA8IJ+N? 4KOGGQN<B01<V3P;EB B GN2 ,&XML0VDL(LXH[<F0BG;;> (GNXA!MDLBIMP?8FC=N,(DJF]NQN8DGQNQM4BB?9+HXJB8\<A GB
7/6<BG5 E Q=BBHDC[4?LLCFMP[Q E\FAQJ8EBCEBIMP?8FLNAIN OJ[^5N N<GT((NA=N:(DJJK
C2DNNHA1E\GK00GOBO/?0GXH[!DE\P"A>4KAAE/^AAPPFAQ1<BAAA2\DMAPD[I44AAE5] YAPAE^97KAAE8]]%APOG7A< OEAA=

9APG?5;4QAAVUUTEHCTHDNRCRDHEL 8ODDG"B417EKR+OCRG OBZMBRNCZN"Z8DNN0BN FD:N4$FC8HDD OD;Y!HHFCXHBC CFNR$H(FBZL?Z<IA\NACZ(NN8J<J8IC	Z7>(DJJ+BR(NN J?M4BFKZBZXNNXD&Z(BHSM/Z,JB[<<G,IN	&7;$BO/(K:HA DPNJK>V8ILKGM7SE+ICTB \ [U L.C6O$13C	K+OB GHDLJ?[4H4JXH EBRA"DDR"
DR>JN=$PDNFJF$LJ["AE\PKG!	:(PEAG;<1APFM?=0OEAK?<9APRI.O(HB4 OJZW"C$LCK?+>OJR37F0HR=3DNL.C*>OJN3C=DNF3P"BE\I+QBF(W.3$CO9(. $GBZ64O,BTF0NBA<CO((".FC^(NXJDHK\=MHOL.C">DFA\.ANXRDQFB6C$QDQFRJZXRR?0 QL&JDH<I+NA\.ADHDRAIAGD	V DBF \OKXFARAS(NA\NA7\0DF8OB 8FCS\;\8
A\NA ODLGPN;.\JKC\<0O,(?;(BK<G:,HA ,B
.)BPJ -;TQABA<\?5BPHC]>$AB=?^	)APRBC>PREJ%"GABA?OC?AQJMJD(NO+X6QPHFKT?T<IB/T>XCO* "VLDJ&*=DBF^B6FPHB?<,(0JB?;((<JB?:((4JB?90($JB8		(JCRB>B8KH+!:VDHB
7"BHDB
6"BHBNH "ALFBZA"B\JBZA8GDHIK=HGDNB>B&((JC$GC?\DJKJBDNB>A&((JNJ "BHFNAE>DTK$748JI33 \B?;>(HKL^68BKCT<\BIK??6<IKC! HGB:B !TBO/H	HCIS?:B\KEBC2>ZMBPQK!+44PABC6>J]BPJM?8<AB?9>V)BPOK8?;4OAB?<=69BPPK
C5SEBO= JEBPSHYZE$SEBO?],=APSM,(OJJG:M0HB"K?,<BB>?,4K8& TBTF0HBA CN< ((KH+,FNXSB-B>L(!K-XLO28Y0KB30<\0BO* ?2,IPJO19;DQACA<]-5CPRNZ5>0AC=?B,G07FI+ICOEN
VAC03Z3I	XCOB NJ BA\FBZBGHOCG??<BO((2QOJ"  ] H?G%\JN\!><JNJQE\GK=<\0GB
J;<JDHN5F24QDPJU
XPSDRC]>XQSA1,THDSF3XY<SDQO[A-L0Z &<J 3GXN9D0F(FA\NA.5TDO,(B5\FCG3:(BG(GN;<H2(FOLB"ADDFOQ"ADDF?J0B(CA\.A?G<OM.1C9\BD+U?! BN=H8 TJNJF/7XMNJ<GXBO:(4 TFTB3V>ATGPKO474<PECG5?]YCPMM67(AC78=P%CPPNTC:\NECO;<U1CPSLPC=8SECK>>D=C O"B4^> 30XA+ACD> B 4AOF+BB B G07FCM
 B 30XA+DCV> B 4ASS+OB B G03F?L+TB 30XA3LGO?TB 0A	F+XB B G03I	F+XB 30$A3FSA> B 4AOI+TCOB G07AOB* B 30LA+HCSR B BL6EOF+BB B H"E8FBZF6O NDJBP"N803FSA* B D TFBZNBSNCROBO\FNN "O<DFHH"ME\G3?>I8CO*(WHIJKU XTBFHXHW OJ:;D!$BO)";TFB8SEHLFB8TDHPFB8UDHTFD*E2/LJNX FE
BF(WADID*EGXBO+;HXNIJD0X OI&DFBO+;RXNI:DGXXFA\^A=LIJK%8G<FH?.  TB3->I8GH3.>I0GH3.>I,GNZ -TFNKV:N,FN,>O<O8 CLKC.32KA+SB B PH28FB[3:O NF+->P-PRG<DAC> PIPQNTQEG=!EMPQEFBXGBCNC HF\LFB<W  DFHYDV FCXHT CF0U>I<CHZ\0PTFLNIG>DFC[= RKX*)$BN8H<J0F8W+X$FHV>),KB\B8RED
FB8QDDDFB8PDDFKB*PNBHRDUHFNJDDQPBF8QFDBBXS,PTKH<P(BO+H3NLID(W3GTBO*(GXHDJSX4Q JDXP3E\JB<W=(DJF8WG&BO+ +(HN* GX\BN9DPF OKKDDPXBL^IG?DBGK><R4GK;FFHFF(Q
*)APOG8A;\AAA<
?5APDRE>DAAA?PG07EKR+OCRMAF6OI+TCOB PH"PFNL"ADDFNNBA\FBZ"XDBF:Y\CDXG*NCXG HBF*7& 13S?T* B D$ BF:\$$CDZY*7NCZY H$LC?"6$LGO?/>XHL^I?>4CH26>I4GD:Y	V BF:4$$K8 GK&6JIF01Z<+ICXB B DLNI??0IF0P>I8CFHQ<W,BO)?+(BF$TG9PDJKKVPNB<QHXDNF0V>I<GG
>G=XBXH 4H,13I	F+XB D4,BFK;\PFXH[!J$LH/[0FNKV/\4FJ">P[9 E\FA:: NPJGS?:4OAA?;=41APQD\G=HAAC><Q=APHPLTQQDQIF;LRHH0H7F+PB B PH"GXGBZHBNNCRIBI\FNN "I$DF$H&C4JBHVDXXFBHW<Y<BFHWDP FBXQDYHBFXZ<P8BF&NFA BNXHDX$BNXHDY(BNXHDZ OIR*N JI"D M ITINZ,27F[D* B D TBGJF2;DF
L.<0DF8G. 0CDZ< HLIJK2DV BFHVHYDNBHWG=\FFHZ3<DFNCXDSBO+H\HIIJZPNFHZYPNFHYXPNF$X3;DDJKVDXFBXYDQ(BF$RJDHA  DP[9 E\JA89 NL^I?:JABA:\P-BPQH*9<LOABA=]?9BPOK%]?<OEBHB"QPRJ0A8REAK9SNMAPRCN2A8REBHF?(=PRG(9D$RABB<<BF:Q	&HFA\NAJQNO8X%ADGNJ0&QDFD*R"EK$L23F?L+ACTD$LB
:W$PCDZT&"PCDZT$GLBFJ%*TXFNL(G\J02Z%7LSOB B DN=MHDNFXQDPHFNXH<V8BTF0W>A4GI< Y 02&63FSAB B DBZ6B:NCR727HFNN .7\DF8H CF8GB  CFHH"6E\GK;>7(GKC9DBNYHDPDBNXHDQHBNXH RPNA\^A3=8KKGV6L827COH* B D $LC?8< \BL^IK8HA M NA\NA7(8FDO(7(<FXH[!NE\R;\;(PJAB7<!BPHP	9,PEBC:>
-BPPJNS<XQEBG==E9BPJOG?TBFBU^> 30<A3P;E?IB 4ACO3E?NB G03C?L+SCE30LA7LOO?BB 0AWR3AKDB G03W	R+TCB70HA3EWS?TB 0A?I7HSS" A00>3P;ECIB I+?=O8KIC=BH00>H3P;ECOB IO??O8KIC=CPD00NP7LOOCBB IO??O0KLJB\2V3C3OWSB $3?<CKK<; FC=O>((KNG[ANPNO((	X OJ:<S <CO*(C BO*("4 BTL2B
A8IK/98 BO&(7DLCIO+6OJJ.S5<GTL2BNA8IK/98DLCYN&PB?44( JG9NSE8BFHOO8FCLNN<GTL2BNA0IK/98DLBBPS38GB/2?1IPI?3OAC4<OUPG?6(OAC;>Z)PQJO7HQEG?AEAAJEOARH13IO+SCT0THJ)ORI<CJ:JK HM DH0LWR3AKDB  SE<JK?"7HLA\&A<=8KTK3="A0GD:L(\J41\\7RSICBB HOE?O<KH"72HLI,>?>4KLNA=O0BOT
AODNO* 3BTNG)OCBBZ2&70FJB	P<CO.(;; HH;2$ 0FHK(	3\FD.\"7(J83&TBFO(EFDOE(HFDO((LFBZB;) HH[2MM<BBYM!NDLC=N0(TKF9NSA8BFIOYMOB?:3(TKD/ECEOLB>CLFDNC"C0FTD2C:A KT0"A0CD:L E\PKG2=:\GAA=<C;G07EKR+OCREAE>>3%PQB3/1LQEAE;?C9PQGM1?8QEG<
P5APQCR78HQEG=^AAX>R<II[>&SLBK=?=0BC="SDLGPO"RLJA\.ABH41JR3EWSCTB I+;-OXJI3?6A,NA=N.(LJI3>JA OJ>,-H$J;:AJ NFNR=N$B2RRA8GBJQAN<FC8O!<GN3ARA<GK	8??\BJ;V(AOJJ6RQ8BF\OO<GN/G76 NA\FAK5 ON1ZRA8AO*(7SDJI	???<IB;4ADNA\NA?5LA\^AG5,HU 1IBAQOBIBINC]<FN$:XNH: HC3^RA8
TL2BNA0IJ*37R8DC+^>*MAPGG?C4PEAG5<YAPPGE	7TDEAG8<J%APCG?C:LEAG;=E1APHD 7=<GEAG>=2=A Q)(A6^> 30$A3F?P?WB 0A[F7P
OB G07ECX* B 30DA3L
O> B 4ASS+OB B G03FSA* B 30XA+MCP> B 0A[I+ACDB G03FKS* B 30XA7LSOR B B8 !FXH[!EE\POI"ADDF"NP[Y E\BAFY,HU 1G2A$PD*"VDKBJN>(JCP4E"DCCU%UUTECVUUUTECCDCC,DLK	NB<XBC	$O(,LKG.^^HCW5GVLLK/7YALGCS=
08LK??C7DLD<GK?DNDPL4 XJC-29ML7GD03A?L+GB D4DBFKY7R(FXH[!H$LP7RHDLNI[= OKC<?;(BFOY?=$B
8G=,HU 1I*A PB7*A,PXH[!EE\PKLGY,HA (J??]PHC8 DAC9<G)PKC8?; GAC=<P9PCC?N30TA3R?R?RB 0A	F+XB B G07FCI+OCWEG<JAAXH[!GE\PFP[Y E\BAKLHA  DP[- E\BAWO ILDD 4PE+PB B PH&P(FBZQ&[DDD"QP[! LBI8 NLFI?>4BOOS<NB?;6X JC?>< (BG>P[U E\BAGL,HU 1F2A0PXH[PLON\A?9$CN ![) XH[!
E\PKL?8\IP"YP[Y E\BAF(,HU 1E2A0PXH[!FE\PCP[5 E\BAGQ,HU 1G2A0PXH DC,HU 1KBA8QLNI3>ON](?>0GG6 M 01%%3F?PCWB DXH[8JTBFK0?&DFJ	2FL\D01Y03F?PCWB DDHD7A0\CPJG?E6HEAA7^A!APDE59DPAAA:\ -APGEGE<DAA-=
C9APDPA?N30LA3LGESRF *FA\VAO?\HQM0(GDFA\VAO?\HQN (G OJ2,>I8CO)H*2OJ"V I XH[!EE\PIP[Q E\BAGI,HA 1GBIXH[!EE\PIP[M E\BAKIHA  B[9 B3=>I8GJJ*<$LG>P[- E\FA%.XJAA<<5APDDLG>EAG?]1FE^> 70LA+ICN> B 0A?C+SB B G03T;A* B 30XA+ACD> B 4AOF+BB B G07COH* B 70LA+TCO> B 0AS
+VB " A,(>XFEMU50LJ-8B&XHLVSTPDD,5W5TEEQULP N\DNST F\DNOT?TXMCL CE,OEO!	^8DEOPS&<MFLSS40DL"W=TECQOLL21GT+NB B TXN\HPN10GFD"2,7DPCXG/AHDXH[!D$L0>I8CO+HGM,HU 1E&A$PD:0HJXH[!DE\P:Y" BF2>I8CO+HMBN<J;HJXH[DF,HU 1D&A$PB=	80PNJ B(NO*XG5,HU 1G"ADPB3<>I8GXH[!HE\P"
 M HDNF+7??1PDLC=\AC><P=<N0A7F+PB B AAXH[!GE\P"AP[Q E\BAFA,HU 1I"ADPXH[!GE\Q 0<2 PCTG	? FXH[!DE\TP2D>A8EJ")P[% E\BA>A4CN<J*PXJXH[LFHHP/8DG,HU 1INAQBJX	<PJ01L3+OCSB B EBZ3.;PBF:<.A4J41L;+ICNB B EA\^AO=\HQL;0G,FD"<L7,QCXG/L0DXH[!D$L0>I,CO+HGX,HU 1E&AXPE;=04
XH[!DE\P:V> 4CG3=>I,CO+HXE\C;=0JOJ.[Y XH[!DE\PJV?:<IP"D E AAA:\F-APDPA<LEAA=^9APPG7=? PBICN^> 30DA3T;A> B 0A[I+ACDB G03FSA* B 30LA+HCS> B 4ASS+OB B G07F[D* B 30XA+MCPR B "03AGT+NB H BFJJ"A,FDRAFA,HA 1BBIN1>I8CO((SZ OB
=C> NFO1?>0BO+H6\0HNZ "K$LCK>3; OJ"/P[M A\BA<8BH\[Q XH[!CE\86 0FXH[!EE\PK2:(FBZ-.>8DDR>F>,HU 1CBAH++(DJ"8G+,HU 1C>AHPD+\GN,HU 1CBAD*KGV,HA  DP[M A\BA<DBLNI?>8GXH AB[9FJ,HU 1E>AHPB2J>I8GXH[!FE\P/2C\XH[!GE\P/2C+PJC?C90DA?:?<-PLD?<PKA=<9PPC?NEGM4UPQCB>XQEF-(
UPQDFPDCPEBN8DD:GCU8DN;Y::8CA$2=2PKH^Q<CXCF5!>:4KEQU	
"M^> 30$A3R7E> B 0AGI+BCSB G07D[I* B 304A+PCY> B 4AKI7D
SB G03CWL+ACR70LA7UOBSCB B X07M	P* B D DFBZFBKNCRG&GHFCRG*G$FNL&)\HXH DFJ)?LFNYD"DBNYDFA OBJ)"LDJ.[BWITI*Z$07D[I* B DPOJR/JBDNFZA*C$BF:3((CDZ**:(CDZ*BFNC>F((XKO)BHDN8!!DLDO)SB NFJDJDDNFJFJCNFJC"CTFFJ"AXBD>C8HLJN=PQHNFJABPNFJRAPNO(PRPBJ;S"HBN8H"HFB>HXDNXH 
C403IWR+MB D NDS..TDB>A!HPBO8H!HTDJ7 E A??C4G07EKR+OCREF&XAA01$7AOBB B DBZBDNCRA"A,FCRA&ADFNLRQ ON ! I 01$Q7RODCWB DORD&RHDXH DE,HU 1H*A\PN( M 01L
3LGECRB DF2Q>I<GG
>	=DBXH FDNAH13SKU+SCCD,FB>0IHNG:1/$LBFHH.28FNL<H0O*(CH CFO[(H(FNX B/ CFO
(H$FCXHB+ CFJ,:2LFCXHB- BNXA*3<DJ;
B NC>*< LINL>),BF:.(,BGR-.-BOKHR.PNBJ.*,4GNKV>2DFN,&3\PAA=;
?1APFE=HAAA>\Q=A HPCY^> 30$A3I?P?WB 0A	F7P
OB G03S?T* B 30XA+DCV> B 4ACM+YB B G07FCM* B 30XA+ACDR B "07FCI+OCWA BFJS&APFXH[!CE\P*KBWL2S	I7P
OB DXBKDNFJR&S(FNL*TDFDNT&TDFD:T$DCN=MHDNFJQ*K OB>R> (JB>R, HJB3?>I8GF>N0PHJB>R> (JXH[!DE\P"KP[M E\BARKNJJ/JQ OJ;9%HDFO(PQ8BO((G^,HU 1E"A,PFJN*Q OJK9*R OJKFK,HU 1E"A,PF*KGB,HU 1F"A,PJPP[M E\BAFN,HU 1G"A,PXH[!FE\P"KP[M E\BAFK,HU 1G"A8PF*NB8BXH <A9PPC?0DBDA
^> 70LA7QSR> B 0AGF+DB B G03S?T* B 30TA3R?R?RB 0ASF+VB " A0	QPD40NI7QSRB B CDH7BI\CFRWNJ\HPNI$G FD"JP[I LBID,HU 1C"ALPXH[!BE\P2C>I<CO)F,,HU 1D"A\PN3(>I<AO( J0HA 8A=H8BL^I??4CN\H?=0CN\H?<<C?;>((BC
???$BF"FP[M E\BAF,HU 1B"ALPXH[!EE\P"P[I E\BA"$LCK??8<GD*FKBHQ A?8 OA?9?=)PBC;PAC<<R5PQC>PBAC?0P6N^> 30LA3H	A?NB 4AKE7RKOB G03C	K+OB AR3YDDVP[I E\BA2G LAAR2IC3A;IB H"I4FA\NA.J FD:J" (CFPNRJ4FLNAP?8FBK?AN<FB^ ODBG O.7\HHJ7BB<GB
>!NHLA\&A <LJJ2C>A4BG!N[M TL2BNA0IO<BBHOT0BA8CFHG<G0BC<?;0B0GBA<GPKB7K;HA
<?
5PFC>HAC?IF^> 30LA3H	R?OB 0AWG3N?I" A00N3H	RCOB H>/!H8JHB](<HF"L&((JN !B]HH:/.$BF"VB(HOK?>4GN" E H?=0N9HJ(NA\NA&]4DF.KB]BBL;,BXH[(B KH.HFOLB.A$FDNA"A4FD>A B4CA\.A>/-PC?C<\A?=??9PB
?<BHAI^> 70LA7UOB?^B 4AKE7RKO" AP+U40NO7UOBC^B FJGRG ONX :IPNBZP H<BF:[<<CFNL<H8O*(B	 CFN; HDFNZ BF CFOU HFCXHBB CFJC6O4FCXHBD BNXA"PTFD*F?TNNLRA OJ?24(LJFJK=(FO)XS2PNFJHRIPNF>I X,BNI"H(DJ?D<XHJF:EC0HOC>=HHJB>E<XHJF:E HBGRD"DTBNI0&L OJK22G OB:E!DTBB^C6DXN
ZOC0NK:PF,HU 1B"A4PA?=?49PBC?\BNAA^> 30,A+ECY> B 0A	F3X?IB G07CKH+ICO30TA7XSIR B BN?FWK$A00.G+ECYB B B[? G\BFJOB7 FL"HE\GPHBH\DJ:O?F8BF"CP[I E\BA2CXNNZ .C BFJ(*9$FXH["CE\P2CBIN;F" LFXH[!BE\P:CKFHA 8AGF,HE DB7A?>?== O7>K

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