File ANWEIS.RL (Fortran library or relocatable file)

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

"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B.B+30DA3NWW?IB 0A	E3NWKB G03I/N+ICT30XA3AGT?LB 4AWS7B;S" A83FDOCFW!I807A
N+ECI0XNN;F3FXNN;F3FXNN;F3FXNN;F3FXNN;F3FXNN;F" $FXH["BE\TP2I>A8PNF [I E\BA>E\P;>+FNN0!>I4CO.(3<XNC?=3(<JCK=;;OJOO3=XBTF0GBA\CF,G0GXPPCRNOBH)%NLNI+:OK;9GF,HA 1CRIDAF:CFLBO* G%,HU 1D>A PNKFC7\FB60[U E\BA5E\P2C^IPB(??UPB36 AO7< !PA(S:AA?;?85PFA$C>DA;?G07GSE
SCY30TA3RWS?TB 4AWA7SKDB AAO(HNE\HL GE\G;>?F4BC?>* ,JNF[Y NF [] E\FA!<E\Q9;?F(BFHGG9,HU 3E^A QE\BA"C$LDBE4D%,HA 2BBIE\FA17XNK;6?FTBA\NA+>OJ;ZGF,HA 8FGF,HU 2G^A0QE\FA1;XNXH["BE\TQ14^A,QNKFC:\FB90[U E\FA!8E\P2C^IPBQ!Q [I LBI E\Q97GF,HA 8H?FLKNKF2E\C?>> DKNF
Y NF [I E\FA!0E\Q9/?F<JAAA/\FAAPD=2(OAAA4\OUAPOG;A7TAAA8\C%APGHI:CAAA;\A1APDH==$OEAA>^E=A<N4AWA3FSAB G03P;U+KCT30DA3U/S?EB 0AOS7OON" AAXH["BE\TP2C>A8QNKF=$LC?<> ,KNKF?:0GNKF9$LC?<: \JNF[Y NF [I E\FA8E\Q;8GF,HA 8HGF,HU 2I>A QE\FA37XNXH[!JE\Q
6G5,HU 2B"A$PE\FA3:XNXH[!KE\Q;6?FPBC?3*(NGK5?2LCO:(J NFLGK5N8G(  OJ;%?FDBLNI+<OJ;$GF,HA 8FGF,HA 8LGF,HU 1K>AQNFP[- E\FA36XNJ;M3FXNJ:P;F<BLNI+< OK+.;?=APOG6C0PAA?1?(IAPOG%3LPAA?4?&UAPPFIC6TAAC7<F!APDA?9$OAAC:<G1APAE?=TOAAC><C=A<N0AWF+HCLB G03P	L+SCTEAK.<G-
PRDLE1XREAI3\]YAPR^K9DRAB8GF,HU 1M^A8RN+F2KXNXH[0FXNN;FGF,HA 8NGF,HU 1K^A4RN+F2\XNXH[!DE\R9<3FXNN;F?F,KN;F?F(BLNI+9OJ:;GF,HA 8FGF,HU 2G^A RE\JA1=XNXH["BE\TR1=^A4RN/F3;XNNKF7$LC?9> XKNF[Y NF [I E\JA!=E\R9=GF,HA 8HGF,HU 1J^ATRN8!HADNO: > PGNOF+4 OJ!P[Q E\JA
3XNXH[!KE\R95?FHBLNI+9 OK;1?F<JAB=2^6MBPJB!4 PABA5\E]BPOKAA8HABE9])BPOKKY<\ABA=\A9BPHDA?NEBI1^FYBPRJ[F,HU 1M>A8RN+F2JXNXH[0FXNNF [] E\JA=E\R;<GF,HU 2B>A0RE\JA3<XNK;;3FXNB3:>I$CO* 3-XNXH[0FXNXH["BE\TR3<>A0RNF[! NFP[) E\JAK8DNB;7(! ON^ G6,HU 1J>A RNH!K5DNO:
J NFLGK6N8G< PGNOFK4NO*(GR,HU 1D>ALRNKF2$LC?96(<JNFP[5 E\JA31XNJ;GF,HA 8F3FXNXH["GE\TR35>A0RN/F3;XNNKF?0<JAB?0>1EBPHH/24OABC3=.QBPPJHC5PEBC6>I]BPHBC8TABG9=)BPOKJC<DABC=<C9BPH4C?NAC ) OC?>. 8JNF[Y NF [I E\NA!=E\S9=GF,HA 8HGF,HU 1J^A0SN8!HADNO: > ,GNOF+; OJ
%P[Q E\NA1:XNXH[!KE\S9<?F$BLNI+> OJ:7GF,HU 1M^A SN+F2;XNXH[0FXNN/F37XNNKF6$LC?>6  JNF[Y NF [] E\NA!5E\S9=GF,HU 2B^A4SE\NA1=XNK;73FXNB34>I8CO. 33XNXH[0FXNN2 >I8CO*(G+,HU 1D^AHSNFP[M LFI=A<JACA2\BQCPOOCA5\AC=6^7!CPL619XOACA:^B-CPPNHA<TACA=\A9CPAMA?NAC"% OG;
FE\C?>" 0JXH[!DE\S;=?F0BFHGG;,HU 3E>A(SE\BA"C$LBA4L\HL GE\G;9?F BC?9*(\JXH[!DE\S;7?F0BFHGG;,HU 3E>AXSE\BA"C$LBA4L\HL GE\G;9?FTBC?9*(NGK4?3$CO:(J NFLGK4N8G< HGNOFK2NO*(GS,HU 1D>ADSNF [I E\BA"EE\S;0GF,HA 8F;F<BLNI+. OTN2 >APGB3-:I8CO:(J NF(G;?5CPOO0S.AAC?/?
ACPLE1<ECC2>HMCPOO>4$PAC?5?<YCPLC[7\AC?8?;%CPPNEC:HACC;?H1CPCL [= ECC>>C=C<N4ACN3U/NB ADH<%<H8CN HGNA\^A?>4BLNI+< ON:  \FA\NAK>N8G< ,GNOFK;NO*(F^,HU 1D^A(TNKF=$LC?<*(,JNFP[5 E\RA1:XNJ:/GF,HA 8F3FXNXH["BE\TT19^A$TNF[! NFP[) E\RA=88GXH["OE\TT17^A TNL!+>ON^ 
;XNC?;6(HJXH[!DE\T96GF,HU 1K^A TNKF5$LC?<:(\JNKF?40CO*(G&,HU 1D^ALTN;FGF,HA 8F?F<JADA3\7QDPOSG-5TOADA6^Q]DPPBA8TADA9\A)DPP3!; PADE<]5DPOS,!>$PAD9?\MCPTC3H\TAD" [I E\RA>E\T;>GF,HA 8HGF,HU 1J>A4TG< [= E\RA;E\T;=<!0CO: > (GNOF+: OJ""P[Q E\RA39XNXH[!KE\T;=GF,
U 1K>A4TNKF8$LC?7.($JNFP[5 E\RA36XNJ:=GF,HA 8F3FXNK;53FXNXH[!DE\T?4ZHXB33>I\CO* 3YXNXH[0FXNXH["BE\TT3>>A8TN/F35XNNKF2$LC?7: $JNF[Y NFP[- E\RA3>XNK;1GF,HU 1M>ATN+F??ADPPN32POAD?3?)QDPQO6XADG7=!DPOSF	9DEDC:>H-DPPB<$PADC=<E9DPPAC?N30LA7OONSTR S1UEWI1D)PUU
(NLNI+>OTN2 >A4GB3<>I8CO: " E\A
=?=,BLNI+>OTN2 >A4AGK=:$LC?>* NA\FA?=4GB39>I8CO: " E\A
=?= BLNI+>OTN2 >A4AGK=7$LC?>* NA\FA?=XGNOF+6 OJ"?P[Q E\VA15XNN/F4 OI	3$LC?>6 TJNF[Y NF [] E\VA!2E\U927F,JNFP[- E\VA12XNN/F4 O!(D[A NFP[) E\VA=14GXH["OE\TU10^ADUNL!?=<JAEA0\BEEPTEA2DAE=3
EUEPTM!6 PAE=7
C!EPOV7-9DOAE=:
J-EPOWA1<,OEEA=^I9EPAUA?NEWK*AEO: " E\G;>?F8CO*(FL,HU 1D>A4UNFP[- E\VA3<XNXH[!KE\U;;?F(BLNI+9OJ;GGF,HA 8FGF,HA 8PGF,HU 1J>A0UG8 [= E\VA7E\U;<<! CO: > 8GNOF+> OJ";P[Q E\VA3=XNXH[!KE\U;<GF,HU 1K>A,UN+F2WXNB36>I$CO*(3TXNXH[!ME\U;<7F JNF[Y N;FGF,HU 2G>A0UE\VA
5XNXH["BE\TU35>ATUN/F4 OI)3$LC?9> HKN+F??MEPOW)C5DAE?6?(]EPTB8$PAEG9=)EPOW9C;PAEC<<E5EPVS> PAE;?<IEPVKWLDVE[MA*AFXH[0FXNXH["GE\TV1>^A4VN+F3MXNB3<>I,CO* 25XNXH[0FXNB3:>I,CO*(2!XNXH[!ME\V99+FTJNF[Y N;FGF,HU 2G^A VE\ZA1=XNXH["BE\TV1=^A4VN+F3LXNB37>I,CO*(3BXN
H[!ME\V963F,JNF[Y NFP[- E\ZA1=XNN;F3FXNK?5ZH(B37>I,CO*(3]XNXH[!ME\V94;FXJNF[Y NFP[- E\ZA1=XNN/F5 OI+3$LC?;> HKN+F
?MFPOZ3A44AFA6\N]FPO[DA8XAFA9\E)FPO[(Q;AAF=<^;5FPXAA>PAF9?\IFPVZ,F,HA 8FGF,HU 2B>A8VE\ZA3>XNXH[0HXNXH[!JE\V;=!DNN<!* NG;<?F0CO*(F
,HU 1D>A,VNFP[- E\ZA3=XNXH[!KE\V;>?F(KN;F?F$BLNI+8 OK;7GF,HU 1M>AXVN;F" $LC?8* NA\^A?5PBLNI+8OTN2 >ATAGK53$LC?8* NA\FA?5TGB32>I CO: " E\A
53<XNB31>I CO: " E\A
<?5BLNI+8OTN2 >ATAGK5/$LC?8* NPJ[?3/LOAF?0>7EFPOZ132(OAF?3?AQFPO[K5$PAFC6<N!FPAY;9$OAFC;>B1FPPZHC=TAFC><A=F<N0AWV3R3G> ]FPWOGN8WEF
:]-UFPWU-[44WEE]4=-UDPWM-Y74WEB
;]--BPWA-
<WAG % OTA3>>A4GNOF+= OJ"MP[Q E\^A1<XNJ:SGF,HA 8F3FXNXH["BE\TW1;^A,WN+F- OI,:$LC?9*(NA\^A?> BLNI+9 ON:  \FA\NAK>N8G< 8GB37>I$CO:(J NTF0G>A8CN HGNG;=?F4CN< 2( JXH[!DE\W96?F(BLNI+9 OJ;UGF,HU 1M^AXWN+F3YXNXH[0FXNNF [I E\^A!;E\W9;GF,HA 8HGF,HA 8QGF,HU 1K^A,WO
HCGNN/F35XNPJ
?-5DPAGA6\3]GPO
098 OAGE9])GPO
,A;DAGA<\M5GPP^H!>$PAG9?G03E	X+TB EC^5.JMCPWNJ"Z(WEC^XBJMAPWBJ1(WAG"P[- E\^A3?XNXH 0AXNXH[RP\C?D"GC$"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BBZ

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