File LIB8.RL (Fortran library or relocatable file)

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

D@ ~RTR`~O " ~  |  |B` |S% |T`C |	  |FX" |  |  |
A |P T |FD |H` |E `z0PN1 zR z@XT zKO zLG xX  xF$`xP`xPP`6 v  vRM! vA vR!`vPLA v@U@`v S tO` tI C tTN rQD p `nPI$`nPO$ l0O4 l0C3`l@HI l0TPP`jP@`jsse < nfhr Hzis)nkk"edb(J`b&}&F>na ar)nbT|+80
 @ pREAD pWRITE pIOH pERROR @\  !!(X~2 }3`D\2 -55\ # 0+READ +4,5 704WRITE 2)
4$#@# J !"\|#]#V3{Uz `33HV d   y\ W%@y?@}1@~@|A@UOA  ~+Q RfTWBX-Y#`\} | }{z( y y x y w( v u $ t A kk\sAA |!AVkH siAj yA ^dAAk risj! \s( \AAA A k - Ae\es |e As3Av'AwYAzxA{oA})AWpDIV pIREM A  ~}} | '{ zHdy zH!`E\*x z`x z   ~}@ \w!}S}@ O! vu z}h H } ~ >x z D\~ <\}!}` v x z 1\t@ s zr Zt( Sy z SAr Au.AweAx0Ay-A{A|{pCLEAR pFMP pSTO pFLOT pFAD pISTO B% JG` H \~J 7 } | R2`US {6I`H\o`I\lI` `K\lG H G  IH <}G {~X
zzI Y y \~ XG U`H\oG Q Y {`L\~ xBx BzBepGENIO AzAuArAx@{2B}8B \~( } 8  | {Hzy\x` ( w \~ -2 *8 $2\ vu 2}t\ 82 4Z\x`sr( 3q@z 9 4Bq-BrsBsBt?BuJBvMBx!By Bz@B{`B|WB} B~2pIFAD A~B~OAtOA}PC  ~`N\~OP
}( M@ |O}
}{@ `H\oP Q`I\lz
}\yx(P!}@ w`K\lQ }H I}H}vvuu}t}s} 5
}r}\ }{H% Qd w PP RCrCsCt|CuCvCxzCy)CzC{ tC|C}C~BwA@zB|*A~*AvEC`) 
 `( 3 IOH   ) 
~  \  X7 F(h! DD@~ >*\**( ?D( >* 3D\**D *!Dj
}|{z{jj }}||{{{H zy xD H E
}D}||{{\ jCxCy0CzC{C|C}C~ CFpFDV AyBA|C#CwZB{ZAseD}\( ~hwx z"{-\}  (\ ( |{ # # z}!Y# >O 9   y xY 2 , wZOZ IvY > ,~W}YH OY a`O\oY ]\ Z\u Y mt xY k z Dt*DueDv`Dw8DxDy?DzD{2D|D}D~*D)ByD
&@=AtWD} \ = \~\  } |` U SW = {\~!7~ z y <x=~7~@ 5!\~`E\*`j\ = 5}\w} =v u\H $t s OF\ WDsDt0DuSDvDweDx|Dy#DzD{KD|*D}8D~ODJ{ pFAD pFSB pFMP pFDV pSTO pFLOT pFLOAT pFIX pIFIX pIFAD pISTO pABS pCHS @0FSB X 0FAD  \
~( W  U( ;!@ ;H / C  A  @@ Hf H  @ Rf X\}  fnml
~m |m { lVj  m0qABS qrhl @{@|@~@@5@}E@FA 
E ~} )) |X)){ D *@ 5zH N C GE( X X XE Gh qf` c* XDH D
~} F jAzxA{A|A}A~ApEXIT pERROR A1ISTO <  1STO < 
; ~; ~}; }V9 |{(  9`  ;  1AFIX
 z ~y@ p{ x P!
~} `1`IFIX `hai`J `AVaB C`O\?h XAytAzA{}A|A}A~AB5F2FMP \   ~}8  8 '  ` 2;FDV ;?<< <<  p!|{8XH Z   z8 T y ``O\9h
x nBxByFBz*B{cB|B}eB~B@BNAxNACN@NBh@hADiBf\ A0  2FLOAT "%& '2%FLOT @H1~\} | `26IFAD 6:77B 77 6\{7z yH\} N V
2^CHS x w x `\h^hh_`O\\h dBwBxByBzB{B|FB}EB~B] pOPEN pGENIO pEXIT pERROR pCKIO @OR0GENIO 
5( ` &-16  
 `  Z 

 +}m( =m `i +: 9 Em n  ?Hl\ hnm!Hj
n Z mm EmnHj
hk +@ pCLEAR @@
@*@=@T@%V@$V@#V@"V@!V@ V@V@lZA ( V
\  V `
( V
\ V RQ)1OPEN 
&6  `  `1 ~< 6}A 8D6|( < 
 { Mz KfM 
! O
& MM `D\B
tvxzLjV n p rD |!# % ' )N~AzsA{vA|vA}NA~A @hgAR `1 ERROR  
 0  aaHb\b   PbPb (  JbJb 8~ }f }a( ] ` P J|( 2{Hzy` P1[EXIT `
 1aCKIO ! c `bb o   r\ g?Ay Az@A{`A|?A}MA~A|X pIFPOW pFFPOW pEXP pALOG pSTO pFAD pFMP pIFAD pFSB pFLOT @!`E\I`F\`G\I  ~ 4beUUUUDl
N <d h ; nruV  w Ac}p ~ w !  Vm9@LG0QALOG QYRZ`H
RR }h |{zY}yx}`I\(w+`E\LY` @w@x@y@z x@{x@}@~@pERROR pFIX pFIPOW @| A`G\F`F\L ``K\O X 1EXP `H
h ~}@|@{ X~ z~`E\L`F\L`
@yy!` `F\Lx w`F\(`E\L`F\C`M\Q`G\L ``K\
~@h~|v `1eIFPOW ` epfq r
1pFFPOW 7p AvAwAxAyQAz A{GA|A} CA~ApCLEAR A \7p!\7 ( ,
~H 2  ``E\I`D\I`G
`E\I`C\I ``} ~ *|
~`K\n A|A}
A~Aq_ pIREM pIABS pDIV pMPY pIRDSW pCLEAR pSUBSC @0MPY  )) `)DD)   0)DIV @ /!)2**9**( &@ A!D@ AH!  bPH@D Q R! `0lIREM mmHH v `@tpERROR @&A1IABS  H! `1IRDSW  ``H\'h `1CLEAR 
~} `12SUBSC 00H 1d32>|( H[* /_)+,2c-3/ _ * s){.+--0H.D.,-V2q 3A{A|@A}A~Ai pSIN pCOS pTAN pFAD pFSB pCHS pSTO pFDV @ >&@u
\ x &TD5 uUU
TTTv E a^PfOtL"}UO 01TAN 71@271A2`D ~H L`E\ B`D\ 
~H L @ a``D\}w   t`G\|
~`H\ `!v @|
@}@~@pFMP A`G\`D\`I\`G\02w`D\\~ )`I\}  &`2w `I\0| 13COS 3;4< =1;SIN \}7;K<7;L<`D
{H W`E\} M`D\ }}
{H W\} @ m``D\z  `AzA{A|A}A~vAw  pATAN pIFAD pFAD pCHS pSTO pFDV pFMP @0ATAN   `B
@ ~( ZH}~q~|H \ 
~{H /`C\~\``C\ \`E\rz ->>>>`C\kk 8k`C\r\ N`C\ V``C\q
~~ `y `E\r
~`F\r \`G\r k @y
@z|@{ @| t@}@~@@M@U@>@-@%AUY:n2 r tva: }U_ pSQRT pFAD pSTO pERROR pFDV @ Q0 SQRT 7  7  `B
`C\`B\ @ ,`D\h
 0 `H~
}}||{(zy`C\`B\`E\`B\ x B `@xx@y}@z@{@|@}@~@J pIIPOW pFIPOW pSTO pFDV pMPY pFMP pFAD @0FIPOW `C\ 0IIPOW  !@H1 ( z 2
~ B z`D\ `C\ @ /( yH Q( ^`E\ ( y( c `E\  B`F\ P`C\`G\ `F\ `C\ `G\ B `@~@
u pIOPEN pOOPEN pOCLOS pCHAIN pERROR pGENIO @OR0IOPEN _>\( S`
\ ^ ``E\DUyo0OOPEN  a _>]( S 0.OCLOS  ./c d` 7b BMBLL >BB
 L >L[ S<=ajwao0cCHAIN cdS\`A\ ~  n@~@Hs pRTAPE pWTAPE pERROR @lm7!"""\ `C\0WTAPE !" #0!RTAPE J @ /! 3! ~}v|
|t{ KH Dq{
   H I|Fzty iq|ytzH  `@y@zX@{@|@}@~@



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