Trailing-Edge
-
PDP-10 Archives
-
decuslib20-02
-
decus/20-0046/abacus.exe
There are 3 other files named abacus.exe in the archive. Click here to see a list.
?p 0 0 ?h X ?x "
<+ + 2 ` 5<+P1 :L T 1 2 :@ F
% ` + f
& >-|p 7Ap -|p p @
6 9 k 3+ @d 7
" C@@ 8, + t1B + o1B + D, P1B
" E+ n5$ v"
Kp -|p @@ wS"` 4X R` 4F B 9Z` 7A + E 4@ .
" + } X 9 , j
& 9 9[` + y*b y-|p " F6Ap " F
& -|p
IN MONITOR, TYPE
.HELP ABACUS
FOR HELP.
J + o H =F =T C~0 1 ,> #p 2` W+ U4@ T + "` W @ X,> < Y, ,^ p + @ X,> < Y, t,^ 7!p X,~ W,~ +P 0Z@ ,~ 0 9~j Y~j x XACOS OF ARG > 1.0 IN MAGNITUDE CNM` 1 ,> #p 2b n+ k"p p + n4@ i @ m,> < o, ,^ p B m,> < o, t,^ ,~ n7ap "` ,~ +P 0p@ ,~ 9~j 0 x mASIN OF ARG > 1.0 IN MAGNITUDE CR
!$ 3b e D h& B
@
` @
, 7 "` {G ZCv\ 7f ]V#QI+0`} 9~jgG@ 1 ,> 7cp + (Bdb + . "+ . "T B#p @,~ 4B +P 0
#p + ,~ > attempt to take SQRT of negative arg Kc3@ p p + -Kc3K , -
,~ Kc3J , - ,~ Kc3I , - ,~ Kc3H4B C5@ 05" C+D 0
/U ,~ ,> ,> # $ )D /$ @,> 4d :X $ (F) + :5F :5" 8"` , Y+ A# ,> < E, %,^ @ ,> < F, ,^ 5& A+P 0F,^ ,^ ,^ ,~ ! ,~ x x Attempt to raise negative single precision number to non-integer power Kc#@ p p + YKc#K , Y @ ,~ Kc#J , Y @ ,~ Kc#I , Y @ ,~ Kc#H4B }5@ ]5" g+D 0
\U ,~ D |!$ @ { B |5" d#` + y, d!" B ,~ + g(BdB + g5B b |,~ +7` |+ p`d +D 0k+D 0
kU `d @ 6 {+ f |`B "` + f/ ~id + r+D 0k# {,> < , %,^ @ ` | @ ,> < , ,^ + mU", d {+ g+ a ! ,~ x Kc 1 ,> p 3" + 3b + +D 0
U ,~ +D 0 ,~ D F @@ %" j" % )/;` : XD 5f aF + .& @(|h& f D @ ,~ !t0 _' "S'qf!um. .#Y% !v yO^ RX C2|t(1 ,> p 4@ : @ $,> < E, %,^ #,~ {e^b C2|p 1 ,> p 5` )4@ :+P 0E#p 3@ =+ <2 B+ .3` B+ .@@ C = =+ 4) r. ! C A @ C(|h" > > B D ? ? @ @ D C,~ +D 0
; A,~ ,~ 0 i/X3 6P'M s!hh yI^*Vh P `@ 6P'M P'M]ox x $Attempt totake log*of negativesarg G? @ 1 ,> p l m+ + Vg&t@ 1 ,> p m+ + VG? 1 ,> p m+ Vg&p 1 ,> p B l#` 3b k+ hD n m3b n+ `%" (D?d$ " @($ )B p # @ + #` 2"
+
7 "` ,~ +`b + +D 0
@ + &p gg?kVx;CCJ_Bp=I0=I =cV(;[N8YY&WgJ([k:0;k:0;k:0;kM ;kM;kM;, . b Jx *}** }[ A( w((},> D((( QHx [ (H}A( " P
,> Z
+ Z|5F &
& c F|,^x !*}** / b,~ ,^ + ,^ + x % Q$ aB l$ @ )@ 1@ + e4@ *o 5B +9$ %
" 5B '5$ ',~ @ )@ .
" 5B -,~ 7 f $ 5 3
& f"` & QBx 6@ , 3[ x . 0` .
" ,~
6 +
& gR, -
& h,~ , 8, $0 h,~ , 8, $0 k,~ Z
0j + ;
(E`j , 8aj @ + , $0 ,~ H n HH pH s "H v
6 +
& z ` Z|Z
=* N +[
A* @0(J}dJ G*
(S, 8, $0
& | ', 0
& d,~ } 4 T 4 T, 8 |
&( + # |
&(
& d+ #, 8
& }, 1
&
~, 1
&
}, -
& ~, 1
& d,~ 0
? Job aborted
h$ + ' -
%FRS Ww)I8Ry.R,Az.s 2H Ww)I8Ry.R,Az.s nM>ZyOIz& y $`~<g!- Y$|@#ji.Pxkw 8
(>)
yrw U(:arPL|OR0 WyKIsd A1TYh) 5y
oHP(@.@
END OF EXECUTION
PC= 'w()eHl,F1{@ 'w()eH2$P(k'v)a0C@~I v
Subscript of array = Y\ Q< X\ * + ` 6 6` W J }K ` ! CP S YVBG 9 G 9
G J GK/K P fbHf 8 |Y; #rdi 3r2 $r1~- -r1w) 1r1d3 0r18f 8r1,~ 'r1,} %r1 r 1 [ Z Z Y Y X Yi?" EYi3; " 35 HUYil} Q .F
6 [S+
& u^
" P r ( P r SB)Z )Y )X (J" (J# Bg#
@:# ;=$q NRp(2 Rov, @ RoTf RoA~ Ro;^ t X ;t % ;t % ;t $ ;tH ;tj ?tW [tS ;sv4 =sj, YsbB Ws/| =s/+ =s v JP S6 PE^ I4 n5" SP n \i(D7w`
l x pX2
S YVB 5nX RMSQ DJ | DJ}`| Q[ | Q[`| u 5b g E ` E V
f K|
/4H /4H` K< % K<` c b& b% b% z 0 / / . . - - RMSQ v ~Z|p c c`N X: G Y X pX2 |pX2 |pX1 {
~J g'G f
~J f
~I d
~I bS YVBSo&B WG ] . G P . F S . E V . D Y . V Y WG N P U7 RMSQ TE /8 r ~IzPNNR: J Y X 0! G
ae TvF aZ aY aj P 3?K ~ 9 9 `
~
} } S YVB
DA uDR t I; I: ] ] DR|ps {( t {(`sl x k ]x? Tl x UexIg V$**w V$(-j V$$e^ V$$5
V$"gV
V$4 V$xS
V$ 5F V$ V$!{ V$N V$Gp Tr= m2z :Y]e dUY]c" Y]3: e # y :07 y :04 :03 Y\t w :g Y2 1Y1 2Y1 2VcrS ~VcrR 0VcrR vVcrQ tVcrQ r :B :A f 9ph P}- MQi MQi MPJ MPJ 7Z L04 4L*`q 1L*`q #L)- ,L)- L 9! 'L 9! 5I: ;* [ `
4!w 6!q +
/,6 *! Z
/ B U!
/ l
/H !d '!Z 4!Y 0!Y -
)8] }
)8\ }
)8\ |
)8[ |
)8[ {
)8Z {
)8Z z
)8Y 0
)8Y z &/ &( T
CSVH
v$:; 8u_g %u^v
& u^
"
h _&g I] #" 059 :YP< L* 2' q dq c Z Q .0 t .'7 x b i . .
W e2. f -Y v -PL u B, ->G f:y t:y d8Hq 9 -< c89# 89 1
89 1 -<q 896 [89, 89, 89+
89+
89* 89* 89) }89) j88p :88\H 88I b(YLg ,(K
X % 9 (MJ 9Sw^N +P
KyI (P
KwH (Sw] +^}a +^}R *^}Q %^}Q % |]" |I ^bZb 5^bF? | &^a{@ L^a{! N iSX0,q@ P gMv@ SX0,O SX0+}J SX0+O SX0*K6@ SX0l" SX0k @ SX0g SX0a SX/sI-\ SX/s?+ SX/rY4 SX/ZR SX/YZ SX/X& SX/Wj %]t 6S@zT #u% g
Nv) n
Nv t
Nv o
Nv u
Nv n(Tvg 5(Tu P(Tu h(Tu d(Tu _(Tu a(Tu U(Tu W(Tu Q(Tt# E(Tt N(Tt F(T\) C(T\) >L1B # H P
+C P
+< P
+;D 6z ;6fH c }K ` " 3 K{i < K{c D^2w = KzE @ Kz C Kz > Kz ? KyL F Ky E Kxj B}
=B $e7B e7@ M^ M KA `M KA a U g [ fm~ 8d 8 r 0xT= o0xT= pGS( R<0A R<zo R;x N
R;rd R;j] Z A J5 -3 7z): ev a E | B { B { A z @ z =y4E y 9 y 8 Fk Fk Fj Fj Fi ` AT T^d \B: /\>X \>5 '\7N +\2g 'r'I (\)8 *\)7 \ \ )\+ ,\6 .\. ,[rO .O[mN O[m O[m O[l| [l{ &O[l+ O[k O[k O[j] O[jR O[i% r%H ([Z [X %[Qg r% 0[Ms /[M" -[M +[L ,[FG [@v *r#e OD^w'd w]!+{ 0 :L + :@ 5< C
=9 +
&G `
&H( "0$ b S,s 4*|(J , ,XB( "} *( J 0*l S,w 4 [
, , & XF( XB( *l " iSH 6+ <O@ 7@z 8@l :@n 6@b @j
&J,>H, 5+\r 2 B 9"| B , , "( B 9Z( B + & 2 B 9"| B : : J " B + &, , "( B 9"| B @@ V :, 5+\t 2 B c"| B , , "( B 9Z( B d+ 5 2 B c"| B : : J " B d+ 5, , "( B c"| B @@ d+ 5 ( * :$( /( #` hz" 0+
v, '+ I 9aB + F,< ,>H,>Kl + I, ' c"z 1 B c+ I9
8=, 8+ @9
=7@x + E,^ ,< + B5L@,<K"{"` Q" !` ,< + I :4V L c B 9&| d+ &,^ 4F N,< + L5L@,<K2^
., 2"` S
,>L,>L ,8L 0l6@+ Y, 9S" X ,< D4& [,> *l U+ #` 0v + j,^ 4H a,^ 4D `S" X ,< +\,^ +\,>H+ ZQ$H ,< + bQ$h + dQ$h ,< S"4 ,< S"x ,< + bQ$H + f0v + },^ 4H p,^ 4D oS" X ,< +\S" ,< ,^ S" X ,< $ +\Q$X ,< + bQ$x + tQ$ ,< ,<M+ bS"x,< \X ,< S" ,< ,<M+ b0v + ,^ 4D S" X ,< +\S" ,< + bS"P ,< + b+\u,^ 4DS" X ,< ,^ 4DBS" X ,< l + b,<N,^ + Z,^ ,8 ,^ Q$m`,< 7 ` + b,X Q$ ,< + ,^ 5B, 9Q$ ,< Z ,8 + ZQ$X X ,X c,X d,8
+ -,^ 4G ;,< + +0B + 0eZ ,>H+ ;&{Zx 3& + 4"` Q ,> + ;,^ ,< + 0@ `Z ,~ , ,~ 1b -1" + :+ E1b 1" + <+ P1B + P P@
/" B J d, + C
d@@ 8, + D+ >
4JC 6 ,~ P@
/" B Z 0B + D@@ 8, + N1b -1" + L+ F1b 1" + N+ F 6 [` ,~ @` @n 1b 1" + W. /" B M @@ 8, + d+ Q0B + Z4.=@ O + U . 0B "+ d@j 8, + =1B + _0B + aO @@ 8, + d1b 1" + d$* .*h+ _$
. 4Ph 5pg
#` =Pg
6 ,~
&Q@ 4@ @b 5&n"
"Q2&R+ q2&R+ r =n 9n %& ( . .& && ." .$ 1d 3dS+ ,>H#` $ && .( 5B|l ,>S0H m `@ ,> /" =dyd ,^ 0D m `@
" 5D,~ " ,> l , x,^
"T/$ ( 7 (
" #
, ,~ 0 9Lf3! &* QLx 6@ , [
x .*
" ,~ 6B 8+ > 7+ B + + 74B1B + 1B
&T@@ 8+ 1B > " @ ,~ B 8: x ,~ (X}. (X}. A8 6@` + %: R` + * ` [` 3J + +[` 4R) + %: QR` : ,~ : x
,~ J d, + .,~
dSJg: XR` *g,~ +`B + A`B $+ 7aB 0 + A "P
b + E> ++ +O (@+ +: 6 $ !,~ [`
' ,~
&U `
&X+
&Z+
&^+
&`+
&b+
&e+
&g+
&i+
&k+
&o+
ABACUS, HLP(0) FOR HELP
' ~P , - , j
&+ %$ H = &wka & 4 } "
''
?ABACUS ERROR. CANNOT START TTY.
?NUMBER ERROR.
?ABACUS WARNING: NO SUBSCRIPTS.
?BAD OPERATION.
?UNMATCHED ( ) .
?ABACUS ERROR. RESTARTING.
?BAD ASSIGNMENT.
?BAD OPERATOR.
?ID TOO LONG.
?ABACUS ERROR. NO MORE CORE LEFT.
?FUNCTION DOES NOT EXIST # 4 ' , 1 ? 8 9 = @ A B B< 0 9
9 00 $ 6$ A A A
c e f i t u v x x x x x x 2@ 2` 3 3@ 2 3` | Cy`9 ;y`k
$ 8 , 4 ! % B F| g
c d8 &
< &8t & <t &
8x & z #~ 6 (ux (w X4 0yg&pTG?QC oCRptCNp^CGS; vY>8 Kc gGY8 %Q3 ggfh wgS fS iO niK([> | $Q$ $$ ` I@ @ 6E 4 ` ~ 8