Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/oneaov.exe
There are 2 other files named oneaov.exe in the archive. Click here to see a list.
?p@?x_:,{Kb)E}.E`INXQF:{A)'[_{BE@
[(#sX	y *>	`RR  $ DJ $ DJ $ DP-\s4O@I"$ DI IX@7 "8b +=(///,' ---WMU ONE-WAY ANALYSIS OF VARIANCE---',/) -\ 4L-\4-\4@@ J3DPgO &3FgOG4$P IX@G "Hb +O(' ?CANNOT USE "SAME" OPTION FOR METHOD ONE AND',	' TTY: DATA',/)+? IX@Q "Rb +X(' ENTER OUTPUT IDENTIFICATION, IF DESIRED',/)     IX@Y "[B 4 +](16A5)     J3DP+3"$ D"& F-\7444&444 $2D+f  D& IX@h "ib +l(' HOW MANY VARIABLES? ',$)    IX@n "pB   D+q(10I) 5dw IX@t "b  L4Dv-\+f IX@x "yb +~(' ENTER METHOD OF INPUT(1 OR 2) ',$)    IX@ "pB  J3DPgO &3FgOG4$	 IX@ "Hb +w $3DgO &3FgOG4$ IX@ "b +? $3$+"$.4$4D%+3 IX@ "b +(' ?RESPONSE OUT OF BOUNDS',/) L4D-\+w IX@ " b +$(' ?PROBLEM TOO LARGE(SIZE=',I5,')',/)  +f IX@& "'b +*(' HOW MANY GROUPS? ',$)  IX@, "pB  5db IX@0 "b  L4D2-\+% J2DP+5  D IX@7 "8b +=(' WHICH VARIABLE IS THE BREAKDOWN VARIABLE? ',$)  IX@? "pB  2dgO &2fgOA4$J IX@G "b  L4DI-\+3 IX@K "Lb +Q(' ENTER BREAKDOWN LIMITS(MAX. 20)',/)   IX@R "WB : Z >1:
9S +W(10F)+X(20F) :
 Z h>4$\5db0z=Y IX@] "^b +b(' ?BREAKDOWN LIMIT ERROR')   +J $$$ (. ($. D-\14444H 4$ $ D . D . D . D . D . D . D . D . D  $HXD  $HXD  $HXD  $HXD  $HXD  $HXD  $HXD  $HXD-\"444444444444&4K4K444>4J4P+?-\+  +0t(10F)O@B"$ DC BX@T "Ub +\(' ARE ANY SYMBOLS TO BE USED FOR MISSING',	' DATA?(YES OR NO) ',$)   @@C CX@^ "`BD +a(A3)  12DD+t $ DC BX@e "fb +m(' TYPE MISSING DATA SYMBOL FOR EACH VARIABLE(10 PER',	' LINE)',/)     CX@o "sB : ZD .:3:;9p +t(10F)"$.<5d_ BX@w "xb +~(' ENTER NUMBER OF ELEMENTS PER GROUP(10 PER LINE)',/)  CX@ "B : ZD .93:<9 +(10I) 13D=+
 BX@ "
b= +(' DATA IS BEING READ FROM ',A5,/)  : ZD : ZE"$.D$; . FE E.7@@ E.8@@ E.8@@3:;9 D.9 4dT 12D=gO @3F@gOA5$" BX@! ""bD +&(' ENTER DATA FOR GROUP 'I2,/) D.9  D5 : ZF @3D@+: @X@- =Q"  YX@B : ZE .:3:;9. F  12D=+: @X@5` : ZE .:3:;96 F +A @X@<  YX@@ : ZE .:3:;9=  : ZE"$.D$; . FE .:  .:2DgO &2FCgOA4$T .:  E.7D .:  E.8D E.8: E3:;9A F3:59( D3:<9+A BX@Z "[b +^(' ?NOT ENOUGH DATA',/)  +. 12D=gO @3F@gOA5$f BX@e "wb  13D=+k BX@i "
b=  : ZD : ZE"$.D$; . FE E.7@@ E.8@@ E.8@@3:;9m D3:<9k@@F+z(' ENTER DATA',/)    @3D@+
 @X@~ =Q"  9X@B : ZD .:3:;9  12D=+
 @X@` : ZD .:3:;9 + @X@
 9X@@ :.ZD .:3:;9O &2FCgOA4$z ?.:  .?2d+7 : ZG ?3D+5 .:  .:2DgO &2FCgOA4$5 ZE ?2$+)"$. DE"$.;"&.D$ E. FE .:  E.7D .:  E.8D E.8:3:;9+z D3:<9:F+z>; BX@; "=bF +A(' NUMBER OF REJECTED SAMPLES=',I4,/)    BX@C "Db +I(' WOULD YOU LIKE TWO-SAMPLE T''S?(YES OR NO) ',$) CX@K "`BG  12DG+i $ DH BX@P "Rb< +a(' ENTER A 1 TO USE THE POOLED MEAN SQUARE ',	'FOR JUST THE TWO GROUPS,',/,' ENTER A 2 TO USE',	' THE POOLED MEAN SQUARE FOR ALL ',I4,' GROUPS',/)     CX@c "BH  $2$HgO &3fHgOG4$O "lb!>4 +m('1',16A5)-\@4]-\X4H "xbH$]4  13D>+x BX@u "xbH$]4 +z(/,1X,A5,1X,2A5)     : ZE@@I@@I@@J@@J@@K@@K@@L ZL ?1DgO 3&?gOA5$ $. DL : ZD"$.$; E. FE $ E.82d+j:L I5D "bL +(///,1X,T21,'*** VARIABLE ',I3,' ***'//,T9,'GROUP',T22,	'SIZE',T30,'MEANS',T41,'VARIANCE',T54,'STD DEV',/)     $ DI $ E.83$+/ D.9 E.7 ' F>L $ DK "(bD E.8 D.9 +.(1X,T10,I3,T20,I5,T26,F10.3,T40,10('-'),T52,10('-'),/) +j E.8 ` E.7 ' D.9 D'"$ E.8.` @A ` 
E.
7 // 
E.
8/A 
D.
;"F/D.;,5$BED.;@@BD.;U$XDD-\4D @M)2D.;3$+J$DK>L+]!$}IE.8`@I"$E.8.`!&FJ"$SE.8.`'@A/D.;T&'XFW-\4WA@J"$	E.8.`D.;@K"dbDE.8LD.9CD.;MU+j(1X,T10,I3,T20,I5,T26,F10.3,T40,F10.4,T52,F10.4,/)D3:<9$2DKgOL1fgOG4$x"rbL+w(///,'ALLGROUPS.EMPTYFOR.VARIABLEE',I2,/)+$2DK+"{bE+(5X,'BARTLETT''S7TESTSTATISTICISNOT:POSSIBLE',/,	5X,'SINCEATLEASTONESAMPLENSIZEIS1QORVARIANCEDISQ0.',/)+)KIDK"$.LDMM5d"S`N Q DT`S R DT TT DU-\G4N4S4U @U "db +q(///,17X,'ANALYSIS OF VARIANCE TABLE',//,	' SOURCE OF VAR.',T18,'D.F.',T27,'SUM OF SQ.',T40,'MEAN SQ.',	T58,'F',T66,'PROB',/) "ubNQTUU +{(' GROUPS',T18,I5,T26,F11.3,T39,F9.3,T51,	F9.3,T65,F6.3/)    "~bSRT +(' ERROR',T18,I5,T26,F11.3,T39,F9.3,/)   "bSR +	(' TOTAL',T18,I5,T26,F11.3,/)  12DG+ 2 DV!$HV DV"3DV"`V "bV +#(///,21X,'TWO-SAMPLE T ANALYSIS'///,T17,'MEAN',T30,'T',	T59,F3.0,'% C. I.',/,1X,'GRP-GRP',T13,'DIFFERANCE',	T28,'VALUE',T39,'PROB',T47,'DF',T51,'LOWER LIMIT,',	'UPPER LIMIT',/)    "$ DA-\S4A@@W"$.< D5 : ZD $.  ZF"$.D$; E. FE"$.$; E. FW 3 DX E.8  W.8$4D~ $ W.82DgO & E.82F'gOG5$< 4 DX 42DX+? $ DW D.9  .9 DX E.8  W.8$' DA-\/4A 
.
' @A`A @Y $3DH+_"$ E.8. W.8. DY Y4d~"$ E.8.` D.;"& W.8.' @A` .;'AY @Z Z4D~`Y Z DZ-\4Z @Z+c TY DA-\4A @Z S DY-\
W4V4Y @[ Z[X"D[ Z[X D\ XZ D\ \\ DA-\G444Y4A @] "ubDFXX\]Y[\ +~(1X,I3,'-',I3,T10,A1,T13,F8.2,T25,	F8.3,T37,F6.3,T45,I4,T52,'(',F9.2,',',F9.2,')',/)  F3:<9) D3:59' $2DW+ "b +
('#-INDICATES'ATSLEASTOONEDGROUP OFUSIZEF-R1',/)bTWO0$2DH+j4$2DH+-"b<\+(' USING POOLED MEAN SQUARE FOR ALL ',I4,' GROUPS',/)   E3:;9{ BX@ " b +!(//) +.4 Z6 \6  7, p, p, p, p, p, p, p, p,!p,!p,!p, p,!p,!p, p,!p, p,!p,!p	+Q 6 6\ @/ ,Ap-|p	YES  TTY  q} 3L 0     #     $22$	EgO 	E0fgOG4$	2!$
4	G4	H 	G5$q+	? 	HD$ D	G+	) 	ED D	F-\m4	F!&&"F	G+	)-\4	E @	G-\
4	G4	H 	G5$}+	? 	HD$ 	EF F	F-\m4	F	A 	G D	G+	) 	E7 .$( D	H 	H( 	E/4F	-\4	E @	G-\
4	G4	HD	G5$	 D	G 	ED D	H 	B	G-\m4	H!$ D	I 	H D	G!$ D	I+	 	ED D	F-\m4	F!& F	I!$	I D	G@@	H!$ D	G@@	I"$.	H D	C : Z	J!$D	I 	ID 	EF	G 	GD	H3:	C9	! 	H	ID	G"`	G"	BD	G"`	G "	,b	G +	1(5X,'WITH CHI-SQUARE PROBABILITY=',T39,F5.3) +	? "	3b +	:(5X,'NO PROBABILITY CALC. DF OR CHI SQ. OUTSIDE LIMITS')    !$} D	E+	?4 Z	C \	D  	D,!p,!p+^ 	C 	D\ 	E,Ap-|p 4dd dd 0-\94
 @
"

4d	O!$ D
+	| 
D D
-\24
 &. F
"$.
 D
-\/4
@ @
 

4$
5d	Z 
 
 D
+	|!$}

5$	^:
!$D
 

 D
 

$	 

$	p
"D
!$@

$

$ D
!$p

$4
"D
 

$$p D
!$4
"D
 









$4
 D
 

 D
-\m4

 @
-\4
 4 
 
 
 F
 
5$	!$
 D
+
 
 D
+
 "
b +
(' ?ERROR IN SUBROUTINE CUNO',/)   !$} D
+
4 Z
 \
  
,!p,!p+	J 
 
\ 
,Ap,Ap-|p x@ y~j  &E < _] vz O! n-d [u; "h0 Mvm fH, se_ z<! }Q<  QR o2 z2 ~ ; l z ~   
g
g D
i!$
i D
i-\4
i @
h-\4
h @
j 
]
j
^
j
^ D
j 
_
j
_
j
`
j$ D
k 
j
k
j"D
k 
k
k D
l!$
l
kD D
l!$ 
l$
l$@
k
` D
m!$@
l$
l$
l$	p
k
a D
m!$
l$B
l
a
l$p
l
b
k
b D
n!$X
l$)
l$h
l
c
l
c
l
d
k
d D
n`
g!$ D
k 
k
n
n
k
m
k
m
k
l
k
k D
h+
[4 D
e Z
e \
f  
f,!p,!p+
% 
e 
e 
f 
h-|pU6 X> TqlvNvX}n 6v,c!x"8"w"]D$6@"{l"Wt#qD0$v@ 05D
q J D1 1 DJ $A-5D
t K D1 $A- &2F+
x K D1 $.-6b0b7+
z4
}444
 IX@
~ "
b+('INPUT?+(TYPE HELP IF NEEDED)--',$)    J D2+
('@OUTPUT?(TYPE4HELPIFNEEDED)--',$)   JD2?IX@"2>gO 2H>gO 
2J=g
O
 
2L=g
O
 2N<gO 2P<gOAA
A
AAA4$ 2F>gO 2H>gO 
2J=g
O
 
2L=g
O
 2N<gO 2P<gOAA
A
AAA4$ 2F>gO 2H>gO 
2J=g
O
 
2L=g
O
 2N<gO 2P<gOAA
A
AAA5$H+ 2D?gO 2F>gO 2H>gO 
2J=g
O
 
2L=g
O
 2N<gO 2P<gOAA
A
AAA5$^$.-6b0b7+\43H3gOG4&h-\%4Z444P@@3@@L@@3@@4@@4@@5@@5@@6  D.  D.  D1@@6@@7:6 $3$6+
  62D;+u $ D7  63D;+{  63D;+
  63D;+
+p $.6 D4 $.6 D( : Z7 h9 Dh;2z(=!: Z7 6.  F;1:9
 $.D6+p $.6 D4 $.6 D) : Z7 h7 Dh;2z)=
 $.6 D) 6 Z7  Dh;3:)9
 $.D6+p 6 D5+p 44D
"  UX@ " $.4 D* &.4  Z7  ;3:*9
   UX@ "
!b56 +
"(2O)  75D
+ $.4 D* &.4  Z7 2Dh;+
*2z*=
& $ D7 7  F<  .X@ " $.4 D+ &.4  Z7  ;3:+9
0  44D
:  1X@ " : Z7 ;1:9
7  54D
G  UX@ " $.5 D+ &.5  Z7  ;3:+9
@   UX@ "
FbP +
G(I)   2D1+
T 3D.+
K  D1+
T"$3DL+
N   D1+
T $A-5D
Q   D1 $A- &2F+
T ! D1-\4142 3D1+
p !3D1+
d !2d1gO "3&1gOA4$
p+$A-0DgO 32F1gOA4$
#42-\*424.48 $3D8+
n $.D.+
i . DZ . DZ@@L  .X@ "b : Z9 ;1:9
s  : Z9 2Dh;+
z0z=
w $ 92D;gO 2H;gO 
%2J:g
O
AA5$2D.+2F+
&*D.2&.D.8$A-6&3F+
x@@: $2DL+24:434
.4546+
^-$2D3+2D3+P-\ $3D2+
#4P$D:$3D2+2DL+
'4$4$$A-D;$3D;++.HDMX. DM+IND 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.'///)     IX@L "Nb/0 +
(' 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.'///)-\S4I $.-6b0b7+4
}44
}4 IX@ "b +('-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'///)    +
+4 Z, \,  -,!p+
o , ,-|p     H    S    I    N    F    E    M    A    U    T    O    C    P    L    .    :    [    /    DSK  TTY  CDR  LPT  DTA0 DTA9 OUTAAA.AAADSK  K    B    INPUTOUTPT.DAT TTYDAT.TMP[    ]    @@H@@F@@H $( DI@@I F5D_-\ $2DG+c DX@b "cb +e(' FORMAT'/)    $3$G+j DX@h "jb Gr +n(' FORMAT: (',A1,'-TYPE ONLY)'/)    EX@p "tB : ZJ J1:(9q +u(80A1)     $3DH+ @2DLgO @2FKgO A2HKgOAA5$+= : ZJ .E A F3:F9 $ DH $3dF+ $$F DI : ZJ A2DhJ+
3:I9 $ DF+= B J2DJ+
 $ DJ IX@ J.E  X@ " : ZJ J3:I9 +(80A1)     : ZJ B2DhJ+:I B2DhJ+>I3:I9 $3dI+ += $.DJ $.J3dF+% $.F/J$$ DI $2dI+- EX@( "tB : ZJ J1:(9) + $2DH+/-\ DX@0 "1b +5(' ERROR IN FORMAT, TRY AGAIN.'/)   $ DH+[+=4 ZC \C  D,!p,!p, p,!p,!p,!p+[ C C\ G/ ,Ap-|pM    A    S         (    )    I    F    A    +4u  WQ * \ Z] \]  ],!p $A^1DgO !8WX8*8 ] ]-|p+4  ^Q * c Zd \d  d,!p-\u4eJ!8^X8*8 d d-|p k Dm k4D $3Dj+ k Dm $t2$k+ $t Dk $/j j7 .&((. Dn $/k k7 .&((. Dn k5D "b +(' % FISHER: ZERO DEGREES OF FREEDOM WITHIN')-\/4k @l-\/4jkl @o!$o!& Fo-\u4j4 2-\u4k4 , oo Dp oo Dp+A-\4o @p oDp Dp"RDp"`p+A-\u4k4 9 oo Dl-\4l @p pDoo Dp+A-\4o @p S Dq oqp Dp qD-\i4p @p oDo Dq $.n2dk+j-\4j4 U $.n  Zq"$. Dl-\/4l @l-\/4nl po @p"$. Dl-\/4l pqFp.:3zk+H+j@@r"$.k` @l-\4ol@3 S+_"$.k7 .$( o 
,@ Hr-\/4n pr @l-\/4kl @p pr"Ro"Rr 
o
oIDp-oo Dq!$Do"$.kDn$.n2dj+$.nZrn.Dq"$.Dl-\/4lpq@l-\/4ql@p-\/4qopDp"`p.:3zj+r!$pDmm5$@@m+!$DmmDk$t3$k++Mk5$	"	b +
T,!&vWDl-\94l@ouT,vvDl-\4loFo$3dt+<-\/4t@lloU$oDoUoVoVoWo$Do!$oDm$2Ds+G"RDm"`m+M4eQ*iZi\jj,!p,!p,!p+t!2eX2*2ij\k,Ap,Ap,Apm-|p0t/Ld.!0D+D"D-\m4@@!7D+4d"D"`+4XD F7ZD\7@,!p+w [ ,\^,Ap+-|p]S=t80&vh|9 <@;b =w*5$3,yD07\ @< @tXQ< \  \+a[`x ,x+{Z \@@@@< \+a7 X\ @@@@+c>x! Z @
&U`eB+
@)@G 
"+
&+#6$1,>
p.46$O z.
.4.SEQIN@SEQOUT@@t
%5 Source level error at user's loc	
	`Z(X^. >[.~(3~+	~+*Z. \x <x*<x .->vez+&!"	b+  "'	b+Z. h+ggM?Th
&,	b+,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*P**,^,~*x,>,<P*<R1,pZ@F@@F@@G `|+:Pw,~ "p h a`~+?h  ``~+@$!Ad/"+:P,~@@@ @@0@x@@@`edX91,>
 BF*\t7ApX"l" BF*\t/& pd"~l"$ BF*\t/& pd"~l"
BF*\tSp*\t/&Xp BO@@O  BF*\t/& pd"~l" BFRFE <F,+1EV4i91,>
& w @)@. 
"5B
&,~`.
.4SEQIN^SEQOUT^
RANDOM^SEQINOUTO
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>,>+&"S0B+!!"A`X#p5@/#p!"X#p+&\p+&a.9'1,>
6+ _4`."`Q@,> <T,,^,> <W,
,^*b++9,> <Y,,^7@S+4,> <\,
,^+6,> <],
,^Z5"9,> <_,
,^,7@S,
,> <`,,^,,> <c,,^,> <f,
,^(@qd1@,,
1@#+G0@*+9,>T<h,,^+9,^,^,^,~('TypeGtoContinue,XtoExit,TTotrace.'/2H*,$)(A1)(1H14A5/)(1HA5,1X,O6)PAUSESTOP.pXOp{XPp9Rp>Rp XIX~Op xCR
."TB#p@,~4B+P,0
#p+  ,~>attempt to take SQRT of negative argKc3@ p p+"Kc3K  ," 
,~Kc3J  ," ,~Kc3I  ," ,~Kc3H4B85@%5"7+D,0
$U ,~,>,># $)D/$@,>4d/X $(F) + /5F/5"-"` ,F+6#  ,> <9,,^@,> <:,m,^5&6",^,^,^,~! ,~xxKc#@ p p+FKc#K  ,F @,~Kc#J  ,F @,~Kc#I  ,F @,~Kc#H4Bj5@J5"T+D,0
IU ,~ Di!$ @h Bi5"Q#`+ f,Q!"B,~+ T(BdB+ T5BO  i,~ +7`i+]`d +D,0X+D,0
XU`d@6h+Si`B"`+S/kid ++D,0X#h,> <l,,^ @`i@,> <l,m,^+ZU",Qh+ T+N! ,~xKc1,>
qU ,~+D,0s  ,~ D	 F
@@	%"j"%)/;`:XD5f{aF+{.&@(|h&f	   	D@ 	 
,~!t0'"S'qf!um.	.#Y%,!vyO^	RXC2|t(1,>% & B) &''))(,~+D,0
# (,~  ,~ 0_i/X3 6P'M 5( bB W
Rp`@xATTEMPTTOTAKELOG>OFNEGATIVEARGM2|1,>
(@ $q&$.$.&(D(F.. #p**,~.$D.&-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-i&lP1,> r&$2 $D q q,~ q q,~&" "B $D+KK9:1,>
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
ZM?L@INXINXINXINXINXI2I2\I20I2@GiSHI4:1,>
4L/,L8$.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

& <,
iSN,>
,7!OAp,~44&4RKbN=1,>X@$,> <$,X,^7@R+=OAp+Q #pQ"A` $1@+B0`=d>! H: @&@@'a|+H[pd0@ +L[pd0@ +L+Kw6@Rw#`1 +LSpXp @'
(+O@&+P+Q
&S+Q   Ap ,~ ERROR ON OPEN!
HHWHWG.t21,> "U<1D+d-o=bU<0D+lO " V @VU<-o=bf7@WOAp !p<, W, W,~<&hU1D+k   Ap+h1D+k1$+h1d+t0$ 0d-+h $DV+o",0@+
`b+"+&$$&(&}Z.G.&$.$ 7F+  ,~ A$&$(DG$1$((D(D
 	`5@ .2bM+ L.&7D!$Lu+2"+ &p, 	`,~
& <,
.p M}ILLEGAL DEVICE NUMBER!
",'Q&A`"@1x,~180.8X=`,~.Ha|+"0"0b/,~0B1B,~0B/`,~aJMm1,>
a|+;[pdp0B +?+=_w#`1"+?6cp 0d $QD`,+ ,t ,~
&L+@
&N+@@b -p .Q,A` 
P4PJ1P+Q/0P=nF,~`
``
CANNOT INIT DISK!

FILE NOT FOUND!
HH . 
Q+FYC GaSa3 S;YC&<G<aS<a3&<E$;w|xX PS B`1T!"L	b@XB`O@s  r@,t
+}!,2,^@!.~,t`+""1T""QBq,t	f+ 1$9+l 8X@`X *(p 	n@`N+
 1T  B` " B`\"
	b@ B`\"	b!"Z(Brb	b
 Bs	b
+"`B`!"2	b`b`b+1!"2	b!`2B`+1!$2	d!$Lu+4 	b@,	d!$Lu Br Dr,~@@u *(| Bv Dv BX B` DXZt(D}	d ` Du DX "2D`bd  "b,t@u+ | BX@@| 	b$+E!"}X"X*"X!"`
+X!,2,^B,t"X
v w,t +X JX,t +l
& "ba`+V+?a`+V,t u+ +V 	x Hf	h	&(2 
PS .s &..0P`bp+bd
@ r,t+f`L+` r+l (!*Lu@
,t
,~:x,~ " BO@tO@tg "?$+|	d5Dp (D Dt+l,> e`p+x7 t+{l!t+y7 t+{l!t:+@>,^+l
&,~ "
&,~ "
&%,~,
&,
& ,	b (-+
&0,~@;`s++~+X0CMQ Cannot do MPB QUEUE on GALAXY system. (+`` `P$` h.Xv
XHXa`,~!"GB`+V@|6$w
% 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
C2d;y1,>p  $	b2+j "6@&Z&." p4D.$(B{(D{0d+| B D ( & Q&	f2+A4&A1(~9= H3H+M2(+U.(3(  H@@@@aS"xZHb:a.(3h*bG!$6@GDb 	d2+O3h+F (F+z6@+QO@+IOApZb3b+|/"* B+U@Ap :!&@@a!"x Hb:aGFb.(3h*bX 	d2+ 3h+W6Ap+|+MZ	b+ @gp+{6@&+oZ.$1$ $!	d+| $QD&,~ pZaD $ 	fQ&[[&.&."`b+|!."!`aB	b:p	d+|/'p.& Gp,~OAp,~G3]x1,>
&	` ap 
Cannot write-enable high segment data area.
KbN@1,>
,~Y\Q<X\*+