Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/reco.exe
There are 2 other files named reco.exe in the archive. Click here to see a list.
?p
?x e p Kb)E}-TE` INX Q F: { A) '[?{B E@ k (# > 'C RIN.DAT (18X,'WESTERN MICHIGAN UNIVERSITY'/24X,'COMPUTER CENTER'/25X,'REGRESSION AND'/16X'PARTIAL CORRELATION COEFFICIENTS'///) (' TYPE 1, IF YOU WISH TO ENTER RAW DATA'/' TYPE 2, IF YOU WISH TO ENTER THE CORRELATION MATRIX.'/) (I) (' HOW MANY VARIABLES ARE THERE?'/)(' ENTER THE RAW DATA (AT MOST 10 PER LINE)'/) (' ENTER THE RAW DATA.'/)(' THE RAW DATA IS BEING READ.'/) (' ERROR WHILE INPUTTING DATA.'/) (' RETYPE THE LAST LINE.'/) (' THE ERROR IS ON RECORD'1X,I4) (' THE CORRELATION MATRIX CANNOT BE COMPUTED FROM THE DATA GIVEN.') (' ENTER THE CORRELATION MATRIX (AT MOST 10 ENTRIES PER LINE)'/) (' ENTER THE CORRELATION MATRIX.'/)(' THE CORRELATION MATRIX IS BEING READ IN.'/) (' END OF FILE READING CARD'1X,I4) (' A CORRELATION MATRIX REQUIRES A VALUE OF 1 ON THE DIAGONAL') (' MATRIX IS NOT SYMETRIC.') (' ALL CORRELATIONS MUST BE LESS THAN OR = 1') (' ENTER ONE OF THE FOLLOWING CODES:'//4X,'ID - TO ENTER IDENTIFICATION'/4X,'DEL - TO DELETE A VARIABLE'/4X,'INC - TO INCLUDE A VARIABLE'/4X,'ALL - TO INCLUDE ALL VARIABLES'/4X,'BEGIN - RESTART PROGRAM'/4X,'COR - FOR CORRELATIONS'/4X,'SREG - FOR SIMPLE REGRESSION ANALYSIS'/4X,'MREG - FOR MULTIPLE REGRESSION AND MULTIPLE CORRELATION'/12X,'COEFFICIENTS'/4X,'PCOR - FOR PARTIAL CORRELATION COEFFICIENTS'/4X,'PART - FOR PARTIAL CORRELATIONS[USER SPECIFIES FIXED VARIABLES]'/) (/' *',$) (A5) (1X,A5) (' TYPE ID,DEL,INC,ALL,BEGIN,COR,SREG,MREG,PCOR, OR PART.') (' HUH?') (' ENTER VARIABLES TO BE HELD FIXED'/) (5I) (' TOO MANY ARE FIXED'/) (16X,'PARTIAL CORRELATIONS'/) ('1',55X,'PARTIAL CORRELATIONS'/) (' FIXED VARIABLES ARE:',5I3) (' TYPE IN ONE LINE OF IDENTIFICATION.'/) (16A5) (1X,16A5) (21X,'CORRELATION MATRIX'/) (A1,55X,'CORRELATION MATRIX'/)(1X,16A5) (/) (/1X,I2,1X,13F9.5) (//) (' SIMPLE REGRESSION ANALYSIS CAN ONLY BE COMPUTED FROM RAW DATA.') (17X,'SIMPLE REGRESSION ANALYSIS'/)(A1,51X,'SIMPLE REGRESSION ANALYSIS'/) (/' NUMBER OF OBSERVATIONS = 'I4/) (' INDEPENDENT'4X,'DEPENDENT'5X,'REGRESSION'6X,'INTERCEPT'4X,'STD. ERR.'/' VARIABLE'6X,'VARIABLE'6X,'COEFFICIENT'/) (8X,'INDEPENDENT'14X,'DEPENDENT'14X,'REGRESSION'14X,'INTERCEPT'14X,'STANDARD ERROR'/9X,'VARIABLE'16X,'VARIABLE'15X'COEFFICIENT'/) (5X,I2,12X,I2,8X,F9.4,7X,F9.4,3X,F9.4) (12X,I2,22X,I2,17X,F9.4,15X,F9.4,16X,F9.4) (' HOW MANY VARIABLES ARE YOU GOING TO DELETE?'/) (' TOO MANY VARIABLES DELETED.') (' TYPE IN NUMBERS TO INDICATE WHICH VARIABLES ARE TO BE DELETED'/' (MAX 20 PER LINE)'/) (' HOW MANY VARIABLES ARE TO BE INCLUDED?'/) (' THAT IS MORE VARIABLES THAN WERE READ IN.') (' NOT ENOUGH VARIABLES INCLUDED.')(' TYPE IN NUMBERS TO INDICATE WHICH VARIABLES ARE TO BE INCLUDED'/' (MAX 20 PER LINE)'/) (' INCLUDE AT LEAST 3 VARIABLES FOR THIS ANALYSIS.') (19X,'MULTIPLE REGRESSION COEFFICIENTS'/) (A1,48X,'MULTIPLE REGRESSION COEFFICIENTS'/) (' VAR ',I4,12I9) (' DEP. COEFF. OF',10X,'INDEPENDENT VARIABLE'/' VAR MULT. REG.',I3,11I9) (/1X,I2,F9.5,3X,F7.3,11(2X,F7.3)/) (12X,'PARTIAL CORRELATION COEFFICIENTS OF ORDER 'I2/) (A1,43X,'PARTIAL CORRELATION COEFFICIENTS OF ORDER 'I2/) (10F8.5) 0 ID (10F) ALL PART DEL TTY BEGININC COR |p MREG 0 SREG ` X PCOR 0uWG/1 PCOR ASCII SEQOUT + -< = "$ D 0Od 0 $ D 1 $ D 1 +? D k < 1Y, >= < 1Z, < 1^, , @d H < 1X, 8c < 1W, 8c < 1T, < $ 2D (t+ +S +5 F (Q.d H +? D k < 1a, , < 1d, < 1g,
< 1R, 4A < 1h, , < 1k, < 1n,
< 1P, 4A"& $ F (G D (t@f, +; & $& . (t@h N*d +a: (t; (G+ +`@d (I J1D + ,E 22D +8+ +n (t0D + +k < 1p, , 1D + +p < 1s, , + +p < 1v, , : (I < 1y, " I $ F (F D (t (t < 1|,
: (t; (F+ +s, + , < 1}, , 23D +8+ +| < 2 , < 2,
" 30D + + < 14, Bk < 2, , + +p" 30D + , < 14, Bk+ +O" I $ F c D (t" I $ ( $ . (t
(t
( 5
5J N.$ 8& , (t 5F,: (t; c+ ,+ +p> (Id D F" I $ F D (t" I $ F } D z
,
$$ . z N F
(t (, & $ (t. (t N F F g5f ," < 2, , " 30D + ," < 14, Bk+ +O z$$ . (t z (t"
,
,
F
N J
0$& . (t
z" , (,
N
F
< 1O, >
L J: z; }+ ,: (t; + , I1d + ,5 < 2 , < 2
+ - +<_D |ZD (t +< & $& . (t ( $( . (t
0 H
> & $& . (t ( $( . (t N H\*d ,7: (t; |+ ,7 < 2, < 2, < 2,
+ - 22D +8+ ,L (t0D + ,I < 2 , , 0D + ,N < 2 , , + ,N < 2", , " I $ F (r D (t: (I < 2%, " I $ F (q D z $ $ z. (t < 2(,
: z; (q+ ,S, + ,g < 2), , 23D +8+ ,] < 2,, < 2/,
" 30D + ,` < 14, Bk < 21, , + ,P < 24, < 27,
" 30D + ,f < 14, Bk+ +O: (t; (r+ ,P" I $ F (q D (t$$ . (t!& 2F J+ ,y" (t $ D z z$$ . (t# J2d +2+ , $ $ (t. z z$( . (t J2H J+ ,|: z8& ,n: (t; (q+ ,j+ - < 28, , < 1N, ?X+ ,E < 2;, , < 1M, ?X+ ,E < 2>, , " 30D + - < 14, Bk+ ,E < 2A, , " I $ F (O D (t DK" I $ ( $ . (t
J J f.$ 8& -: (t; (O+ - I D x@d b < 2D, , < 2G, < 2J,
~3D +7+ -$3D +4+ .H3D +:+ .Y3D +=+ /3D +8+ /f3D +:+ 03D +6+ -2D +;3D +>+ 03D +9+ +O: G0f + -" < 2L, , " 30H + - < 14, Bk+ - < 2O, , + -" I $ F (K D (t D 5" (t $ ( $ . (t
J J
0.$ 8& -(: (t; (K+ -& < 2R, , < 2U, +>_D (|ZD (t (t < 2X,
: (t; (|+ -1, +=ZD (t (t7F(L+ -9*d -5 $ D (v+ -:"$ . (t D (v"$ . I2$ (v+ -? < 2Y, , < 1L, ?X+ -- 22D +8+ -C < 2\, , + -D < 2_, , < 2b, " (v $ F ({ D (t (t < 2e,
: (t; ({+ -G, " (v $ F (z D (t" I $ D z z (t (L2H 5+ -S (t z H(L+ -T: z8& -N: (t; (z+ -M"& $ F (x D (t" (t $ (t
(L3j(L+ -]
(L J +
(L L (L J(L.$ 8& -X: (t; (x+ -W I D y" (v $ F f D K (L F l" y $ F e D (t" y $ (t2( + -l * $
.
(t$( .
0 L( N+ -n ( $ . (t
0 J N.$ 8& -f: (t; e+ -e@d c> y" y $ F J D (t: c3F l: c c 5 F 5@f ," (t $ : ,3H l:
, ( $ l
c.
,.
. $ . (t 0 N " 2 ( N " 0 P +2 < 1K, >"( N 0 N ,$2 . cH N P8
0.$ 8& -x: (t; J+ -t: K; f+ -b" y $ F H D (t" y $ (t2( + . * $
.
(t$( .
0 L( N+ . ( $ . (t
0 J N.$ 8& .: (t; H+ ." y $ < 2g, "
y ( J m H z ( $ z. < 2j,
: z; m+ . , .$ 8& . < 2k, , $ D K $ D } 23D +8+ .) $ .d } }3d y+ ., y D } < 2n, "& . K/ } K F l D (t (t < 2q,
: (t; l+ .0, " y/& . K K D (s3d }+ .8 } H (s < 2s, < 2v,
"* .
K/
(s K J j H z ( $ z. < 2w,
: z; j+ .=, .$ 8& .5 }2$ y+ - < 2y, , .$ D K $ .D }+ .' < 2|, , !$ D (s < 2, +9_D jZD (t (t < 3,
: (t; j+ .M, " 30D + .X < 3, " I $ F i D (t (t < 3,
: (t; i+ .U, + -" I $ DK.$ 8& .Z 22D +8+ ._ < 3, , + .b < 3 , < 3,
+@ D k!$ 2D (s+ .i < 3, +9_D hZD (t (t < 3,
: (t; h+ .f, @d (s < 3, , $ D K $ D } 23D +8+ .p $ .d } }3d I+ .r I D } < 3, "& . K/ } K F a D (t (t < 3,
: (t; a+ .v, " I/& . K K D (s3d }+ .~ } H (s < 3, < 3 ,
"* .
K/
(s K J | H z ( $ z. < 3 ,
: z; |+ /, .$ 8& .| }2$ I+ - < 3!, , .$ D K $ .D }+ .m J1D + / < 3$, , " 30D + / < 14, Bk+ - 22D +8+ / < 3', , + / < 3*, < 3-,
+@ D k!$ 2D (s+ /" < 3/, +9_D {ZD (t (t < 32,
: (t; {+ / , @d (s < 33, < 36,
22D +8+ /( < 38, , + /* < 3;, , < 3>, I1d + // < 3@, < 3B,
+ /= < 3F, < 3H,
+<_D zZD (t +< & $& . (t ( $( . (t
> H
0 & $& . (t ( $( . (t \ H N*d /3: (t; z+ /2" x $ F x D (t K F c" x $ K H ,"
,.
c4J /c5j /J ( $ ,. c
0 H { ( $ ,. c J H e+ /O ( $ c. ,
0 H { ( $ c. , J H e ( $ c. c
{
0 J h c"
h
,
F , 8, F P n$. . ,$( . c!0{ F
0"
8
0
e
8
0
L m 22H +8+ /a < 3L, < 3O,
+ /c < 3S, < 3V,
.$ 8& /A: (t; x+ /?+ - < 3Y, , < 3\, < 3_,
< 1I, 4A"$ . I2d x+ /q < 3a, , " 30D + /f < 14, Bk+ /f < 3d, , < 1G, 4n@d c" I $ F (P D (t" x $ D z z K3D (t+ /|: z8& /w: cf (t F 5: (t; (P+ /v I/d x" x $ H 5 HK.$ 8& / < 1D, 5E@d b+ - < 3g, , < 3j, < 3m,
< 1B, 4A x3d I+ 0 < 3n, , " 30D + 0 < 14, Bk+ 0 x0$ + 0 < 3q, , " 30D + 0 < 14, Bk+ 0 < 3t, , < 1@, 4n < 1=, 5E@d b+ - x0d + 0 < 3w, , + -6d b+ 0 < 17, >B: b ~3D +>+ 0_ 22D +8+ 0# < 3z, , + 0& < 3}, < 4 ,
+@ D k!$ 2D (s+ 0. < 4, +9_D (JZD (t (t < 4,
: (t; (J+ 0*, @d (s < 4, , $ D K $ D }" 30D + 04 $ .d } }3d x+ 07 x D } < 4 , "& . K/ } K F (J D (t (t < 4
,
: (t; (J+ 0;, " x $ F (I D (t"& . K/ } K ( $ (t. (t * $
.
(t"
(f
f J 5 (t2H + 0I +? H 5.$ 8& 0B $ $ (t. (t!&} f& F +2 < 16, > @ n < 4, (t < 4,
"& . K/ } K F (H D z z < 4,
: z; (H+ 0U, : (t; (I+ 0@ }3D x+ - < 4, , .$ D K $ .D }+ 02"$ . x D y 22D +8+ 0e < 4, < 4,
+ 0h < 4 , < 4 ,
+@ D k!$ 2D (s+ 0o < 4!, +9_D (zZD (t (t < 4$,
: (t; (z+ 0l, @d (s < 4%, , $ D K $ D } 23D +8+ 0v $ .d } }3d x+ 0x x D } < 4(, "& . K/ } K F (y D (t (t < 4+,
: (t; (y+ 0|, " x/& . K K F (x D (t D (s3d }+ 1 } F (s"& . K/ (s K ( $
.
, $
(t.
(t
0f
(f L +2 < 15, >
(t.
"
(f
J 5 (t2H + 1!* J 5 * $
.
(t
5 L( N$( .
5 J N.$ 8& 1 < 4-, (t < 40,
"& . K/ (s K F (v D z z < 41,
: z; (v+ 1 , : (t; (x+ 1 }2$ x+ 1( < 43, , .$ D K $ .D }+ 0s" x $ < 46, "
x ( J (u H z ( $ z. < 49,
: z; (u+ 1,, .$ 8& 1)+ - < 14, Bk < 14,
x +2x +20 x +2 N 5 +7 +3 +3 w (FX d L I xh L I xh x +4 +7X d L I xh L I xh x +4 +7x +2x +6x +6x +6x gh I +5 +7h J +4 +5P 0 0 (Q (t +< +5x +3x +4x 3P
^ +@^ +A ^ +BX 0 (|
X 0 )
X 0 ) $ J X 0 ) X 0 ) $ I X 0 ) X 0 ) X 0 ) X 1 , +w (Q ( 5 X 0 )! X 0 )( $ (I X 0 )% X 0 )+ `
h
@ b
I @ b g `
h
@ 2
C @ 2 a X 0 )2 X 0 )9 X 0 )< X 1 ,b ,X (Q ( J X 0 )! X 0 )( $ (I X 0 )% X 0 )A $ (I X 0 )E X 0 )K X 0 )N X 0 )S 1X 0 * X 0 * ( ~ X 0 * X 0 *
+1 ( N X 1 *, X 1 + $ 5 X 1 *, $ 5 (
0 X 1 *. X 0 * X 0 *# $n X 0 *$ $n X 0 *% X 1 *( $ k X 1 *+ $n X 1 *, X 1 + $K X 1 *, $K ( J X 1 *. X 0 */ X 0 *6 X 1 *9 $ k X 1 *+ $n X 1 *= $ (I X 0 *A
X 1 *M
h
@ b
I @ b g h
@ 2
C @ 2 a X 0 *Z $ c $ , ( h ( n ( m X 1 *^ $ c $ , ( h ( n ( m X 0 *b X 0 ) $ x X 0 *g X 0 *k X 0 *t X 0 ) $ x X 0 *x X 0 *} X 0 + X 0 +
X 0 + X 1 + $ k X 1 *+ $n X 1 *, X 1 + $K X 1 +" $K ( n ( 5 X 1 *. X 0 +% $ y X 1 ++ $ k $ y X 1 *+ $n X 1 *, X 1 + $K X 1 *, $K ( 5 X 1 *. X
+1 ( N (' INVALID ENTRY, TRY AGAIN.'/) (I) G",:` \ 4@ p @ 4; p @ 4: p @ 4; 4;2$ 4:2d 4;+ 4G+ 4M" 30D + 4I < 4P, Bk < 4Q, , < 4T, < 4W,
+ 4D 4@ 4; Ap ,~ X 0 4< X 0 4? $ 4; (20I)(1X,20I3) (' VARIABLE NUMBER OUTSIDE ALLOWABLE RANGE.')(' RETYPE THE 'I3,' VARIABLE NUMBERS.'/)(' VARIABLE NUMBER WAS DUPLICATED.') eDXu \ 4m !p @ 4Y p @ 4X p @ 4Y < 5,, " 4Y $ F 4] D 4^ 4^. 4Y < 5/,
: 4^; 4]+ 4u, " 4Y $ F 4\ D 4^. 4Y7`+ 4 4^. 4Y 3d 4X+ 5 < 51, , " 30D + 5 < 5+, Bk < 54, < 57,
+ 4r: 4^; 4\+ 4{ $ 3D 4Y+ 5* & / 4Y $ F 4\ D 4^.$ D 4]"& / 4Y. 4] 4] F 4[ D 4Z. 4Y 4^. 4Y 2F+ 5 < 58, , " 30D + 5 < 5+, Bk < 5;, < 5>,
+ 4r: 4Z; 4[+ 5: 4^; 4\+ 5 & / 4Y $ F 4[ D 4^ & / 4Y $ . 4Y
'3j + 5' . 4Y ' H 4^
.
4Y
( L/
.
4Y H( .$ 8& 5 : 4^; 4[+ 5 4m,~ X 0 4_ $ X 0 4` X 0 4e $ 4Y X 0 4i X 0 4e $ 4Y [?0 !p @ 5B !p @ 5A !p @ 5@ p @ 5@" 5@ $ F 5C D 5C" 5@ $ ( $ . 5C. 5A
5C.
5@
.
5@
7$, .
/.
5B
7f J'f.$ 8& 5L: 5C; 5C+ 5K,~ ] [ (' 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 0 U DTA9 .DAT [ : X CDR ` M P LPT DSK DSK TTYDAT.TMP S> \ 8K p @ 5b6D 5j+ 8f 1 D 6
6
D 1 5bA$ 5D 8j 2 D 5d 5bA$ 0D + 8m 2 D 5d $ . 5b6b 0b + 8r+8o4 8r4 8u4 8s4 8v < ;, , 1 D 5g+ 8w < ;, , 1 D 5g < ; , < ; ,
5k2D 8U+ 9 5k2D 8V+ 9 5l2D 8S+ 9 5l2D 8V+ 9 5m2D 8L+ 9 5m2D 8R+ 9 5n3D 8^+ :I 5k2D 8L+ 9 5k2D 8X+ 9 5l2D 8]+ 9 5l2D 8Q+ 9 5m2D 8^+ 9 5m2D 8^+ 9 5n3D 8^+ :O 5k2D 8T+ 9 5k2D 8W+ 9 5l2D 8S+ 9 5l2D 8T+ 9 5m2D 8V+ 9 5m2D 8S+ 9 5n3D 8Y+ :z 5k2D 8R+ 9' 5k2D 8Q+ 9' 5l2D 8V+ 9' 5l2D 8]+ 9' 5m2D 8^+ 9' 5m2D 8^+ 9' 5n2D 8^+ 9' $ . 5b6b 0b + 9'+9&4 :n4 :x@d 6 < ;, =? $ 2D 5b+ 9. $ A 5b0D + 9. < ;, @_@d 5b@d 3 D 5c D 5c D 6
D 5[ D 5\ D 6 8^ F 5Y F 5Z F 5d D 5\ D 6
: 5\0d + 9R 5j2F 8N+ 98 & F 6
5j3F 8[+ 9= 5j3F 8Z+ 9G 5j3F 8W+ 9P+ 94 $ . 5\ D 5c"& . 5\ $ 5h H5j/$ 8& 9@ 8\ 5\.& 8^ H5j*d 9C $ .D 5\+ 94 $ . 5\ D 6
"& . 5\ $ 5f H5j/$ 8& 9J"& 5\ 8^ H5j.$ 8& 9M $ .D 5\+ 94 5\ D 5[+ 947D 6
+ 9] < ;!, .$ D 6
" 6
/& . 6
6
F 5f D 6 6 < ;%,
: 6 ; 5f+ 9X, < ;&, < ;*,
6D 6
+ 9g $ . 5c D 6 " 6 . 5c 6 D 6 6 5j2D 8^+ 9f> 6 8& 9b $ D 6 6 8N F5k < ;,, $ . 5c D 6"& / 5c. 6 6 F 5e D 6 6 < ;/,
: 6 ; 5e+ 9m, 7D 5c+ 9w < ;1, 8[_D 5dZD 6 6 < ;4,
: 6 ; 5d+ 9t, 7D 5[+ : < ;6, .$ D 6" 5[/& . 6 6 F 6 D 6 6 < ;9,
: 6 ; 6+ 9}, < ;;, < ;>,
8^2D 5d+ :3D 5Y+ : 8O F 5d+ :" 31D + :
8U D 5d+ : $ A 5b5D :
, 8\ D 5d1$ A 5b0D + :+ 8^ D 5d < ;, >+ 5d3D 8O+ :#3D 8^+ :3d 8Y3$ 8L+ :+ :#, 5d2D 8U+ :^ $ A 5b4D :S+ :^ 8P D 5Y 8Q D 5Z $ D 5b 5g D 6 < ;, >+ < ;
: 5[; 6+ :&, "& $ D 6 6 5j2D 8^+ :.> 68& :+ 6 5i2F 8N+ :4 5j2F 8S+ :4 5j2F 8R+ :4 $ D 3 5Y2D 8^+ :< $ A 5b5D :8 8M D 5Y $ A 5b0D + :; 8S D 5Y 8Z D 5Z $ A 5b1D + :E < ;
, ?c7D 5h+ :EA< ;E, , " 30D + :D0< :{, Bk+ 8m@d 62 < :{, Bk $ 3D 6 + :lA 5b5D :^ < ;H, + :^ $ 2d 5X+ :^3D 6 D 5j+ :z < ;J, 5X D 5g+ :^ < ;M, , < ;P, < ;S,
< :|, =? $ . 5b6b 0b + :x+:u4 8r4 8u4 8r4 8u < ;U, , + :r 8K,~ x 0P 5X 6Xx 5gX 0 6 X 0 6 X 0 :I 6 @ 5k P 6 5] $5j P 6 5] $ 5\ $ 6 P 6 5Y $5j P 6 5d $5j P 6 5] $5j P 6 5] $ 5X P 6 5Y $5j X 0 6 ` 5g ` 5X X 0 6 zX 0 7 = $ 6 $ 5j X 0 7Q z I F A (' FORMAT'/) (' FORMAT: (',A1,'-TYPE ONLY)'/) (80A1) (80A1) (' ERROR IN FORMAT, TRY AGAIN.'/) S ( A ) { M O$ky \ < p @ < p @ ;X !p @ < p @ < p @ ;X p @ ;Y@d ;Z@d < D < & ( F <
D <2D ;X+ <% < <m, Bk ;Y0D + <( < <n, , 0d + <+ < <q, < <t,
< <u, <_D ;^ZD < < < <x,
: < ; ;^+ <., <1D + << ;_2D <+ <7 ;_2D <+ <7 ;`3D <+ <j" ;X $ . <
< J'.$ 8& <8 $ D < ;X0$ + <?( . ;X D <
" <
$ D < < ;^2D <+ <E: < 8& <A $ D < + <j < ;^2D <+ <D $ D ;Y ;Y. < < <z, " <
$ F ;] D < < < <},
: < ; ;]+ <L, " <
$ ;^3H <: < ;^2H <+ <U"( .H <.$ 8& <Q $ 2d <+ <j & .F ;Y. ;Y3f ;X+ <]. ;X/ ;Y ( . F <
<
1$ + <e < <, <_D ;\ZD < < < =,
: < ; ;\+ <a, + <H ;Z0D + <g < <m, Bk < =, , $ D ;Z+ <! < < Ap ,~ X < <
X < <
$;Z X ;X < $;^ P <
< $;^ X ;X < $;^ X < < ` Z (X^ . > [.~ (3~ + =
~ + =Z . \x <x *<x .-> >ez+ =!" b + " = b + Z . h + gg M?Th
& = b + =,
?NO CORE AVAILABLE - CAN NOT PROCEED
!* =;** ,^ ,~ * x ,> < =;*< => p Z@ =1@@ =2@@ =2 =r`|+ =%P w,~ "p h a`~ + =+h ``~ + =,$ =s!=-d =s/"+ =&P ,~ @ @ @ @ @0 @x @@ @` edX91 ,> Bm,> Zp @ =1\` =1 < =1, ,^ ,~ SMI 1 ,> Bm, = =u B=1+ =U_MI 1 ,> Bm, = =v B=1+ =UI5R1 ,> Bm, = =x B=1*\ =`7Ap X" =x B=1/& p d"~ l" B=1*\ =`/& p d"~ l" $ B=1*\ =`/& p d"~ l"
B=1*\ =`Sp *\ =`/&Xp B =:@@ =; =y B=1*\ =`/& p d"~ l" B=1RF =1 < =1, + = EV4i91 ,> Bm+ =mS ,i@1 ,> Bm+ =m_ ,i@1 ,> Bm+ =mK>2 1 ,> Bm+ =mK>40 1 ,> Bm+ =m[<I71 ,> Bm
& =z w @ )@ .
" 5B =o
& > ,~ ` .
.4 SEQIN ^ =tSEQOUT ^ =uRANDOM ^ =wSEQINOUT =:
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS:
gG@ 1 ,> Bm7cp + > (Bdb + >. > "+ >. > "T B#p @,~ 4B >+P =0
>#p + > ,~ > attempt to take SQRT of negative arg !$h X$h @@h *% " > Bh L " Bh M+ x eX2G iSH YC aS iSH INX G YC GSH iSH aS aS I' IR
IR
IR
0 IR
@ IR
P IR
` IR
p [R
[R
[R
M?L@INX INX INX INX INX I2 I2 I20 I2@ G iSH I4:1 ,> BmZ .@ 6kp 2j8 M+ >; !p Q A` >4\$}
4L >3/, L 8$ >0.
8 L F( ,~ H ?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG
& >5 < >;,
iSN ,> Bm@Ap O
, 7 OAp ,~ [&vlx1 ,> Bm Z ?G \ ?H ?H,!p ,!p ,!p ,!p ,!p %p < XD >\XD ?XD ?, %p < XD >\XD >}XD ?7 %p < XD >hXD >qXD >xXD ?XD ?XD ?XD ?
XD ? XD ? XD ?XD ?XD ?XD ? XD ? XD ?%XD ?%XD ?(XD ?2XD ?3XD ?3XD ?=XD ?=XD ?> ?Q ?I D ?P!$ D ?K@@ ?K 6 V_ V_36 ?H9 >\ $ D ?N" ?I : . ?I ?H D ?O"$ . ?J4$ >n5d >d Z ?O@@ ?L / ?I . ?I . D ?M# 3` ?L+ >k @ ?L V ?P X ?N36 ?O9 >g38 ?H9 >f+ >z / ?I . ?I
.
# 72` ?P+ >x36 ?H9 >o ?J4@ >v < ?C, < ?F,
@@ ?K@@ ?K+ ?@/7$D ?L Z ?P V ?N# ?L3` ?P+ >s3Z ?P+ ?"` ?N ?P3Fo" ?I 8 . ?I . . ?P * ' @38 ?H9 >3Z ?N+ ?
.
/ @ ?M ` ?K4@ >s# ?K3 ?Q+ ? ?K ?Q D ?K: ?K+ ?# ?K2 ?R+ ?!$ D ?K> ?K+ ? 6 . ?M @36 ?H9 ?!$ ?M D/" ?I 6 . ?I
.
74@ ?( @ ?L3V + ?( 8 . . " ?L '@38 ?H9 ?" ?L ?M"D736 ?H9 ? 3: ?H9 >` ?N@ M @ ?K ?H o D 3Z + ?4 ?H$ ?I ?H/ ?I . . * @ =v ?0=z ?, ?H$ ?I ?H/ ?I o D / 4D ??". . $ ?I 6 . . * ' @36 ?H9 ?;=z ?6 ?G ?H\ ?K,Ap ,Ap ,~ ?J ?R $ ?H $ ?H 0c=t! 0 ('0',I4,' BY',I4,' INVERSE DOES NOT EXIST.'//) I5r1 ,> BmO@
, 4" ?\, @/`` ,~ < ?],
4 4 ?_4 @ KbN=1 ,> BmO@ @
p 4B ?g, @/4@ ?g9 ?k9 ?jKbN= 1 ,> Bm@@ @
!$Lu ` @Ap `` a` + @ a` + @ D ?bA (` ?p/" #B ?a@@ ?b !p X@ ?^,> < ?^, @,^ 7@ @ + ?vOAp + @
#p Q"A` $ 1@ + ?{0` =d ?x! H: @ ?`@@ ?aa|+ @[ p d 0@ + @[ p d 0@ + @+ @_ w6@ @
_ w#` 1 + @Sp Xp @ ?a
?a+ @@ ?_+ @ + @
& @
+ @
Ap ,~ ERROR ON OPEN!
H H @H @ G.t21 ,> Bm@ @Ap ! A`.!p @ @ @ @ @@@ @@@ @ & " @< 1D + @ - @(=b @ @< 0D + @&O " @ @ @ @< - @(=b @ 7@ @OAp !p < , @, @,~ <& @! @1D + @% Ap + @! 1D + @%1$ + @"1d + @-0$ 0d -+ @" $ D @+ @(" @K, @X0@ + @G p 4B @IL ad+ @F`b+ @G $ 0d "+ @I&$ $& (&}Z .G @K.& $ .$ 7F + @< ,~ A$ &$ (D G$1$ ((D (D
` 5@ @I .2b M+ @E L.& 7D !$Lu+ @H2" @L+ @B &p , @P ` ,~
& @L < @O,
.p M}ILLEGAL DEVICE NUMBER!
" @W, @X ' Q&A` @W@ 1x ,~ 18 0.8 X =` @S,~ . H a|+ @[0" 0b / ,~ 0B 1B ,~ 0B / ,~ aJMm1 ,> Bm, B&+ @{@ , AP, B"+ @{Z" 6Ep " B` " b A $ 7cp $ 1B $ d A, @}, Ao+ @|6cp 0b " b A$ A1 ({." XB` &$ @6@ .$ .$
a|+ @t[p d p0B + @x+ @v_w#` 1" + @x6cp 0d $QD` , A:+ , B- ,~
& A+ @z
& A+ @z@b -p . Q,A`
A
4P A1P + A /0 P =n A ,~ `
` `
CANNOT INIT DISK!
FILE NOT FOUND!
H H .
A
+ A YC G aS a3 S; YC&<G<aS<a3&<E$;w |xA PA
B` 1T !"L b @ XB` O@ A, B> A,@ , B-
+ B6!, 2, B@ !.~ , B-` + B?"" 1T "" QB A*, B- f + 1$ 9 AJ+ B% 8 A@` A BA*( A* BA n @ `N + BF 6`
BG1T BH B` " B` \"
b @ B` \" H b !" Z (Brb BI b
B A- b
+" `B` !" 2 b `b `b + Aj!" 2 b !` 2B` + Aj!$ 2 d !$Lu+ Am BI b @ BJ, BJ d !$Lu B A+ D A,,~ @@ A/ BK*( A5 B A/ D A0 BX B` DX Z A-(D} d ` D A/ DX " 2D` b BKd " b BL, B-@ A.+ BL A5 BX @@ A6 BO b $+ A!" A7X"X *"X !"`
+ B!, 2, BB , B-" X
A0 A0, B- + B JX , B- + B%
& BP " b BKa` + B+ Aya` + B, B- A.+ + B x H B h &( 2
PA
BV. A- &. .0 P `bp + Bd
@ A+, B-+ B `L+ B A++ B% ( !*Lu@
, B-
,~ : x ,~ " B B>O@ A-O@ A.g " ?$ B>+ B5 d 5D B) B>(D DA-+ B%,> e` p+ B17 A.+ B4l! A.+ B37 A-+ B4l! A-: +@ > ,^ + B%
& BV,~ "
& BX,~ "
& B^,~ , B=
& Bf
& , B= b ( Bf+ B9
& Bj,~ @ ;` A,+ A>+ B8 A 0 CMQ Cannot do MPB QUEUE on GALAXY system. ( BB+ B9`` ` P $` h pA/
X HX a` ,~ !" GB` + B @A66$ A0
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0 NO FREE CHANNELS!
% CANNOT OPEN QUEUE DEVICE!
% PLEASE NOTIFY OPERATOR!
% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
?QMR CNC Can't CONTINUE -- try REENTER
KbN@ 1 ,> Bm,
,~ BmY\ BoQ< X\ Bo* +