Google
 

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.
?p0 0 ?hX?x " 
 
<++2	`5<+P1:LT12:@F
%	`+f
&>-|p7Ap-|p p@
6 9k 3+@d7
"C@@8,+t1B+o1B+D,P1B
"E+n5$v"
 Kp-|p@@wS"` 4XR`4F B9Z`7A+ E4@. 
"+} X9 ,j
& 9 9[`+y*by-|p "F6Ap "F
&-|p
IN MONITOR, TYPE 

.HELP ABACUS

FOR HELP.
J+oH	=F	=TC~01,>#p2`W+U4@T+ "`W @X,> <Y,,^p+  @X,> <Y,t,^7!pX,~ W,~+P0Z@,~ 0 9~j Y~jxXACOS OF ARG > 1.0 IN MAGNITUDECNM`1,>#p2bn+k"pp+ n4@i @m,> <o,,^ p Bm,> <o,t,^,~ n7ap"`,~+P0p@,~ 9~j 0xmASIN OF ARG > 1.0 IN MAGNITUDECR
!$3beDh& B
 
@
`@	 	
,7 "` {G ZCv\ 7f ]V#QI+0`} 9~jgG@1,>7cp+ (Bdb+."+."TB#p@,~4B+P0
#p+  ,~>attempt to take SQRT of negative argKc3@ p p+-Kc3K  ,- 
,~Kc3J  ,- ,~Kc3I  ,- ,~Kc3H4BC5@05"C+D0
/U ,~,>,># $)D/$@,>4d:X $(F) + :5F:5"8"` ,Y+A#  ,> <E,%,^@,> <F,,^5&A+P0F,^,^,^,~! ,~xxAttempt to raise negative single precision number to non-integer powerKc#@ p p+YKc#K  ,Y @,~Kc#J  ,Y @,~Kc#I  ,Y @,~Kc#H4B}5@]5"g+D0
\U ,~ D|!$ @{ B|5"d#`+ y,d!"B,~+ g(BdB+ g5Bb  |,~ +7`|+p`d +D0k+D0
kU `d @6 {+f |`B"`+f/~id +r+D0k#{,> <,%,^ @`|@,> <,,^+mU",d{+ g+a! ,~xKc1,> p3"+3b++D0
U ,~+D0  ,~ D F@@%"j"%)/;`:XD5faF+.&@(|h&f   D@  ,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,> p4@: @$,> <E,%,^#,~{e^bC2|p1,> p5`)4@:+P0E#p3@=+<2 B+.3`B+.@@C ==+4)r. !CA @C(|h"> > BD ??@@DC,~+D0
;A,~,~0i/X36P'Ms!hhyI^*VhP`@6P'MP'M]oxx$Attempt totakelog*ofnegativesargG?@1,>plm++Vg&t@1,>pm++VG?1,>pm+Vg&p1,>pBl#`3bk+hDnm3bn+`%"(D?d$"@($)Bp#@+ #`2"
+

7 "` 	,~ +`b ++D0
@+&pgg?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$  aBl$@)@1@+e4@*o   5B+9$%
"5B'5$',~@)@. 
"5B-,~7f $5 3
&f"`& QBx6@,3[x. 0`. 
",~
6+ 
&gR,-
&h,~,8,$0h,~,8,$0k,~Z
0j+; 
(E`j,8aj@+,$0,~HnHHpHs"Hv
6+ 
&z	`Z|Z
=*N +[
A*@0(J}dJG* 
(S,8,$0
&|  ',0
&d,~}4T4T,8 |
&(+# |
&(
&d+#,8
& },1
&
 ~,1
&
 },-
&~,1
&d,~0
? Job aborted
h$+'-
%FRS Ww)I8Ry.R,Az.s2HWw)I8Ry.R,Az.s	nM>ZyOIz&y$`~<g!-Y$|@#ji.Pxkw 	8
(>)
yrw U(:arPL|OR0WyKIsd  A1TYh)5y
oHP(@.@
END OF EXECUTION
	PC='w()eHl,F1{@'w()eH2$P(k'v)a0C@~Iv
		Subscript  of array  = Y\Q<X\*+	`66`	WJ}K	`!	CPS	YVBG9G9
GJGK/K PfbHf8|Y;#rdi3r2$r1~--r1w)1r1d30r18f8r1,~'r1,}%r1r1[ZZYYXYi?"EYi3;"35HUYil}Q.F
6[S+
&u^
"Pr(PrSB)Z)Y)X(J"(J#Bg#
@:#;=$qNRp(2 Rov,@RoTfRoA~Ro;^tX;t%;t%;t$;tH;tj?tW[tS;sv4=sj,YsbBWs/|=s/+=svJPS6PE^I4n5"SPn\i(D7w`
l	xpX2	
S	YVB5nXRMSQ	DJ|	DJ}`|Q[|Q[`|u5bgE`EV
fK|
/4H/4H`K<%K<`c	b&b%b%z0//..--RMSQv~Z|pcc`NX:GYXpX2|pX2|pX1{
~Jg'Gf
~Jf
~Id
~IbS	YVBSo&B	WG].GP.FS.EV.DY.VY	WGNPU7RMSQTE/8r~IzPNNR:JYX0!G
aeTvFaZaYajP3?K~99`

		~
}}S	YVB
DAuDRtI;I:]]DR|ps{(t{(`sl	xk]x?Tl	xUexIgV$**wV$(-jV$$e^	V$$5
V$"gV
V$4	V$xS
V$5F	V$V$!{V$NV$GpTr=m2z:Y]edUY]c"Y]3:e#y:07y:04:03Y\tw:gY21Y12Y12VcrS~VcrR0VcrRvVcrQtVcrQr:B:Af9phP}-MQiMQi	MPJMPJ7ZL044L*`q1L*`q#L)-,L)-L9!'L9!5I:;*[	`

4!w6!q+
/,6*!Z
/BU!
/l
/H!d'!Z4!Y0!Y-
)8]}
)8\}
)8\|
)8[|
)8[{
)8Z{
)8Zz
)8Y0
)8Yz&/&(T
CSVH
v$:;8u_g%u^v
&u^
" 
h_&gI]#"059:YP<L*2'qdqcZQ.0t.'7xbi..
We2.f-Yv-PLuB,->Gf:yt:yd8Hq9-<c89#	891
891-<q896[89,89,89+
89+
89*89*89)}89)j88p:88\H88Ib(YLg,(K
X%9(MJ9Sw^N+P
KyI(P
KwH(Sw]	+^}a+^}R*^}Q%^}Q%|]"|I^bZb5^bF?|	&^a{@L^a{!NiSX0,q@PgMv@SX0,OSX0+}JSX0+OSX0*K6@SX0l"SX0k @SX0g SX0a SX/sI-\SX/s?+SX/rY4SX/ZRSX/YZSX/X&SX/Wj%]t6S@zT#u%g
Nv)n
Nvt
Nvo
Nvu
Nvn(Tvg5(TuP(Tuh(Tud(Tu_(Tua(TuU(TuW(TuQ(Tt#E(TtN(TtF(T\)C(T\)>L1B#HP
+CP
+<P
+;D6z;6fHc}K	`"3	K{i<	K{cD^2w=	KzE@	KzC	Kz>	Kz?	KyLF	KyE	KxjB}
=B$e7Be7@M^	MKA`MKAaUg[fm~8d8r0xT=o0xT=pGS(R<0AR<zoR;x N
R;rdR;j]ZAJ5-37z):evaE|B{B{Az@z=y4Ey9y8FkFkFjFjFi`ATT^d\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0:L+:@5<C
=9+
&G	`
&H( "0$	bS,s 4*|(J,,XB("} *( J0*l	S,w 4[
,, &XF(XB(*l"iSH6+<O@7@z8@l:@n6@b@j 
&J,>H,5+\r 2 B9"| B,, "( B9Z( B+& 2 B9"| B:: J " B+&,, "( B9"| B@@ V:,5+\t 2 Bc"| B,, "( B9Z( Bd+5 2 Bc"| B:: J " Bd+5,, "( Bc"| B@@d+5 (*:$(/(#`hz"0+
v,'+I 9aB+F,<,>H,>Kl+I,' c"z 1 Bc+I9
8=,8+@9
=7@x+E,^,<+B5L@,<K"{"`Q"!`,<+I :4VL c B9&| d+&,^4FN,<+L5L@,<K2^
.,2"`S
,>L,>L,8L0l6@+Y,9S"X,<D4&[,>*lU+#`0v+j,^4Ha,^4D`S"X,< +\,^+\,>H+ZQ$H,<+bQ$h+dQ$h,<S"4,<S"x,<+bQ$H+f0v+},^4Hp,^4DoS"X,< +\S",<,^S"X,< $+\Q$X,<+bQ$x+tQ$,<,<M+bS"x,< \X,<S",<,<M+b0v+,^4DS"X,<+\S",<+bS"P,<+b+\u,^4DS"X,<,^4DBS"X,<l+b,<N,^+Z,^,8,^Q$m`,<7 `+b,XQ$ ,<+,^5B,9Q$,<Z,8+ZQ$XX,Xc,Xd,8 
+-,^4G;,<++0B	+0eZ,>H+;&{Zx3&+4"`Q,>+;,^,<+0@`Z,~,,~1b-1" +:+E1b1"+<+P1B+P P@
 /"B Jd,+C 
d@@8,+D+> 
4JC 6,~ P@
/"BZ0B+D@@8,+N1b-1" +L+F1b1"+N+F 6[`,~@`@n1b1"+W./"BM@@8,+d+Q0B+Z4.=@O+U .0B"+d@j8,+=1B+_0B+aO@@8,+d1b1"+d$*.*h+_$
.4Ph 5pg 
#`=Pg 
 6,~
&Q@4@ @b5&n"
"Q2&R+q2&R+r=n9n %&(. .&&& .".$1d3dS+,>H#` $&&.(5B|l,>S0Hm`@,>/"=dyd,^0Dm`@
"5D,~ ",>l,x,^
"T/$ (7  (
"#
,,~ 09Lf3!&*QLx6@,[
x.*
",~6B8+> 7+B++74B1B+1B
&T@@8+1B>"@,~ B8:x,~  (X}.(X}.A86@`+%: R`+* `[`3J++[`4R) +%:QR`:,~:x 
,~ Jd,+.,~ 
dSJg:XR` *g,~ +`B+A`B$+7aB0+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?89=@ABB<09
900$6$AAA

cefituvxxxxxx2@2`3 3@2 3`|Cy`9;y`k
$8 ,4!%BF|g
cd8&
<&8t&	<t&
8x&z#~6(ux(wX40yg&pTG?QCoCRptCNp^CGS; vY>8KcgGY8%Q3ggfhwgSfSiO niK([> |$Q$$$`I@ @6E4`~8