Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/evev.exe
There are 2 other files named evev.exe in the archive. Click here to see a list.
?p`@
?xKZ.`Kb)E|JtE`INXQF:{A)'[?{BE@(#(%	o(20G)(1X,'WMU EIGENVALUE AND EIGENVECTORS',/)(' ','ENTER OUTPUT IDENTIFICATION'/)(16A5)(1X,'ENTER ORDER OF MATRIX.'/)(I)(1X,'ENTER DATA,REAL PART FIRST THEN THE IMAGINARY;'/1X,'(AT MOST 10 SETS PER LINE)'/,' NOTE: USE COMMA(,) INSTEAD OF SEMICOLON(;) TO SEPARATE PAIRS'/' OF COMPLEX NUMBERS',/)('1')(1H-,'NUMBER OF EIGENVALUES CALCULATED IS ',I10/)(1X,'EIGENVALUES  ',7X,'REAL',10X,'IMAGINARY'/)(15X,2G)(1H-,'COMPLEX EIGENVECTORS-NORMALIZED TO LENGTH =1.'/)('-','EIGENVECTOR ',I2/(' ',4G))(1X,'DATA BEING PROCESSED'/)(1X,'YOU PROCESSED THE LAST MATRIX OR YOU ARE EXPECTING'/1X,'MORE DATA WHEN AN END OF FILE MARK APPEARED.'/)TTY  0(20G)+ -<9o <p,?e $ D5Od0 $ D0 $ D1 $ D1 <q,, <o,5L <n,5L <t,, <w, oDUZD	 	 <z,
:	; U+, <{,, <~, <,
 60$0d+	+
 <m,?j+ <i,9 0D+ p DV 22Do+Z <,,"6 $ D	 <,"6 $ HT D
 *#$

 	(. <	,
:
; T+,:	8&"6 $ F
 D	"6 $ *#$
 	(.

 	g

 .$8&:	; 
+ <
,, <
	ZD	 	 <,
:	; 
	+), <f,*X <, <,
 <,,"	 $ <, ( <,
.$8&2 <,,"	 $ F
 D@d

"6 $ *#$
 (.

 	g

 0 	g Pm <e,={@

.$8&; <d,>4 @

"6 $ *#$
 (. 

 2

 	g <,<h

 	g.$8&E:; 
+9"	 $ <!, <$,
"
6 ( J H	 *#$
 	(. <%,
:	; +R,.$8&N <a,1[+z <',,+ <*,,+z <`,

P6
	6	1x

