Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/roots.exe
There are 2 other files named roots.exe in the archive. Click here to see a list.
?p@?xe>~L`Kb)C}2$C`INXQF:{A)'[_{BE@
i(#>'C	SpSh  "1b +7('1ENTER DEGREE OF POLYNOMIAL.  MAXIMUM OF 30'/)   "9B +:(I)   $3$gO 1fgOA4$E "@b +D(' INVALID DEGREE.  TRY AGAIN.'/)  +7 "Fb +O(' ENTER COEFS. OF POLY. BEGINNING WITH CONSTANT.'/' MAXIMUM OF 10 PER LINE.'/)  $. D "UB : Z 3:9R +V(10G)-\`4444'464 "[b +`('0INPUT COEFFICIENTS IN ASCENDING POWERS OF X'/)  "eb : Z 3:9b +f(' ',G)    $3D+} $3D+w "kb +o('0',10X,'REAL',13X,'IMAGINARY'/)   "tb : Z & 53:9p +w(1X/2(5X,G15.5))    +0 "yb +}(' HIGH ORDER COEFFICIENT IS ZERO')+0 "b +(' ITERATIVE PROCEDURE FAILS.')    +0-\+  +0@@t p Dt@@r t.o 4DK t5dN $ Dr+e $ Dr+K $ Dr+K"$.t5dM t Du $.t Du $ Dv $.t Dv : Zw $.v/ Dw w.p .o ' F3:v9Vhxiy@@zxzjDy$xjDz$yxzy{:z+h $ Dtz|{}@@~@@@B@@@B@@@B@@@Bk t.p  D@F4DA : Z $.t/ Dw w.p  D@FzD{H$zD{HDD` @  &DD  &DD$$3:t9rDH		4D3DH$d	
z
zDHd	${{-\r4
 lr-\r4

r4 #:~"$z.~4$i t5D#"$.z4$^ $ Dr+K : Zw $.v/ Dw w.o  D@F w.o .p ' F .p-\v4 @3:u9$ t D
 u Dt 
 Du t4De+6 t4D^|z}{@@t-\r4
z@mr-\r4
{ r4 Czz
zDz{H{	"$.Dt+F@@z@B{>u>u@@{@B|@@	@B	z
>t p   &D
 
  .-\v4 @  : Zw .p ' &D
 
  . 
' .L	$-\v4 @ 3:t9L v.q-\v4{ @ v.q-\v4z @:v	4D^{${@@	@B	+U t4dK+\+e4 Zn \n  o, p, p,!p, p, p,!p+E n n\ r,Ap-|p4=|
%Op?KT=Z0 !V! 0|-1#az8]1b
Y% \r @s<z0<0|+1\+,>p
Zp
+p@h>@p>@(X@0b@xE@E@8d@(R@P\@P]@h>@#@#@>@>:Q[(/<0"`S<pX<0.p3@{+"*|-<Z`).<,pd}:."@Q,& p,&>`94.<9)@@,^,^,^+>d @@& 0b.".")B}5@:,~m<!<P\n<| p[pl<0@X+DZp.</ pQ \o+G@@o!<P\n7@q+J <r \p@@q!<P\nXX\n ~7@pD<7@qA< \o <n[`x s,x,^x r+
&U`eB+y@)@G 
"+v
&+,6$1,>.@
p.46$<xh.
.4o.nSEQIN@SEQOUT@@a
%5 Source level error at user's loc	
	`Z(X^. >[.~(3~+
	~+Z. \x <x*<x .->ez+!"	b+  "	b+Z. h+ggM?Th
&	b+,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1,>O@\+#gR~@1,>@@\,>,>@6 w+/"]0B++!"A`X#p5@(/#p!"X#p+/\p+/a.9'1,>,>,>O@\+/,>
6+ _4`8"`Q@,> <^,,^,> <a,
,^*b5+B,> <b,,^7@\+=,> <e,
,^+?,> <g,
,^Z5"B,> <h,
,^,7@\,
,> <j,,^,,> <m,,^,> <p,
,^(@qd1@,,
1@#+Q0@*+C,> <q,,^+C,^,^,^,~(' Type G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pXYp XZp [p \p XSX~Xp xI01,>p7  ,~g:=@1,>p+xg:9d4 |`bm@+ A,~ `bm@+"K,~",~`!$hX$h@@h*% "
 BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHKbN@1,>,
,~Y\Q<X\*+