xmX
	65	P00Vpnx0xmxnx3X0,X00X04$	X05X08$6X09X1\V08 	gX1JX14$	X1K$	X1PX1U8 X1VX1[$8 	gX0_X0b1Kf0gh}U<c\C2eX: \*S !p @* !p @*O p @* p @. p @* <0%,?/ * DG D*0D+*g *O *K.*J



  *K.*J!( *+0@d* $ &C G0D++ *K.*J *J(.*K <,<"

" <,<

LN
*T <0#,:j*S <0$,;J

HJ*G5H+ <0",={5@+ *(.*OC *(.*O *J(.*K 

*K.

*J0  CC~+.: *(.*OC*G
*H *K.*J *J(.*K *(.*O"" <,<

 <,<

'CC <,<h

CC

'~+.:"$.G DI"I $ F* D*F.$ D- *F.& F %@f. *F DI -/&/G - 
*J$
*F (..*K ,  L*S <0!,={

 



 L*B3l.++, *F D I L..$8&+" *F I F/7H.+,3F-++P *F/(/G *F *J$ 

-(

.

.

*K0*G *J$.*K 

-(

.

 /(.P0 *J$ 

/(

.

.

*K0.$8(+2"G $ 
*J$
- (..*K

 

*G ( *J$-..*K *J$/..*KP@ 
*J$
/ (..*K

 .$8&+A"&. %/G  % ( 
*J$
*F J*S 

-(

.

*S.

*K .*S.*K@ <0,<n )q ( 

*J$

*F.

.

*K )q0.$8&+R"- $ F* D*L $ &*G"&. %/G  % ( *J$ 

*L(

.

.

*K0 < )q,<P*GR*H.$8&+d *J$- *L(..*K*GHJ:*L; *++a"&. %/G  % F* D*L $ &*G"&. %/G  % ( *J$ 

*L(

.

.

*K0 < )q,<P*GR*H.$8&+x *L( *J$- ..*K 

-(

.

.

*K")q")r <0,<*G*HP R :*L; *++u"&. %/G  % F*I D*L"&. %/G  % *L( 
*J$
 J*S 
.
*S.
*K 

-(

.

*S.

*K" )q" )r <0,<P(R(.$8&,:*L; *I+,:*F; *++@d*N"G $ *J$.*K (  H*S <0 ,;{@*N.$8&, &/G $ F*D D*L@f*/$ D*"&/G.* * 
*J$
 *L(..*K (  H*S <0,;{@*.$8&,) *2d*N D*N:*L; *D+,&dG D*S <0,>4*V@*N6D*N+,8 *V D*N"G $ F*C D*L"G $ *L( ,#$

.

 *J$..*K@08.$8&,;:*L; *C+,: G0D+,I *(.*O *K.*J

 

CC

+.: G1D+*j $.*/G D/ *J$G G(..*K5H,S ( H*S <0,={4@,` G("&.G$*J..*K *J$G..*K

 < ,<h

*T <0,={#

 < ,<k#*W4p,h"&.G$*J G(..*K ( H*S <0,={##2(*N+,q /(.*O 
*J$
G G(..*K

 

CC

@d*"$.DG+,I G("&.G$*J..*K *J$G..*K

 <',<" "  <,<PR



  

*T <0,:j*S <0,;J



  

LN

DD5D- <0,={5@- G( *J$G..*K",.

G$

*J.

.

*K7  E+- G("&.G$*J..*K *J$G..*K"" <',<

  <,<

 <D,<h

E *J$G G(..*KE
*S <0,;{ @

D



*T <0,;{3 +-' $ D*+-( $ D*"&.G$*J G(..*K $ D*S <0,;{2 *N+-8 /(.*ODC
C /(.*OEC
C@d*"$.DG+,C *(BHCJC"G $ 
*J$
 (..*K 

*(

"0B"0BP R .$8&-; *1d+-F */G D*+.:"$.G D*M *K.*J* *K.*J '"*M $ F*R D*F.$ D- '

*

 <0,={ <0,={ @*S <0,>4 @*E5@-_$*J -(..*K* -$*J *F(..*K '+.8 *E ** <,<b*F *E * ' <,<b*Q"$.*F1$ $ D*"&/G.* * *J$.*K 

-(

.

 <0,=~0 <,< 

*F(

.

 <0,=~ <0,<*G *J$.*K 
-(
.
( <*F,< 

*F(

.

"0"0 <*Q,<( 
*J$
 *F(..*K

*G

 .$8&-j *J$- -(..*K* &.*F$*J *F(..*K '"*F $ ( 

*J$

-.

.

*K0 <*Q,< 

*J$

*F.

.

*K0 <*F,<*G ( 
*J$
-.
.
*K <0,=~( <,< 

*J$

*F.

.

*K=<0" <0,<( 
*J$
*F (..*K .$8&.

 $.*F2dG G D*"&.-/* - ( 

*J$

*F.

.

*K *J$-..*K@ <*Q,<0 
*J$
- (..*K <0

,=~ < ,<.$8&.+:*F; *R+-M:*+,K7D*+0 * DG/$ D*M G0D+.P *O ( H*S <0,;{ @ ( H*T <0
,;{3& *W F*N5F.G *V D*N *K.*J\ *J(.*K *K.*J] *J(.*K"* $ F*O D*J"G $ F*N D*L"G $ *#$
 *L(.

 8

  .$8&.U &#$*L *L(. *J(.*O"

'"'L N :*L; *N+.T"*M $ F[ D*L( ( *)q *L@f0.$ D0 *L$&# *L(. (  H*S <0	,;{ @ ,  L*T <0,;{3`+.} *L &"F0"G $ *#$
 *L(.

  

*G *#$
 *L(.     *#$
 *L(.

  .$8&.r &#$*L *L(. 5H/ (  H*S <0,={4@/ *L( &#$*L." "
  < ,<e)q"&/G.0 0 *L( *#$
.


 )q <( ,<L( N( .$8&/
:*L; [+.c"G $ (!, .

 *.$8&/@d)r $#$G G(.

  5L/" *(. (   H*S <0,={5@/" &#$G G(. *N *  G( (#$G.

* <  ,<h

*"*M $ FF D*L"*L.G FH"&/*M.H H H( 

(

 0#$."@ ("@ ( <0*,<T *V *.$8&/, &#$H H(. 5H/= (  H*S <0,={5@/= &#$H H(. *N *  H( (#$H.

* <  ,<h

*:*L; F+/(@d*K"G $ ( , * L*S <0,={#

 *#



 L*2l*K L*K.$8&/E"G $ ( *K 2

 * <,<h

 *.$8&/M7 )r+/`"*M $6 0+/[ (

 *

*G ( * * (

 * (

 )q < *,<L *N * .$8&/TOd)r+/ G1D+/z/$ D &"I $ F ( D*L"$.G/*L D* $.G/*L D*"&/G.* * ( 

*(

 0#$*.@8 <0*,<T *V *.$8&/k * I F*(**G *( 

*(

0**(*:*L;  (+/e"G $ ( 

*J$

*J.

.

*K *0.$8&/{:*J; *O+.R *S * Ap,~x*Sx*Sx*Sx*Sx*Tx*Sx*Tx*Sx*Fx*Qx*Fx*Fx*Qx 'x*x*Sx*Sx*Tx*SxDp*T*Vx*Sx*Sx*Tx*Sx*Sx*Sx*Sx*Sx*Gp*T*Vx*S@*V*L**K*V.*J*U(' ','LENGTH OF AX IS SMALL;WE WILL NOT DIVIDE.'/)(A1,7X,'ROW WITH THE MAX. RELATIVE ERROR = 'I4/1X,4X,'ROW WITH THE MAX. REL. ERROR HAS AX = ',G15.8,1X,G15.8/1X,4X,'ROW WITH THE MAX. REL. ERROR HAS LX= ',G15.8,1X,G15.8/1X,5X,'ROW WITH THE MAX. REL. ERROR HAS AX-LX= ',G15.8,1X,G15.8/1X,13X,'THE MAXIMUM RELATIVE ERROR = ',G15.8/1X,'EUCL. NORM OF (AX-LX)/EUCL. NORM OF AX = ',G15.8/)0    :k|S1    G",:` \1W !p @0N !p @0e p @0O p B0M %p D10 p B0O 1Z D0*"0O $ F0h D1"0M $ F0f D1

 $ &0d"0M $ *#$
1 (..0e .#$ 

1

(

.

.

0N7\ <'\,<P0dR0d.$8&1i 1

(0d0g:1

; 0f+1g"0M $ ( ,#$

1.

.

0e 1(.10G <7\,< 1

.$8&1w"0M $ (

 0g

 1

 1



 0).$8&2"0M $ ( , 0g L1X <24,;{ @ 0 0) P1X <23,;{ @0Q.$8&2 $ D0N@d0g"0M $ 0Q H103h0g+2 D0N 10 H0g.$8&2@d10 D1

"0M $ (

 0)

 0 0) P1X <22,={@10 (

 0g

 0 0g P1X <21,={@1

.$8&2 1

2d1Z+2% <25,,+2- 101

 D1X <20,>4 @0g 11D+2* 1Y D0* <28, 0N( <2;,
:1; 0h+1e 1W,~x1Xx1Xx1Xx1Xx1XX0O11X0O16!(0*$0N80g81

80)(0g(0g]    [    (' INPUT? (TYPE HELP IF NEEDED)--',$)(' OUTPUT? (TYPE HELP IF NEEDED)--',$)(50A1)(2O)(I)(' FILE DOES NOT EXIST'/)('-THIS ANSWER DEFINES WHERE THE PROGRAM IS TO FIND THE INPUT DATA.  IT'/' USUALLY CONSISTS OF A DEVICE, POSSIBLY A FILENAME WITH OR WITHOUT AN'/' EXTENSION, AND A PROJECT-PROGRAMMER NUMBER.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICES',3X,'DESCRIPTION'/6X,7('-'),3X,11('-')/6X,'TTY:',6X,'TERMINAL'/6X,'DSK:',6X,'DISK (FILENAME AND EXTENSION, PROJECT-PROGRAMMER NUMBER'/22X,'MAY BE USED)'/6X,'CDR:',6X,'CARD READER  (THIS DEVICE IS NOT APPLICABLE ON TERMINAL'/30X,'JOBS)'/6X,'DTA#:',5X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED)'/6X,'MTA#:',5X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/30X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO INPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE INPUT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'CDR: ON BATCH JOBS'//' (4)  IF DSK: IS SPECIFIED AS THE INPUT DEVICE AND NO PROJECT-PROGRAMMER'/6X,'NUMBER IS GIVEN, THE USER''S PROJECT-PROGRAMMER NUMBER WILL BE'/6X,'ASSUMED.'///)(' EXAMPLES:    DATA.DAT'/14X,'TEST.DAT',A1,'420,420',A1/14X,'MTA0:'/14X,'DTA2:FILE1'//' NOTE:  THE FOLLOWING RESPONSES ARE VALID AFTER THE FIRST "INPUT?"'//' (1)  SAME COMMAND.  IF THE DATA FILE TO BE USED IS THE SAME AS THE'/6X,'PRECEEDING ONE, THE USER MAY SIMPLY ENTER "SAME"'//' (2)  FINISH COMMAND.  THE USER MUST ENTER "FINISH" TO EXIT FROM THE'/6X,'PROGRAM.  THIS ENSURES THAT OUTPUT ASSIGNED TO LPT: WILL BE'/6X,'PRINTED.  FAILURE TO USE THE "FINISH" COMMAND MAY RESULT IN'/6X,'LOSING THE ENTIRE OUTPUT FILE.'//' (3)  A ^Z (CONTROL Z) WILL RESULT IN THE SAME ACTION AS THE "FINISH"'/6X,'COMMAND.'///)('-THE ANSWER DEFINES WHERE THE OUTPUT FROM THE PROGRAM IS TO BE PLACED.'/' IT USUALLY CONSISTS OF A DEVICE AND POSSIBLY A FILENAME WITH OR WITH-'/' OUT AN EXTENSION.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICE',3X,'DESCRIPTION'/6X,6('-'),3X,11('-')/6X,'TTY:',5X,'TERMINAL'/6X,'DSK:',5X,'DISK (FILENAME AND EXTENSION MAY BE USED)'/6X,'LPT:',5X,'LINEPRINTER  (MULTIPLE COPIES MAY BE REQUESTED BY USE OF'/29X,'THE "/COPIES" COMMAND)'/6X,'DTA#:',4X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED;'/29X,'FILENAME AND EXTENSION MAY BE USED.)'/6X,'MTA#:',4X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/29X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO OUTPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE OUTPT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'LPT: ON BATCH JOBS'//' (4)  IF LPT: IS LISTED AS THE OUTPUT DEVICE, THE NUMBER OF COPIES WILL'/6X,'DEFAULT TO 1.'///' EXAMPLES:    LPT:/2'/14X,'RPT.DAT'/14X,'DTA0:NAME.DAT'///)DTA0 S    INPUTB    .    DSK  OUTAAE    A.AAAH    K    N    OUTPTT    C    TTY  F    I    L    O    /    A    0U    DTA9 .DAT [    :    XCDR  `M    P         LPT  DSK  DSK  TTYDAT.TMPS> \55 p @2L6D2T+5P 1 D2u 2u D1 2LA$5D5S 2 D2M 2LA$0D+5V 2 D2M $.2L6b0b+5[+5Y45[45^45]45` <7,, 1 D2P+5a <8,, 1 D2P <8, <8,
 2T2D5?+5m 2U2D5?+5m 2U2D5<+5m 2V2D5?+5m 2V2D56+5m 2W2D5;+5m 2W3D5G+73 2T2D56+5x 2U2D5A+5x 2U2D5F+5x 2V2D5:+5x 2V2D5G+5x 2W2D5G+5x 2W3D5G+79 2T2D5>+6 2U2D5@+6 2U2D5<+6 2V2D5=+6 2V2D5?+6 2W2D5<+6 2W3D5B+7c 2T2D5;+6 2U2D5:+6 2U2D5@+6 2V2D5G+6 2V2D5G+6 2W2D5G+6 2W2D5G+6 $.2L6b0b+6+647X47a@d2u <7~,:( $2D2K+6 $A2L0D+6 <7|,@q@d2K@d3 D2M D2L D2v D2E D2E D2m 5G F2C F2C F2M D2F D2s:2F0d+6; 2T2F58+6" & F2s 2T3F5D+6' 2T3F5D+60 2T3F5A+6:+6 $.2F D2L"&.2F $ 2R H2T/$8&6* 5F 2F.& 5G H2T*d6, $.D2F+6 $.2F D2v"&.2F $ 2O H2T/$8&63"& 2F 5G H2T.$8&66 $.D2F+6 2F D2E+67D2v+6G <8,.$ D2t"2v/&.2t 2t F2P D2t 2t <8,
:2t; 2P+6A, <8,	 <8,
6D2s+6Q $.2L D2s"2s.2L 2s D2t 2t 2T2D5G+6O>2t8&6K $ D2t 2t 58 F2T <8, $.2L D2q"&/2L.2q 2q F2N D2t 2t <8,
:2t; 2N+6V,7D2L+6a <8, 5E_D2NZD2t 2t <8,
:2t; 2N+6],7D2E+6l <8,.$ D2o"2E/&.2o 2o F2p D2t 2t <8#,
:2t; 2p+6g, <8$,	 <8(,
35G2D2M+6y3D2C+6p+59+F2M+6y"31D+6s 5> D2M+6y $A2L5D6v 5E,D2M $A2L0D+6y.5H+D2M <7z,?S 2M3D59+73 <8),	 5BD2nZD2D 2D <8-,
:2D; 2n+7,"& $ D2q 2q 2T2D5G+7>2q8&7 2q 2S2F57+7 2S2F5<+7 2T2F5<+7 $ D3 2C2D5G+7& $A2L5D7" 57 D2C $A2L0D+7% 5= D2C 5C D2C $A2L1D+7. <7t,?u7D2Q+7. <8.,,"30D+7. <7e,B}+5V@d2v 30D+71 $? D2v <7p,:5+6~ 2K0D+75 <7o,:( 2K0D+78 <7m,@q <7e,B} $3D2u+7UA2L5D7H <81,+7H $2d2B+7H3D2w+7@ <7k,?S $ D2w3D2u+7U D2u <7j,:(@d2v 30D+7G $? D2v <7g,:5 $A2L D2D1D+7Q 2E F2@ 2m F2A 2M F2 2P F1 2C F4 2C F4+7T 2C D2? 2C D2@ 2M D2 $ D2T+7c <84, 2B D2P+7H <86,, <89, <8<,
 <7f,:( $.2L6b0b+7a+7_45[45^45[45^ <8>,,+7[ 55,~x0P2B2v2O5J5656x2Bp5I2B`2r59582Ax2oP2P2v2M2C2E2mX2P2C2Q2E2mh2P2C2Qp5H2Pp2M2P`2r59582Ax2PX02wX02{X0732@2TP22F$2TP32F$2E$2mP22C$2TP22M$2TP22F$2TP32F$2AP22C$2TX03`2P`2BX03zX03~=$2p$2SX04;zI    F    A    (' FORMAT'/)(' FORMAT: (',A1,'-TYPE ONLY)'/)(80A1)(80A1)(' ERROR IN FORMAT, TRY AGAIN.'/)S    (    A    )    {M         O$ky \8~ p @8q p @8A !p @8q p @8r p @8B p @8B@d8C@d8r D8r &( F8s D8p2D8B+9 <9V,B} 8B0D+9 <9W,,0d+9 <9Z, <9],
 <9_, 9_D8HZD8s 8s <9b,
:8s; 8H+9, 8r1D+9& 8H2D8+9! 8I2D9+9! 8I3D9+9T"8B $ .8q 
9 J'.$8&9" $ D8r 8B0$+9)(.8B D8s"8s $ D8s 8s 8H2D9+9/:8s8&9* $ D8r+9T 8s 8H2D9+9- $ D8C 8C.8q <9c,"8s $ F8F D8s 8s <9g,
:8s; 8F+96,"8s $ 8H3H9:8p 8H2H9+9>"(.H8p.$8&9: $2d8p+9T &.F8C.8C3f8B+9F.8B/8C (. F8s 8s1$+9N <9h, 9_D8EZD8s 8s <9k,
:8s; 8E+9J,+92 8C0D+9Q <9V,B} <9m,, $ D8C+9
 8~ 8r Ap,~X8q8tX8q8u$8CX8A8y$8HP8s8z$8HX8A8y$8HX8q8{	`Z(X^. >[.~(3~+9t	~+9Z. \x <x*<x .->?;ez+9{!"	b+  "9|	b+Z. h+ggM?Th
&:	b+9o,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*:%**,^,~*x,> <:%*<:'  pZ@:@@:@@: :\`|+:Pw,~ "p h a`~+:h  ``~+:$:\!:d:]/"+:P,~@@@ @@0@x@@@`edX91,>B,>Zp @:\`: <:,,^,~SMI 1,>B,: :^ B:+:?_MI 1,>B,: :` B:+:?I5R1,>B,: :a B:*\:I7ApX":b B:/& pd"~l" B:*\:I/& pd"~l"$ B:*\:I/& pd"~l"

 B:*\:ISp*\:I/&Xp B:$@@:$ :c B:*\:I/& pd"~l" B:RF: <:,+:EV4i91,>B+:WS,i@1,>B+:W_,i@1,>B+:WK>21,>B+:WK>401,>B+:W[<I71,>B
&:c w @)@. 
"5B:X
&:i,~`.

.4SEQIN^:]SEQOUT^:_RANDOM^:`SEQINOUT:$
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
GFGp =p+:lGFI @;@ B;@5@:r5B:r p@5":q+D:0
:qU @,~ p @;A D;A@@;B`;A @;B ,> <;E,>,^,> <;G,?,^ @;C,> <;G,?,^ @;C#;@#;@2d*+ + $ B;@,> <;G,>4,^ ;A ;@+ ;1 @;@!$5";#b+ ;7+;+ ;(BdB+ ;5B;	  @6 ;A+;!"b+ ;;C+ ;<;C+ ;> ;A,~ +h$ +; +6@;B/;G7`;Bh$ ad +;6@;C,;;6@;C,;;@`+;,> <;H,>l,^;B @;D7@;C+;/#;C,> <;G,>l,^;D ,> <;G,>G,^7 ;C"` @;D7@;C+;0#;C,> <;G,>l,^;D ,> <;G,>G,^7 ;C"` ;D+;@@;D+;&@ ;D+;,> <;G,>l,^ @;D,> <;I,>l,^;D+;:;BU",;;@;@+;6@;B+;+D:0;<,~ B;D,;: ;D+;,;:@@+;p;@;@xx;@x;@GO-1,>B #p   D;v#5B;O5 ;q F;w @;u B;v#@@;w2d;;w*+ + &,> <;x,>4,^7@;w+;_  #,> <;x,>4,^ @,> <;y,>4,^+;f3$;z+;h #;u&+ ,> <;x,>4,^;u#;v"+;n#;u,> <;x,>4,^ @;u;u 7 ;u*7 ;v"` ;v ;w,~,> <;y,>4,^@ ;v,~ 6P'Mxx 0G01,>B #p##2 *+ <+ <  @< B<,> <<,>4,^<,~ ,~x<Gid@Q<+<G6id@Q<+<GieQ<+<G6ieQ<+<Gie@Q<+<G6ie@Q<+<Gid(Q<+<G6id(Q<+<Gid)Q<+<G6id)Q<+<Gid*Q<+<G6id*Q<+<G6id!`+<Gid,>p,^<_,>p,^<_!`,>p,^<^,>p,^<^,>,>,>,>,<) @<` <^*<^"@<^,<),^,^,^ @p,^,><`,^p,~ <^ <^<_+ <-<_+ <R,~ <_7@+<Bd+ <4Faf+<6 @<`+D:0
<3 <`,~4D<1Faf+<:+<14D<1 <_ <^+"<a@,~ <_<_ <^<^+ <?<_+ <^,~<_ <_<^,~+ <I#3&<a+<E",~$5 <^ 5<_+  5,~4D<K"D<`+<2 <^$5<_+  <^ 5<_+ 5D<H5@<H+D:0<Q@,~5D<V2 <a,~ 5 <^$5<_+ +<H DFab+<Y"D<`+<2 <_&<^+ <],~"F<`+<2,~G!d@Q<+<vGid@Q<+<tG!eQ<+<vGieQ<+<tG!e@Q<+<vGie@Q<+<tG!d(Q<+<vGid(Q<+<tG!d)Q<+<vGid)Q<+<tG!d*Q<+<vGid*Q<+<tGidO@=x+<vG!d@@=x!`,>,> @=v p @=t p @=u =v!` p @=u p B=v4@=4B=6@=t+=6@=u+=@@=w@@+=7 =t=u @=w =u=u+=7 =u=v @=w"=t=v+=7=u+ ==v+ =+ = @=v =u=t+ = =u=v+ =+ ==v+ = @=w =t=v+ = =u=u+ =B+ ==v+=7 D=r F=s H=s =t#=t#=u (3`+=*=u D=t"h =u#=u#=v3`+= *=v D=u$( =vd+ + $ D=x =t=u+ @+ 1H"(.(6 "f&7@"f,=; @=w @=w =t =u3H=y"d3H=z"f  =u+ =U=v+ =X+ =_,=;5(=4 @=w+=5 @=w =r =s =s =w7@=x!`,^ @p,^,>=w,^p,~#=u#=v#3$=y+=B3"=y+=A3 =y+=A=x+=R+=@=x2b=y+=H2`=y+=F3d=y+=KB+"=R+=R3`=y+=F3d=y+=FB+=R B=v+ =NB+=R =v @=v+ =QB+=R =vB =uF=vF7`"`,~=v+ =l   =u+=Y =v D=t4F=l#2"=z+=2&q q@+ f&q+ =b+=2 =u&q$q J=t =v =u#
3*=y+=j#
2*=y+=h qB+=kB q+=kD q 
=t+=3>@=tB=u=v=u+=q=v=v+=3+D:0=r+=3 0C&l`1,>B #p ,~G>u)`1,>B #p ",~CR

`@>,>B<>,>,^6->,~52>>,~>,~+``+>4@>>72>"`,~4">+D:0>,~>>7>"`,~>Y~j9~jx>CR7 "` >2,~ &`V-G {G ZCv\ 7f ]V#QI+0`} 9~jgG@1,>B7cp+>> (Bdb+>9.>B"+>:.>B"TB#p@,~4B>A+P:0

>B#p+>6  ,~>attempt to take SQRT of negative argKc1,>B p3">b+>L3b>b+>N+D:0
>KU ,~+D:0>M  ,~ D>c F>d@@>c%"j"%>a)/;`:XD>]5f>UaF+>U.&@(|h&f>c >_>` >` >c>_D>a@ >c >d,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>B p4@>| @>k,> <?,>l,^>j,~{e^bC2|p1,>B p5`>p4@>|+P:0?#p3@>+>~)r. !@?! n@?(|h"> ? B? ??????,~+D:0
>} ?,~  ,~ 0_i/X3 6P'M 5( bB W
R`@x>kATTEMPT+TOTAKELOGOFNEGATIVEARGG?@1,>Bp?,?,+?+?g&t@1,>B3p?,+=+?G?1,>BRp?-+?g&p1,>BpB?+#`3b?*+?'pD?-?-3b?.+?%"(D?d$"@($)B?3".!p Ap $Ep,^,^,~!$hX$h@@h*% "?C BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHI4:1,>BZ.@6kp2j8M+?c !pQ A` ?\\$}

4L?[/,L8$?X.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

&?] <?c,

iSN,>B@ApO
,7 OAp,~I5r1,>BO@
,4"?n,@A``,~ <?o,

44?q4@KbN=1,>BO@@ p4B?y,@A4@?y9?}9?|KbN=1,>B@@@!$Lu 	`@Ap``a`+@a`+@ D?tA (`@/"#B?s@@?t !pX@?p,> <?p,@$,^7@@+@OAp+@ #pQ"A` $1@+@
! H: @?r@@?sa|+@[pd0@ +@[pd0@ +@+@_w6@@_w#`1 +@SpXp @?s
?s+@@?q+@+@
&@+@   Ap ,~ ERROR ON OPEN!
HH@"H@#G.t21,>B@@Ap! A`.!p @@  @! @@"@@@"@@@# & "@ <1D+@/-@:=b@*@ <0D+@8O " @! @@"@ <-@:=b@17@@"OAp !p<, @", @#,~<&@3@ 1D+@7   Ap+@31D+@71$+@41d+@?0$ 0d-+@4 $D@"+@:"@],@j0@+@Y p4B@[Lad+@X`b+@Y $0d"+@[&$$&(&}Z.G@].&$.$ 7F+@N  ,~ A$&$(DG$1$((D(D

 	`5@@[ .2bM+@W L.&7D!$Lu+@Z2"@^+@T &p,@b 	`,~
&@^ <@a,

.p M}ILLEGAL DEVICE NUMBER!
"@i,@j"'Q&A`$@i@1x,~180.8X=`@e,~.Hba|+@m0"0b/`,~0B1B,~0B/ ,~aJMm1,>B,B8+A
a|+A[pdp0B +A
+A_w#`1"+A
6cp 0d $QD`,AL+ ,B? ,~
&A+A

&A+A

@b -p .Q,A` 
A4PA1P+A/0P=nA,~`

``
CANNOT INIT DISK!

FILE NOT FOUND!
HH . 
A+AYC GaSa3 S;YC&<G<aS<a3&<E$;w|xA# PA B`1T!"L	b@XB`O@A> BP A>@,B?
+BH!,2,B)@!.~,B?`+BQ""1T""QBA<,B?	f+ 1$9A\+B7 8A#@`A# BS*(A< BS	n@`N+BX 6`
 BY1T BZ B` " B`\"

	b@ B`\"Z	b!"Z(BrbB[	b

 BA?	b
+"`B`!"2	b`b`b+A|!"2	b!`2B`+A|!$2	d!$Lu+A B[	b@B\,B\	d!$Lu BA= DA>,~@@AA B]*(AG BAA DAB BX B` DXZA?(D}	d ` DAA DX "2D`bB]d  "bB^,B?@A@+B^ AG BX@@AH Ba	b$+B!"AIX"X*"X!"`
+B#!,2,B)B,B?"X

AB AB,B? +B# JX,B? +B7
&Bb "bB]a`+B"+Ba`+B",B? A@+ +B" 	x HB2	h	&(2 
PA Bh.A? &..0P`bp+B-d

@ A=,B?+B2`L+B+ A=+B7 (!*Lu@

,B?
,~:x,~ " BBPO@A?O@A@g "?$BP+BG	d5DB; BP(D DA?+B7,> e`p+BC7 A@+BFl!A@+BE7 A?+BFl!A?:+@>,^+B7
&Bh,~ "
&Bj,~ "
&Bp,~,BO
&Bx
& ,BO	b (Bx+BK
&B|,~@;`A>+AP+BJ8A$0CMQ Cannot do MPB QUEUE on GALAXY system. (BT+BK`` `P$` hAA

XHXa`,~!"GB`+B"@AH6$AB
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0NO FREE CHANNELS!

% CANNOT OPEN QUEUE DEVICE!
% PLEASE NOTIFY OPERATOR!

% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
?QMRCNC Can't CONTINUE -- try REENTER
KbN@1,>B,

,~BY\CQ<X\C*+