Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/tab.exe
There are 2 other files named tab.exe in the archive. Click here to see a list.
?p
?x i Kb)G|xDG` INX Q F: { A) '[
{B E@ '|sXy Q g*> `
cH f
c@g TAB GENERALIZED CROSS-TABULATION PROGRAM ('-*** W.M.U. CROSS-TABULATION PROGRAM ***'//) ('-ERROR: This BANK was created with an experimental version of BANK.'/' Please update the BANK by running "BANKUP" from area [220,220].'/' If you are not responsible for the BANK, contact the owner and'/' ask him to run the updating program.'/) (' SPECIFY UPPER LIMIT FOR # OF CROSS-TABS--',$) (I) ('-ERROR: ',I3,' for upper limit is illegal, Try again'/) ('-WARNING: OPTION NOT AVAILABLE AT THIS TIME'/) ('-ERROR: Number of variables',I6,' outside allowable range, Try again'/) ('-') a=` (BANK T DATA TTY FORMA DUMP ) { H{ V2 DSKC (80A1 + -< ^# D
, D @d FOf 8"& +F 9 & F 0 & ,F 0 F & F 7 D 8 < , , < , b) < , C. <
F3*d "@d < 0D + ' < , IL $ . 26b 0b + ++)4 @4 + < , < ,
+ A3D , , < , f = D : > F ; ? F ; ? F < @ F < @ F = D D1d ,+ 9 < , Mb D
D
D D *d >+ O <
, \! 0D + G@d < , YU 1D + G < , I}+ O $ D D
D
F *d J" D $ 4 ( H =.$ 8& M 1D + R $ 2 D + Z < #, , < &, < ),
6d + Z < *, < -,
6 9+ R+ 0 $ , D
0D + ^ < /, , @d & $ D( . D. D D < , e=7@ H+ l < 2, < 5,
6$ 9+ h < , f $ . 26b 0b + l+j4 @4 8 F D J. D D I. D D F. D D E. D C. D K J &I F I &I F F &I F E &I F C &I F $I D < ,
< 6, , + < ,
H D ` D H F Jh D
h
x Dp D@ 0 E 1 2 4 5 2@ 0 E 1 3 4 5 2x 9X 8 L P 0 @ > = X 8 Q X 8 j X 9 o $ X 8 o $ X 8 u X 8 z $ D X 8 ('-',29X,'OPTIONS AVAILABLE: FORMAT',13('-'),A3,5X,'TOTAL %',10('-'),A3/50X,'HEADER',13('-'),A3,5X,'COLUMN %',9('-'),A3/50X,'SELECT',13('-'),A3,5X,'ROW %',12('-'),A3/50X,'EXPAND',13('-'),A3,5X,'PHI COEFFICIENT',2('-'),A3/50X,'EXPECTED VALUE',5('-'),A3,5X,'LAMBDA STAT',6('-'),A3/50X,'MISSING DATA INCLUDED',6X,'THETA STAT',7('-'),A3/52X,'IN CALCULATIONS--',A3,5X,'GAMMA STAT',7('-'),A3/50X,'TAU A,B&C',10('-'),A3,5X,'EXPAND SYMBOLS---',A3)(' Please wait, your data is being processed'/) (' ENTER DATA')(' Format assumed: (80A1)') ('-Warning: Illegal character in observation:',I7/9X,'Program proceeds ignoring the observation'/) ('-',29X,'Number of observation read in.',6(' .'),I9/30X,'Number of observations used.',7(' .'),I9/30X,'Number of cross-tabs requested',6(' .'),I9/) (1H1,16A5)(' NUMBER OF OBSERVATIONS READ IN =',I9/' NUMBER OF OBSERVATIONS USED',4X,'=',I9/' NUMBER OF CROSS-TABS REQUESTED =',I9/) ('-ERROR: No calculation done on 0 observations.'/) YES TTY @ NO x .002 ` .001 X 00001SEQOUT SEQIN DELETE RENAME SEQIN DELETE [Mk \ { p @ } !p @ !p @ !p @ !p @ !p @ !p @ } D s $
D | $ D z $ D 1 13D }+ $ < , X : 8 ~ ~ F4 0F + | F4*d < , _D
ZD < ,
: ;
+ < ,
20D + C :2D }+ C $ >. ;&$ >$ :.$ D
: :.$ &$ D { & F " { $ F D /$ $$ D
< , < ,
. 2F {+ 6" $
(+ J' . * $
(0 J' .
J'.$ 8& 7: ; + /+ K" } $ .
Q J' .
J' .
q J'.$ 8& D 0D @d 9 0D + O < , TZ< , "l .$ D 0$ D 1 0F + U & F 1*d S" , 0D + u < (, , $ D -"$ . -$ }.$ D -$ } D
< .,
:
; + , : x $ 2$ 9+ < & F
4D : 2d 9+ ;49/& . F x C F " $ D 6b 0b + +
$ .
x
(
2J C@ 5$ 2+ -O (
$ .
x
(
3j C@ 5$ 2+ -O (
$ .
x
(
3* C@ 5$ 2+ -O (
$ .
x
(
2* C@ 5$ 2+ -O (
$ .
x
(
2j C@ 5$ 2+ - $
$ . x
3HC+ 2@d
3D 9+ ; 2H + : + . 2H + :2D 9+ 6 $ D
+ { O
3J @ 5( + 5: 8&
6D
+ {: -+ v $ D . -1d + $> -.D / $ 2$
, b; $ 3D + H.d s+ E2< 0, 1D + L < 4, @d y"
+F ).$ 3D + n@$ 3D $ H D < 8, < :,
ZD : 2f )+ ` 4 H m*d [: ; + X )( D .$ >&$ > D @f " $ F D < <, < >,
ZD : 2f + n 4 H =*d h: ; + f . D -" - $ : y.
' J*.$ 8& q < , %~ . *F : 0h >+
m J 4+ < A, < C,
m H 4 ( H .$ 8& } $ 2$ + < E, < G,
D )( D " $ : 0h >+
= J 4+ < J, < L,
= H 4 ( H .$ 8& 7d + < N, < P,
: ; + N 1D + < S, < U, s D t $ D 6b .0b + + 4 u4 $ $ . x D
< X, < [,
+ { 12D }+ , < ], " < $ F D < `,
: ; + ), < a, < d,
13D }+ 3 < g, < j,
1< , XJ6d /+ ;@< l, , 7$ 9+ : $ . 26b 0b + :+ 94 4 < , f
F ) . D -" - $ : .
' J* * Hu*. 'H1.$ 8& F < s, < u,
ZD : 2f )+ Z 4 H m*d U: ; + R )( D .$ >&$ > D {@f " { $ F D < x, < z,
1 ZD : 2f + h ,4,H =*d b: ;$ + `@< , (B: ; + @
Ju y. . F1.$ 8( x $ > D @d " $ F ~ D /$ $$ > D .& F 2F + " . ; F 6f 9+
" $ @h.$ 8&
+ Q" $ F | D & F@h F : 2d 9+ K 9/& $ . F
3F + < , < ,
6F 0 +C+F "4$ 4D *4 /4 44 9O (
$ .
(42J C@ 5$ A+ <O (
$ .
(43j C@ 5$ A+ <O (
$ .
(43* C@ 5$ A+ <O (
$ .
(42* C@ 5$ A+ <O (
$ .
(42j C@ 5$ A+ < $
$ . 43HC+ A @h+ 3D 9+ K 2H + : + = 2H
3J @ 5( + D: D 7D+ Q: 8& N+ k" - $ u. '/( $ . H } < , H ZH ( >$ . < ,
: ; + X, .$ 8& R" $ F D 1F + f" - $ : * >$
.
(K J
.$ 8& b: ; + & - D -@f .D / < , %~: ; ~+ 7d + p& - D -.D / < , %~ 0D + 12D }+ y <
: ; + v, < , < ,
13D }+ < , < ,
< , XJ7d /+ 4< , (B: ; + s { } Ap ,~ p vp vp s p t p s P }
@ > 4 X 8 E X 8 J X 8 L X 0 =
( $
H | H
^ P s h H z H
^ P t h h z @ > 4 h z @ > 4 h | @ > 4 h | @ > 4 h | @ > 4 h | @ > 4 ` z > X | > P tX 8 O
$
X 0 h $3 X 8 i
$ x $ / $ Y $ x $ / $ H
^ P t h h z @ > 4 h z @ > 4 ` z > X 8 E P 0
@ > 4 P 0 } $ K X 0 h $3 X 8 i
$ ; $ / $ Y $ ; $ / $ FORM HEAD SELE EXPA EXPE MISS TOTA COLU ROW PHI LAMB THET GAMM TAU EXPS $ (' OPTIONS?'/) (4A1)('-ERROR: Option code "',A5,'" does not exist, Try again'/)('-Warning: Cannot use FORMAT with a data BANK'/9X,'Program will ignore this option'/) ('-Options available are:'//' CODE DESCRIPTION'/' ---- -----------'/' FORMat Option to enter own format; default: (80a1)'/' HEADer A line of at most 80 columns to be used as header'/' SELEct Option to consider only those observations meeting'/' user specified criteria'/' EXPAnd User specified upper limit for number of cross-tabs (initially set to 100)'/' EXPEct Expected values for cells'/' MISS To include the missing data counts in all calculations'/' TOTAl Percentage of total for each cell'/' ROW Percentage of row total for each cell'/' COLUmn Percentage of column total for each cell'/' GAMMa Gamma statistics'/' LAMBda Lambda statistics'/' PHI Phi coefficients'/' TAU Tau A,B and C statistics'/' THETa Theta statistics'/' ALL All options listed above'/' NONE None of the options listed above'/' SAME Maintain the same options used in the preceeding run'///' Enter the desired option codes in a line separated by commas.'//) S {@ E ALL * HELP A , ` M $NONE C%w \ B < !, , $ D < !, a 0D + Q < !, f 2D B+ W 2D F+ W 2D H+ W 3D D+ ! E@f*d W G H F M*d Y@d O"& $ $ F L D P F P3F H+ ! 2F G3F 6+ d3F Q+ d O0( + ! : O F M+ ! H D < !, < !,
3F F+ !
3F I+ !2F D3F E+ ! EZD J J B3F + s*d l < ! , < ! ,
6$ 9+ K < !, f $ 2D 2+ v $ 3D J+ w J & F 20D + | J0D + | < !", , 1D + ! G H F M*d ~@d O: P; L+ ] $ D 6d O+ d+ ! $ D 2D 2+ ! & F < !%, , "& . ( H.$ 8& !
+ ! < !(, , 6$ 9+ K < !, f B,~ h I X 8 Q P S @ M X 8 S $ X 8 Y X 8 Y X 8 b _ $ ('-',29X,'CROSS-TAB LIST:') (' ENTER CROSS-TAB LIST'/) ('-ERROR: Program will ignore the following illegal CROSS-TAB string:'/9X,72A1)(9X,'Re-enter the string'/) ('-ERROR: ',5A1,' does not exist, Program will ignore the CROSS-TAB string:'/9X,72A1) ('-ERROR: ',I4,' Number of CROSS-TABS outside allowable range'/9X,'Maximum is set at',I5,'. Program will ignore the string:'/9X,72A1)(35X,72A1)('-ERROR: No CROSS-TAB contained in the list'/) ('-The CROSS-TAB list defines how variables are to be tabulated. Either'/' variable NAMES (if assigned) or numbers may be used. The list must'/' terminate with an altmode<ALT>,dollar sign or a carriage return<CR>. '/' More than one line may be used to specify a list provided the last'/' character in the list is a comma.'//' Several symbols are mandatory to be used with the list:'//' SYMBOL FUNCTION'/' ----- --------'/' , Separates variables within a level'/' - Separates ranges within a level'/' / Separates levels within the CROSS-TAB'/' ; Separates CROSS-TABS within the list'/'-Examples:'/' AGE/SEX;5-7/SEX<ALT>'/' 1/2/3/4;AGE/15,20/HT;IQ/AGE<CR>'//)(35X,'SAME AS THE PRECEEDING RUN'/) S {@ E H ALL - TTY * ; L / A , X ` M P $Y' @ \ "a p @ !/ !p @ !1 !p @ !2 !p @ !_ !p @ !k p @ !^ 13D "e+ "v < $f, , < $i, , < $d, a !40D + "{ < $], f !42D "d+ # !52D "c+ # !52D "g+ # !63D "k+ $S !42D "b+ # !52D "h+ # !52D "j+ # !63D "c+ $V" $ . !k@j'.$ 8& #@d !^ D !k "b "j FE*d #
"& $ $ $ D !_ !_ !42D "j+ #> !_8& #7d !^+ $P+ $Y !43D 6+ $O !43D !i+ $O@d !+ D !i $ D !3 D !3. !i D !2 "i@f!,*d #@d !f "i "j F!b*d # : !i3d !_+ #!7` !f+ $E+ #G !i !4 D !g3D "j+ # 2D "g3D "f+ #*2D "h3D "e+ #*2D 63D !i+ #*: !f1f D!b+ # 6d !f+ #G < $l, "& / !_. !2 !2 F ![ D !Y !Y < $o,
: !Y; ![+ #/, 6$ 9+ #4 < $], f !21D + #9 13D "e+ #9 < $q, < $t,
< $v, , < $b, a+ # $ . !i D !02d !_+ $E"& / !_. !0 !0 D !h !h !4 D !03D "f+ #2D 63D !i+ $O: !h8& #A+ $E < $`, %#6b !40b + #K+#I4 #K4 #`4 #R !j2D "d3D "f+ #[" !/ $ D !Y !Y. !1 3D !j+ #^: !Y8& #O < $y, < $|,
"& / !_. !2 !2 F !f D !Y !Y < $,
: !Y; !f+ #W, + #2@d !Y !/. !2 D !j+ #m !Y. !2 D !j !g3D "e+ #e6b !30b + #e+#c4 #f4 #j $ D !3 !3:!, !3$& B.!, !j H |{+ #w !3 !3$& B.!, |{ F !Y $ . !Y D !h"& / !j. !h !h !3:
!,
!3$* B.
!,
.
!2
7 L/|{.$ 8& #p $ D !3 !g2D "h3D "e+ #2D "g+ #|: !31f + #+ #+ $ D !1" !3 $ !,$H !1.$ 8& #~ !^. !1 D !,3d + $ < % , < %,
"& / !_. !2 !2 F !b D !Y !Y < %,
: !Y; !b+ $, 6$ 9+ $, < %
,
+ $Y" !1 $ . !^. !k
!3 J'.$ 8& $ !1.D !^ !3&!, D !j !3. !k F !\" !j $ F !a D !h !3"!, $ !\. !_ * B$
!3.
/|{ J' !3.H !\.$ 8& $ : !h; !a+ $ $ D !/"$ . !3 D !g" !g !g F !` D !h. !k D !\ !h !-$f !/$!, !1& H !j" !j $ F !+ D !X !h"!, $ F !m D !Y $ B$ !h. !Y |{ D !0" !/ $ !\. !_
!0 J' !3.H !\.$ 8& $5: !Y; !m+ $1: !X; !++ $/> !h; !`+ $( !3$ !1.D !k"& / !i. !2 !2: !+
!4 J E.$ 8& $A !i3$ !_+ # 13D "e+ $H < %
, < %,
! !43F 6+ $O !43F !i+ $O!42F "h+ $O < $^, a+ # 6d !^+ $Y < %, , 6 9+ "v+ $U < %, , 6$ 9+ "v < $], f 13D "e+ $Y < %, , "a !/ Ap !^ Ap ,~ h !4 "k !4` !b !/ !4 !jh !4 "k !4h !4 "k !4X 0 !m X 8 !p X 8 !s $!4 X 0 " @ $ E X 8 !{ X 8 !~ @ !b $!4 X 8 "
' J /$ 8& %0 % %" F + %- %" D % < %E, < %H,
D % < %K, < %N,
% 0& 2f %+ %=+ %A & F %+ %A %" D % < %P, < %S,
% % Ap % Ap ,~ P % % @ % P % % $ % P % % @ % Y>}0 p @ %V p @ %V p @ %W p B %W3 %V+ %` @ %W+ %l %W( . %V ; D %X $ . %W D %Y"& / %V. %Y %Y D %W %W( . %V ;2D %X+ %k: %W8& %g"$ .D %W %W Ap ,~ @ BLANK G?-m \ %{ %| D %n $ D %o & 3& )+ & F * D ) D *" - $ *
H = *
2H %}+ & %} H =.$ 8& & $ D m =3F %n D * $ 2$ -+ &x $ D %o"& / -. %o %o F %v D %z/$ $ . D %n" - $ *. %n
H%p *. %n
2H %}+ & %} H%p.$ 8& & %p2D %n+ &P"$ . *4D &/5d &M: *2d
+ &w: )" ).( ) H %u D %s l F m" - $ %s( .
9 J ;.$ 8& &%> %s; %u+ &# $ D m D *" - $ %p H =.$ 8& &-+ &w" - $ D %s %s =2H%p+ &5: %s8& &1: m+ &w: *2d
+ &w: ): * * J %z
%s
(%p3,( =+ &= * J %z3( )+ &= F %z+ &G" ). %z ) F %s D %o l F m" - $ %o( .
9 J ;.$ 8& &B> %o; %s+ &@" - $ %z( .
%p&J ;.$ 8& &H& %z%& F m+ &w%$ %D %p < &|, ' %s %p2H ;+ &Y: %s8& &S %z: m+ &w: ): * %z( . %s %s %p3( ;+ &d & F m" - $ )( .
%p J ;.$ 8& &`+ &w ) l F m ) & F l" - $ %z( .
; J = %z( .
%p J ;.$ 8& &h+ &w )2D *+ &s: *2d
+ &w: )+F %z+ &G,$ . * D %p D %z3D )+ &R < &z, 'p %p g?@ \ ' p @ ' p B & #p B ' ) D &0@ + ' * D &" - $ F ' D '. ' F ' & D '( . '2f ;+ '3 &( . '3F ;+ 'S & D ' *2$
+ ("& / ). ' ) F ' D &~ m F m" - $ &~( .
; J =.$ 8& '$> &~; '+ '": ): * $ 3D '.d * ' & F m" - $ '( .
.
'
/ J ;.$ 8& '.+ ( & D '( . ' ;2f '+ '> &( . ' ;3D '+ 'S *2$
+ ( &.$ D ' &2D )+ ' + ') &. &7 .$ ( D &~( . ' ;3F '+ 'R &~( . ' ;3d '+ 'H &~ D & &~( . ' ;2$ '+ 'L &~ D & &/ &/$ 4$ 'P5d '> & D '+ ' $ . & D '+ ' &~ D ' '3D &+ '^/$ D '
&/& / '
'
D &~ &~( . ' ;3D '+ '] &~.$ D &+ '^> &~8& 'X '3D &+ 'i.$ D '
" &/& . '
'
D &~ &~( . ' ;3D '+ 'h &~/$ D &+ 'i: &~8& 'c &/ &1$ + 'm: '; '+ '+ ( '3D -+ (.$ D ' " -/& . ' ' F ' D &~ &( . &~. ' 3D ;+ ( *2$
+ ( & D ' ( . &~ &~. ' 3f ;+ '} &.$ D ' "& / ). ' ) F ' D ' m F m" - $ '( .
; J =.$ 8& (> '; '+ ( " - $ ' ( .
.
'
/ J ;.$ 8& ( ' & F m.f *: ) $ 3D '.d *+ (: &~; '+ 'r &: m+ ( &( . - ;3D '+ ( < ( , f
D ).$ D * ' & Ap ,~ , (1H-,I1,'-WAY CROSS-TAB BETWEEN VARIABLES : ',4(A5,A1,1X)) ('-WARNING: More than',I4,' sets of symbols encountered. No further symbols'/8X,'will be added to the table, but the counts for those symbols'/8X,'in the table will be accurate.')('-*****************************************'/) _W \ (? !p @ ( !p @ (" 71d + (G < ), XJ $ .D 7 < )/, < )2,
& / - $ F (! D ( ( . (" . ( < )3,
: ( ; (!+ (L -. (" . ( < )5,
*3d
+ (W < )7, < ):,
$ D ( ) D ( "$ . -4$ )4D (~ $ . 73d 7+ (^ < ), XJ $ .D 7 < );, , < ),, %Z ( D (! < )*, %Z (" . ( $ D (@ < )', )U (" . ( $ D (@ < )%, )U (" . ( F / . ( F 0 & F . < )#, .
$ . ( D (!2d ( + (z & . 73f 7+ (w < ), XJ $ .D 7 < )>, , + (c $ . ( D ( O 2d )@ 5& )+ ([ $ . 73d 7+ ) < ), XJ $ .D 7 < )A, , < )!, %Z (" . ( $ D (@ < ) , )U (" . ( F / . ( F 0 & F . < ) , .
$ . ( D ( O 2d )@ 5& )+ (~ (" . ( F / . ( F 0 & F . < ), .
(?,~ p ( ( p ( ( ` 2 (@ ( (@` ) (@ ( ( p (! ( ` 2 (@ (! (A` 2 (@ ( (@` ( (A (! ( ` ) (@ ( ( X 0 (" $ - $ ( ( $ X 8 (( $
X 0 (: X 0 (: X 0 (: (6X,'VARIABLE: ',A5,' = MISSING') (6X,'VARIABLE: ',A5,' =',F12.3) (6X,'VARIABLE: ',A5,' = ',A5) (6X,'VARIABLE: ',A5,' =',I12) @ _W" \ )T p @ )F p B )E p B )F p D )E )T D )D )F( . )E3D ;+ )b )F.& 6b 0b + )b+)`4 )h4 )o4 )w & . 73f 7+ )e < ), XJ: 7 < * , < *,
+ )~ $ . 73d 7+ )k < ), XJ: 7 < *, )F( . )E < *,
+ )~ $ . 73d 7+ )r < ), XJ: 7 < *
, )F( . )E < *
+ )~ $ . 73d 7+ )z < ), XJ: 7 < *, )F( . )E < *,
)T,~ X 0 )G $ )E X 0 )J $ )E ( ; X 0 )N $ )E $ ; X 0 )Q $ )E $ ; ,3X) 1H./ 6HTOTAL., 15(I7,1X)) 7H EXPCT., 15F8 .1) 7H TOT %., 15(F7.2,1H%)) 1H./ 1X, ,1H.,15(I7,1X)) 7H COL %., 15(F7.2,1H%)) (3X, ) . 7H ROW %., 15(F7.2,1H%)) ('-',5X,'VAR:',17X,'VAR: ',A5/6X,A5) ('-VAR:',17X,'VAR: ',A5/1X,A5)('-',16X,'TOTAL'/14X,8('.')) (14X,'.'/1X,F13.3,'.',I7)(14X,'.'/9X,A5,'.',I7) (14X,'.'/1X,I13,'.',I7) (9X,'TOT %.',F6.2,'%') (14X,'.'/9X,'TOTAL.',I7) (14X,'.'/6X,'MISSING .') (14X,'.'/6X,'MISSING .',I7) (I2) (I2,'(') (14X,'.'/6X,'MISSING .',14(I7,1X)) (6X,'.'/' MISS..',15(I7,1X)) ('-')(' CHI-SQUARE =',F13.3,' WITH ',I7,' DEGREES OF FREEDOM'/) ('+HAVING A PROBABILITY OF ',F10.7//) ('+CORRECTED CHI-SQUARE (YATES) =',F13.3/) (/' FISHER''S EXACT PROBABILITY FOR OBTAINING'/4X,'(1) THE GIVEN TABLE =',F10.7/4X,'(2) A TABLE AS PROBABLE, OR LESS PROBABLE'/9X,'THAN THE GIVEN TABLE = ',F10.7//) (' PHI-COEFFICIENT =',1PG16.8) ('-WARNING: Program cannot handle ',I7,' cells in a contingency table'/9X,'for the following statistical tests: LAMBDA,THETA,GAMMA,TAU A,B&C'/9X,'Maximum is set at 2000.'//) (7X, I13 ,11X,F13.3 AL) ( (9X, (17X,1X, 1?,8X,5(14X,9X, TTY L) (6X, (A3,A,3X,53X, .003 @ I5 5HTOT(8X, (1X, SING,(A1,I5) h @ 8X, A5 Z@ ) HTOTAh p (15X, 7) 7HMIS00001SEQOUT SEQIN DELETE iI \ -p p @ ,^ p @ ,] -| D *f /!$H D - 10D + . . D * -| D * < 5), b; $ 3D -+ ..d *+ . < 5*, .@fq F*+*d . $ D - D *. . D - ,^ D -( . - ; F E E3D *+ .) ,^( . . ;2D *+ .' $ 3D 0+ .- - m D q+ .- $ D - 00D + .- - m.D q: -2d ,]+ / ( . - ;2F *+ .@ E3D *+ .*@d * $ D - $ D * E F F q F r -( . - ; F E@f q3D 0+ .< * 0F + .> - m F q: -3d ,]+ .Y+ / E2D *+ .K $ D * -( . - ; D F -( . . ;2D *+ .I 01D + .> - m D r+ .> -( . - ;2d E+ .A $ D * -( . - ;3& E+ .4 -( . . ;3F *2D 0+ .V+ .X * - m.Hq+ .>"& / ,]. - - F ,t D ,k( . - ;2F *+ .p E2D *+ .c 00D + / ,k m.D q+ / $ D -: *" *.& * D HE p Hq/$ 8& .f ,k( . - ; D E@d q 00D + / ,k m D q+ / $ D * E2D *+ .s $ D * "& / *. * * F ,s D *) ,k( . - ;2FE+ / ,k( . . ;2F *+ .~ 01F + / ,k m.Fq+ / *) ,k( . - ;2fE+ /: *" *. *) * D HE p Hq/$ 8& / ,k( . . ;2D *+ /
3F *+ /+ ,^( . - ;3F *2D 0+ /)+ /. ,^ m F *,+ /. $ D *%2D 0+ /. ,^ m F *, ,^3D ,]+ /U.$ D -" ,]/& . - - F ,q D -( . . ;2F *+ /G
2D *+ /; 00D + /T - m.D *,+ /T: *" *.& *
H
*+ H*+/$ 8& /= -( . . ; D
@d *, 00D + /T - m D *,+ /T * -( . . ;3F
+ /M: * -( . . ; F
-( . -< ;2D *+ /R 01D + /T * - m.F*+: -; ,q+ /4@d *@f *+ D * $ D * D * $ 3D 0+ /\3D *% D * $ 3D - D *@d ,v D *) D *("& / *. * * *+3h ,v+ /b *+ H ,v6H*+: *) *+.H *.$ 8& /` $ 3D *+ /o $ 3D *+ /o"& / *. * *6Hq: *(.$ 8& /j"& . *("$ . *)$ D * . 1/$ 4D 0 5d 0 -s D ,x -x D ,w D ,Y & F - & F ,~ 12F -y+ /y & F ,~ -~ F - F - F ,m -x H ,Z F ,b -v F * -z F - D * $ . 73d 7+ 0 < 5
+ 0 *
1dO+ 0
-r D ,x -x D *+ /s -} D ,x+ 0
, . D ,x.$ D -, -z D ,w,D ,Y D * & F ,~ 12F -y+ 0 & F ,~ -u F - F - F ,m -v H ,Z F ,b -~ F * D - $ . 73d 7+ 0 < 5
*& ,~.$ D *&@f *( F ,g" *& $ F , D -/$ $ ,~.$ D - -$ ,~ F ,v3f *+ 0( * H ,v" -.& . ,v F ,| . F - F - F ,o F ,[ F ,c . . F**d 0. . . F* F- *d 00 . D *! D *! D -
. . F* F- *d 04 -2D *&+ 09 & F ,g@f ,f & F ,`0d + 0U2& ,|3F -+ 0> F -+ 2 $ 3D -+ 0U D ,f . D * - D *6b -0b + 0E+0C4 0E4 0H . D - . D -
- D -
+ 0L -q,D * , . D * . -6D *%0 -{+D *a+ 00D + 0O"$ /D ,`6b 00b + 0R+0P4 0R4 0U3 .+D - D - D ,o D ,[ D ,c"$ . ,|4D 1*5d 1:f *!$H D - $ . 73d 7+ 0\ < 5
+ 0v < 5C, ,k < 5F,
+ 0v < 5H, ,k < 5K,
, 0D + 1, ,kd*+ -:D 73$ 7+ 0~,< 5
: ,k;< ,{+ 0d,$ . 73$ 7+ 1.< 57 < 5X, < 5[,
+ 4 $ 3D ,`+ 0a D ,`. 73$ 7+ 1,< 500D + 1 < 5, , + 0a $ . 73$ 7+ 1 < 5
,& 2F + 0af *, -.F : 73$ 7+ 1' < 5p,
+ 0a3 -+11F + 1: 10F + 1/ ,v E3& -w+ 1: -u F * & 2F -+ 13 -~ H * -s H *2F1+ 16 -r H * -{ H * . H * -y H * F -+ 2 . D *" D -
D * - 1.$ 6b 0b + 1B+1@4 24 1B4 1K -z D * . D * -. ,f D ,r $ . ,v/ ,r D - < 5q, < 5u,
$ D -+ 2 ,v E2d -w+ 1P - D * . D *+ 1D -r D *! D -
- D ,r6b -0b + 1U+1T4 1U4 1{7$ ,|.$ ( D - & . ,|7 .& ( F ,h D ,i/ ,f F ,j < 5v, < 5z,
< 5{, < 5,
6D ,g+ 1d6b -0b + 1d+1b4 1u4 1z - ,h -3D 0H + 1g+ 1o2D 0H + 1i+ 1o4 -s D - D - * 1D + 1y -z D - @d * + 2 $ D -+ 2 $ . ,|7 .$ ( D -7& ,|.& ( F ,h/ ,f D ,i F ,j+ 1\ -s D *! D -
- D ,r ,f0F + 2.$ D ,r6b -0b + 2
+2 4 1U4 1{7d ,|+ 0W - 1/$ 4$ 25d 2 -{ D * . D * -y D *+ 1B ,v E2d -w+ 1P -{ D * . D * -y D *+ 1M < 5!, 6} ,^ D ,h ,g. ,| D ,i"$ . - D *'" * $ F ,{ D *)@d ,f" ,| $ @h$.$ 8& 2 7D *+ 2*d *)f*+ F ,~"& / ,|. ,` ,` . *'h q ,~ H,.$ 8& 2& ,h3$ ,]+ 2, D ,k+ 25" ,]. ,h ,h D ,k ,h( . . ,k( . . =2H ;+ 25: ,k8& 2. ,] D ,k"& / ,k. ,h ,h F - D * " ,| $ D ,l ,l. *' * ( . - ;2HE+ 2A $ D ,f ,l * m H$+ 2B: ,l8& 29: * ; -+ 28 $ . ,k D ,h6D ,f+ 2T -3D *&+ 2I 0D + 3F -2D *&+ 2T ,i *) *+ H$ *%0D 0f + 2r 01D + 2[" ,| $ D ,k
,k6J($+ 2[: ,k8( 2Q+ 3[ ,g0D + 2X ,i *) *+ F$ *)0D + 2r *%0D + 2r ,i D ,X $ 2D 0+ 2^ ,| F ,X & .F 72D -+ 2g < 6 , " ,X $ H - D ,k ,k < 6,
: ,k; -+ 2c, $ 2D -+ 2o < 6, " ,X $ F - D ,k ,k < 6,
: ,k;< -+ 2k, 6b 00b + 2r+2p4 3W4 2 $ . 73d 7+ 2v < 5
,
" ,i $ F - D ,k ,k < 6,
: ,k; - + 2{, 1D : 7 $ 2D + 3 < 6, "& / ,|. ,` ,` F ** D ,k ,k < 6,
: ,k; **+ 3, $ 2D + 3 ,| F ,sh *!&H F -2D ,g+ 3. ,| D ,s $ 2D ,g+ 3 ,sf$ - F "& . ,`/ ,s ,`h$ - H .$ 8& 3: 7 < 6, "& . ,`/ ,s ,` F *( D ,k ,k < 6,
: ,k; *(+ 3 , 0D + 337D *+ 3["& / ,|. ,` ,` . *'7H q+ 3* . *'j qh$ (H H .$ 8& 3$: 7 < 6, "& / ,|. ,` ,` F *& D ,k ,k < 6,
: ,k; *&+ 3/, 0D + 3F $ 3D *+ 3[@f ,g *)3D*++ 3:j*+!(H H ,g"( / ,|. ,` ,`f$ ,g F .$ 8( 3<: 7 < 6 , "& / ,|. ,` ,` F *$ D ,k ,k < 6 ,
: ,k; *$+ 3C, $ 2$ * + 3[ & 2F *)+ 3K *1F + 3W D ,l: *("& / ,|. ,` ,`7H,+ 3Qh$, ,H *+ ( 2H * + 3V.h ,l *(( . *(. ,l
$ J 2.$ 8& 3N 10D + 3[ < 6!, < 6#,
: *); ,{+ 2 : 7 -3D *&+ 3h < 6&, "& . -. ,` F -"& / ,v. - - F ,e D ,k ,k < 6),
: ,k; ,e+ 3d, -2D *&+ 3s < 6*, "$ . -. ,` D -"& / ,v. - - F ,a D ,k ,k < 6-,
: ,k; ,a+ 3o < 6/,
$ 2D + 4@d ,j"$ . -. ,` D ,"& / ,v. , ,: ,jjq
- J .$ 8& 3y: 7 < 60, " ,j $ F ,` D ,k ,k < 63,
: ,k; ,`+ 4 , $ . 73d 7+ 4,< 5 7d * + 5
,< 5, =.$ . 73d 7+ 4,< 5
, ,u1F + 4.$ 3d 7+ 4,< 5
, * 0D + 4B, . & ( .& 2.3 H3 3.5 F6*d 4 7. 7 D 8" 4$ 5 4$ 6. # f d *" D D *+ 5$ 6$ 7$ 7f d * *+ D *+ $ . 73d 7+ 40 < 5
,< 5, = $ 3D ,u+ 4:. 73d 7+ 47 < 5
,< 5, :w.$ . 73d 7+ 4>,< 5
10D + 5
1D + 4G6b 10b + 4G+4E4 5
4 4Sf * *+ D -q,< 5, @ ,g $ . 73d 7+ 4M < 5
6b 10b + 4S+4Q4 5
4 4S *$ * D -1$ h+ 4X < 6T, < 6W,
+ 5
0D + 4_@d -"& / *. * * q3h -+ 4^ q H -.$ 8& 4\ * 0d + 4e 4 D
4 D
5 D
6 D
+ 5 < 6X, < 6Z, "$ . *. ,~& ,~ D *&" *&.& $& . * F *) & F ,r" *& $ F ,^ D -/$ $$ D ,^ -2D *&+ 4s *) D ,r" * $ F ,] D ,k/$ $ *. ,^ D ,j < 6^, < 6`,
" ,r $ . ,j
$ J
.$ 8& 4z: ,k; ,]+ 4u: -; ,^+ 4o 0D + 5< 5, 8% 0D + 5< 5, :# 1D + 5 0D + 5 < 5 ,~ ,k ,u` * *+ ,k ,u - - ,| ,g - ,r ,v ,i E * * - * - - - ,| ,g - ,r ,v ,i E * * - * -p * -H 1 P *H
^ . h X 0 - $ 0 $ / X 0 - $ 0 $ / X 0 - X 0 - X 0 -! $
$*+ X 0 -$ $
$*+ X 0 -& $
$*+ X 0 - X 0 -) ( X 0 - X 0 -+ $ * X 0 - X 0 -. X 0 - X 0 -0 $ *, X 0 - X 0 -) ( P -3 * $ - P -4 *! $ ,i P -3 - $ ,j X 0 -5 $$ X 0 -8 $$ X 0 ,w $
$$ X 0 ,b (, X 0 ,m ( X 0 - ( X 0 - ( h 1 @ % X 0 ,Y $q X 0 ,Y $q $ * X 0 ,m ( X 0 -; X 0 -< ( *+ $ * X 0 -B ( ,k X 0 -F ( *+ X 0 -B ( ,k X 0 -J ( *+ ( ,e X 0 -[ ( ,g X 8 -_ $ - h 1 H 1 H
^ . P * h h 1 @ % ` 1 > .
(1X) (14X,'MISSING',3X,'TOTAL') (6X,'MISSING',3X,'TOTAL')(6X,121A1)(14X,113A1) TTY i } \ 6z p @ 6q p @ 6o p @ 6m p B 6g p B 6n p B 6j p B 6m p B 6g #p B 6f #p B 6l #p B 6f #p B 6p #p B 6e p B 6q 6m. 6g( .$ D 6p $ . 73d 7+ 7 < 7l, XJ+ 7 70$ + 7 12D 6|+ 7 < 7m, , : 7: 76b 6q0b + 7+74 74 7"4 7&4 7.4 7E $ D 6p 6o0D + 7 < 7p, , 0D + 7[ < 7s, , + 7[ < 7v, 6n. 6f < 7y,
+ 7[ < 7z, "& / 6m. 6j 6j F 6l D 6h 6h. 6f < 7},
: 6h; 6l+ 7*, + 7[: 7 < 7, $ . 6n D 6o 6o/ 6m7 .& (/& 6o F 6k D 6h 6h. 6f < 8,
$ .d 6h; 6k+ 76, < 8, " 6m. 6j7 .& (/& 6j F 6k D 6h 6h. 6f < 8,
$ .d 6h; 6k+ 7@, + 7[: 7 < 8, " 6m. 6j7 .& (/& 6j F 6j D 6h 6h. 6f < 8 ,
,$ .d 6h; 6j+ 7K, /< 8m7 .& (/& 6n F 6i D 6h 6h. 6f < 8,
$ .d 6h; 6i+ 7V, : 7 $ 2D 6o+ 7c < 8, " 6p $ F 6i D 6h < 8,
: 6h; 6i+ 7`, 6o0D + 7j < 8, " 6p $ F 6h D 6h < 8,
: 6h; 6h+ 7g, 6z,~ X 0 6r X 0 6r X 0 6u X 0 6l $ X 0 6e ( 6g $ X 0 6f $ X 0 6p $ X 0 6f $ X 0 6p $ X 0 6y ( 6q X 0 6x ( 6q (' LAMBDA STATISTICS =',1PG16.8) Yl) \ 8$ p @ 8 p @ 8 @d 8"& / *. * * F 8 D 8 /$ $ * D 8 @d 8"& / *. * * 8 .
3h 8+ 84 8 .
H 8.$ 8& 8/d 8D 8: 8 ; 8 + 8+"& / *. * * F 8 D 8 @d 8"& / *. * *"( . $ *. 8 H 8
3j 8+ 8B
J 8.$ 8& 8=d 8D 8: 8 ; 8 + 8: 8 . 8 d D 8
*(
j
8 " 8 8 F 8 $ . 73d 7+ 8N < 8S, XJ $ .D 7 < 8T, < 8W,
8$,~ X 0 8 ( 8 (' GAMMA STATISTICS =',1PG16.8) (' TAU A =',1PG16.8,' TAU B =',G16.8,' TAU C =',G16.8) OnH: \ 8w"$ . * D 8X"$ . * D 8`@d 8Y D 8f D 8g D 8]"& . */ 8` * F 8f D 8l.$ D 8k"& . */ 8X * F 8e D 8a.$ D 8` 8a/$ $ * D 8Z. 8l D 8^@d 8^ D 8Z"& / *. 8k 8k F 8e D 8[. 8Zf
F 8Z"& / *. 8` 8`"( . $ *. 8[ H 8cj
J 8^.$ 8& 9: 8[; 8e+ 9
8^d(
8ZD 8]d(
8^D 8Y: 8a; 8e+ 9: 8l; 8f+ 9 *$ 8X D 8^"& . */ 8` * F 8d D 8l@f 8Z.$ D 8l"& / *. 8l 8l . 8^h
H 8Z.$ 8& 9% 8l. 8^d
8ZD 8]: 8l; 8d+ 9" $ . * D 8k"& / *. 8k 8k F 8b D 8l"& . */ 8X * F 8b D 8a/$ $ * D 8`. 8l D 8^@d 8^ */ 8l * F 8j D 8[ $ . 8a D 8j"& / *. 8j 8j"( . $ *. 8[ H 8cj
J 8^.$ 8& 9=: 8[; 8j+ 99 8^d
8^D 8f: 8a; 8b+ 94: 8l; 8b+ 91"& / *. * * F 8i D 8l"& . */ 8X * F 8h D 8a/$ $ *. 8l D 8^ 8a.$ D 8`@d 8Z"& / *. 8` 8`"( . $ *. 8l H 8cj
J 8Z.$ 8& 9T 8^d
8ZD 8g: 8a; 8h+ 9N: 8l; 8i+ 9K 8Y 8f D 8g 8Y 8fD D 8] 0F + 9jd 8g D 8a $ . 73d 7+ 9g < :, XJ $ .D 7 < : , < :
,
0D + :"& . *$ *f d 8]D D 8\ 8] 8g 8g 8g D 8w < :, _d 8] D 8Y $ . */ * D 8_ & . */ * F 8\2d 8\ 8\ D 8_/$ *$ *$ h d 8_f 8]F F 8m $ . 73d 7+ : < :, XJ $ .D 7 < :, < :,
8w,~ x 8wX 0 8m ( 8a X 0 8q ( 8\ ( 8Y ( 8m (' THETA STATISTICS =',1PG16.8) i".H \ :" !p @ :@d : D :" *. * * F : D : /$ $ * D : : .$ D : "& / *. : : F : D :@f : F : . : : . : $f F : :/$ $ * D :" *. * * F : D :@f :.$ D : "& / *. : : :.
.H :.$ 8& :; : . :
$ :d D :: :; :+ :7 $ . * D :"& / *. : : F : D :@f :" :. * * :.
.H :.$ 8& :I : . :
$ :d D : : :; :+ :G" : : # D :: :; :+ :.: : ; :+ :( : : D : $ . 73d 7+ :Z < :^, XJ $ .D 7 < :_, < :b,
:",~ X 0 : ( : ! KIG>v \ :t !p @ :f p @ :e p @ :s p @ :d p @ :f p @ :e < <, `9@d :c"$ . :e D :n"& . :s F :s :s$ :p. :e. :q & F :t < <, <A"@ :r" :n $ :s$ :p. . :q ( H :t < < , <A@ :r.$ 8& ;" :s $ :p$ . :e. :q ( H :t < ;, <A@ :r.$ 8& ;@d :i" :n $ F :k D :q" :s $ :p$ . :q. :q ( H :t < ;~, <A@ :i.$ 8& ;: :q; :k+ ; :r :i D :t < ;|, _! @ :d@d :f D :e & / :n $ F :j D :q & / :s $ :p$
:q.
.
:q
:s$
:p.
:q.
:q :e. . :q
0 2l8
8 L( .$ 8& ;&: :q; :j+ ;%+ ;G & / :n $ F :h D :q & / :s $ D :g :g$ :p. :q. :q"( .H :g$ :p. :q. :q6$ + ;G :g$ :p :q. . :q
:s$
:p.
:q.
:q
:e.
.
:q
( 2j0
0 J : :g8& ;6: :q; :h+ ;4+ ;u & / :n $ F :p D :q :s$ :p. :q. :q D :n & / :s $ :p$ . :q. :q" .H :n.$ 8& ;N7$ :n+ ;1 :q. :p. :q D : :q; :p+ ;I" :s $ F :o D :g$ :p. :e. :q F :n & / :n $ :p$ :g. . :q" .H :n.$ 8& ;\7$ :n+ ;1 :p$ :g. :q D : :g; :o+ ;X@d :i" :n $ F :m D :q" :s $ :p$ . :q. :q ( H :t < ;{, <A@ :i.$ 8& ;h: :q; :m+ ;g :r :i D :t < ;z, _! @ :g@ :e :d :g2d :v@ :f+ ;1 :t :d Ap :f Ap :e Ap ,~ p :v :tx :tp :v :tx :tx :tx :tx :t@ :u :r :f :q :u :e :p :s y` yE, {e^bM Ks \ << J <> H <> F <= D <= p @ <9 <? D << <@ D <90` 2+ <J7D :c+ <V <9 < D <:+ <]d <9 D <; $ @
<9
<;$ < <b, ` " <; <9 << <; <; $4" <9 F <:+ <]@d < <?"& .& f F <; < <a, ` < @<*d <W $ D :c+ <H << <= <= <>
<> <:,~ x <;x <; fH, z2 Mvm &E dd se_ { l ~ "h0 vz ~ "P n-d z<" O! < < [u; o2 _^ }Q< QR 4ddG"N
Q \ <u p @ <d p B <g p D <d p D <g!$ D <h <x D <i = D <i = D <j <} D <j < D <k <~ D <k = D <l <{ D <l <x D <m <w D <m <y D <n < D <n = D <o <| D <o = D <p = D <p <w D <q <} D <q = D <r <z D <r <z D <s <{ D <s <| D <t!$ D <t@d <g@f <d3$ 0` 2+ =%+ =& & F <g3b <~+ =( & F <g <g1F + =f4b =e0 + =E6b <d0b + =.+=,4 =.4 =54 =: < =w, _ @ <e < =t, > <g1D + =f <eD $} D <d+ =e <gD D <v < =s, _w!$} $ D <d+ =e < =r, _ @ <e < =p, > <g1D + =f <gD D <v < =o, _w =" <e <eD $} D <d+ =e7$ <d.$ ( D <f( 3D <d+ =V < =n, _ @ <e < =k, > <g1D + =f <eD $} D <d <gD D <e
<y
<e < =j, _w !& F <u D <e!$ D <c+ =] <gD D <v < =i, _w!$ D <u" <u& F <d@f <e!( H <e F <c & / <f $ !( h <cH
<g
j <eJ <e.$ 8& = " <e <uD <d!$ D <d? <uC <dCAp C <g?Ap ,~ x <vx <e` <e <e <g <hx <gx <v` <e <e <g <hx <gx <v` <e <e <g <hx <g Hx@ y~jGVup C\ > Hp @ =~Cp ?B =|?p ?B =}H#p B = @ =y5 >"d =y =y3d >+ > !$ D =x+ >2 =yD D .$ D =yd $} D D =}" =} =y4& >65f > =y. = D =x+ >2!$} =}2$ =y+ >: =y!$ D =} =y =} D ={ =} =} F =z" =z( =z(v =} H = &@&rp =z& F =~ =z &t&4 =} F =| =z&} &p F ={!&lL =} F =z = =~ ={ =| ={ ={ ={ =z ={$4 ={ D =x < >;, w > @ > < ><, 4 =y. = D =x =x D =|6& =~+ >7" =x& F =|+ >7 $ D =} > =| Ap =} Ap ,~ x =zx > ('+INPUT? (for help type HELP) '$) ('+INPUT? ',$) ('+OUTPUT? (for help type HELP) ',$) ('+OUTPUT? ',$)('+Either a colon was missing or the file name',' is too long'/) (80A1) ('+Device ',A6,' does not exist'/) ('+Device 'A6,' cannot do input'/)('+Device ',A6,' cannot do output.'/) ('WMU',I3,'.',I3) ('+Only a /COPIES switch may follow a LPT:'/)('+Illegal character "',A1,'" in COPIES switch'/) ('+Copies must be between 1 and 63.'/) (I2) ('+Only switch available if for the LPT'/) ('+Non-directory devices require no additional information'/) ('+File name too long'/) ('+Character"',A1,'" is not valid in a file name'/) ('+Only one period is allowed in the file name.'/)('+BANK files must be read from the disk'/) ('+Bank files can not be used for output.'/) ('+PROJECT or PROGRAMMER number cannont be longer'/' than 6 characters'/) ('+Illegal character "',A1,'" in PROJECT-PROGRAMMMER',' number'/)('+ Comma missing between PROJECT and PROGRAMMER number'/) (O10)('+Nothing should follow the closing bracket for the',' PROJECT-PROGRAMMER number'/) ('+File not found or protected'/) ('R ',4A1,4X) ('+You must have answered this question in this',' program previously to use "SAME" now.'/) ('+You cannot do a /OUT while answering a /OUT'/) (' No output defined yet'/) ('+To use the CONTINUE an input must have already been',' defined.'/) (' The answer to this question defines where the program is'/' to find the data. It usually consists of a device, and'/' possibly a file name with or without a PROJECT-PROGRAMMER'/' number. Devices may be specified by their physical'/' or logical name followed by a colon (:). If the'/' device is a directory device (DSK, DTA), then a filename,'/' extension and PROJECT-PROGRAMMER number may follow it.'/' If the device used is a magtape or dectape, the tape'/' must be mounted, and in the case of a magtape it must'/' be positioned.'/'0DEFAULTS:'/' (1) If no input devices is specified but a filename is'/' given, the default device will be DSK:.'/' (2) If a device which requires a filename and extension'/' is specified, but no filename is given INPUT.DAT'/' will be used.'/' (3) If no response is given (CARRIAGE RETURN is entered)'/' the default is TTY:.'/' (4) If DSK: is specified as the input device, but no') (' PROJECT-PROGRAMMER number is used, the PROJECT-'/' PROGRAMMER number of the job is used.'/'0EXAMPLES:'/' DSK:DATA.DAT'/' TEST.DAT[220,220]'/' MTA:'/'0The following responses may also be used after the first'/' response to this question.'/' "CONTINUE" - (For MAGTAPE) Use the next set of data'/' "SAME" - Use same device specifications as used before.'/' "FINI" - End of run.'/' "/PROG" - User may initiate the run of a bank program'/' (STP, BANK, TAB, FREQ, CORL, or REGR) from'/' this program.'/' "/OUTPUT" - Redefine the output device, the program will'/' respond with "OUTPUT? ".'/)('0The answer to this question defines the destination'/' for the program''s results. It usually consists of a device'/' and possibly a filename with or without an extension.'/' Devices may be indicated by their physical or'/' logical name followed by a colon (:). If the device is'/' a directory device (DSK, DTA), then a filename,'/' extension and PROJECT-PROGRAMMER number may follow it.'/' If the device used is a magtape or dectape, the tape'/' must be mounted, and in the case of the magtape, it must'/' be positioned. If the device is a lineprinter, the user'/' may request multiple copies by following the "LPT:" with'/' a "/COPIES:" and the number of copies desired (1-63).'/'0DEFAULTS:'/' (1) - If no input device is specified but a filename is'/' given, the default device will be DSK:') (' (2) - If a device which requires a filename and extension"'/' is specified but no filename is given OUTPUT.DAT is'/' used.'/' (3) - If no response is given (a CARRIAGE RETURN is entered),'/' the default is TTY:.'/' (4) - If LPT: is specified and no /COPEIS switch is used,'/' 1 copy is assumed.'/'0EXAMPLES:'/' DSK:SAM.F4'/' LPT:/COPIES:3'/' MTA:'/) S B . /REGR /STP DSK /OUT E ~ 9 (K HELP /OUTPUT N LPT CONTINUE 0 DSK C TTY ?FINI /FREQ Z I /CORL /BANK ] O A / 0 z , TTY FINISH @ INPUT.DAT SAME : { [ ` 7 END /TAB p a OUTPUT.DATP LPT DSK SEQOUT SEQIN SEQOUT RANDIN BINARY S< \ Bx p @ ? p B ?)p ? p B ?)p ? p B ? p B ?U p B ? @ ?[5 C8 $ .D ?[@d ? C D 6 C D 6 C D 5@d ? C ? < H, b. Bz ? < H, a*@d ? & F ?W2d ? + CO3F ?[+ CJ2D ><+ CF < H, , 3D ><+ CI < H , , F ><+ CO6D >=+ CL < H, , 4D CN < H, , & F >= < H, a ?1D + G
: ? ; ?*+ Cv, < H, b.6D ? + C~ < H , < H ,
+ C< ?[1D + D C#A ? 5D D^ < H , < H#,
+ C< C%A ? 5D D < H%, < H(,
+ C< CA ? 4D D^ $ 2 D ? : ? < H , a- $ 2.D ? < H), < H-,
< G~, b;7D ?,+ D
: ?Z ?,3F C#+ DE ?,3F 6+ DE ?,3F C+ D < H/, , + C< ?Z ?-2F C
+ D# ?-2F C+ D# ?.2F C"+ D# ?.2F C+ D# ?/2F C+ D# ?/2F Bz+ D# ?02F C+ D# $ .D ?Z C# D ?! D ?! $ D ? .d ?Z ?Z ?,3F C#+ D6 ?,3F 6+ D6 ?,3& C + D1 ?,2f C+ D1 ? 0f + D4 ?, H? : ? : ?Z+ D& < H2, ?Z < H5,
+ C< < H6, , + C< ? 1D + D; ?!2D C#+ D; ?! D ?! C# D ?! < H9, C _D ?(ZD ? ? < H=,
: ? ; ?(+ D=, < H>, < HB,
?W0$ 0d + D4 ?)( ><4D D] < HC, ?)( $>< D Bx < G|, b. ?)!&p83f?+ DN & F >= CA ? 4F D]F?"F ?W ?W1f 2+ DS"& 2.f ?W ?W$ 8.& F ?&7f 8+ DX( $>Z D Bx < Gy, c16$ 8+ D\ ?)( $>Z D Bx < Gw, c1@d 8 < HE, + F: C A ? 4D Dc C ? ?[0D + Dc C! ? : ?Z ?,2F C+ Dg < HI, , + C< ?Z ?,3F C#+ F ?,3F 6+ F C A ? 5D Dn < HL, , + C< C C# F? *d Do $ D ? ?Z ?,3F C#+ E ?,3F 5+ E ?,3F 6+ E ? 0f + Dz ?, H? : ? : ?Z+ Dq < HO, , + C< C ? C ? ?[0D + E C! ? < Gu, b. < HR, < HU,
? 3D Bz2F B{7 + EN3D B~2F B~7 + FV3D C2F C7 + FV3D B}2F B}7 + FV3D C 2F C 7 + FV3D C$3D C 2F C 7 + G
2F C
7 + G7 + GJ@h ?Z CZD ? ? ? 3H C#+ E3 ? 3H B|+ E0 ? 3( C + E* ? 3h C+ E3 ? 2h C+ E- ? 2( C+ E3 < HX, < H[,
+ C<: ?Z1F + E3 < H\, , + C<*d E# $ 3D ?Z+ E= D ? ? ? 3D C#+ E:: ? 1d + E6+ Dz ? B| F? < H_, < Hc,
$ D ? : ? 0d + EM ? 2F B|+ E> ?!2F B|+ EM ?!2F C+ EM ?"2F C+ EM & F ? CA ? 5F EJ < He, , + C<7D ?[+ EM < Hh, , + C< ? ? ?Z ?,2D 5+ F C C# F? *d EQ $ D ? .d ?Z ?Z ?,3F 6+ Ec ?,3F C+ Ee ?,3& C + E` ?,2f C + E` ? 0f + E^ ?, H? : ? : ?Z+ ET < Hk, , + C< < Hn, ?Z < Hq,
+ C< < Hs, , + C< ? 1D + Eq ?%2D C#+ Em"& $ ? H?!/$ 8& Ei C# D ?!+ Eg < Hv, < Hy,
< H|, < H,
C C# F? *d Eq $ D ? .d ?Z ?Z ?,3F 6+ F ?,3F C#+ F ?,3F 6+ F ?,3& C + E` ?,2f C + E` ? 0f + E^ ?, H? : ? : ?Z+ Et ? 1D + F
?%2D C#+ F"& $ ? H?!/$ 8& F C# D ?!+ F < I, < I,
< I, < I
,
?Z ?,3D 6: ?Z ?Z ?,3F C#+ F ?,3F 6+ F < I
, , + C< ? D ? ?U D ?@d ?,2D ?[+ F < Gr, b67D ?,+ F < I, , + C< ?)( ><4D F3 < I, ?)( $>< D Bx < Gq, b. ?)!&p83f?+ F$ & F >= CA ? 4F F3F?"F ?W ?W1f 2+ F)"& 2.f ?W ?W$ 8.& F ?&7f 8+ F.( $>Z D Bx < Gn, c16$ 8+ F2 ?)( $>Z D Bx < Gk, c1@d 8 ?1D + F96D ?[+ F6 < I, 0D + F: < I, + F: < I , ?)( ? >< ?)( ? >Z ?) ?( . ?U F>yf ? F? C! F ?) CA ? 4F FE C F ?) CA ? 4F FG B F ?)7F ?[+ FTf ?W"F? >=0F + FM"( 2/ ?Wh H?0F + FO ?) H :( ><3H C2J C+ FS0F + FS C$ D :: >=!$ 3D ?+ G2+ GS < I!, C _D ?WZD ? ? < I$,
: ?-; ?W+ FX, @d ?."& $ 6F ?V+D ?!6&?+ Fp(< I&, ( ><3H C2J C+ Fp" ?WF?"F ?W+ ?W1f 2+ Fg"& 2.f ?W. ?W$ 8.& +F ?&7f 8+ Fl( $>Z,D Bx6< Gh, c16$ 8+ Fp ?Z( $>Z,D Bx:< Gf, c1: ?;< ?V+ F^7< Ge, aI ?)( ><5D Fw < I(, , + C<2 ?)( >< ? , ?)( >Z ? ?) >y& C$ F ?" ( .>y!F ?U@f ?!& 2F?+ G & F ?F?"F ?W ?W1f 2+ G"& 2.F ?W,< Gc, b.+ ?[0D + G < I+, CA ? 5D DE CA ?)4D Gy& C$F ?" ( .>y F ?U@f ?!& 2F?+ GD & F ?F?"F ?W ?W1f 2+ GG"& 2.F ?W < G\, b. ?[1D + FT+ F ?[1D + GO < I:, , < I=, , + C<< I@, , < IC, , + C< Bx ?)Ap ? p ?) Ap ? p ?Ap ?UAp ? Ap ,~ p ? ?` Bx C B ?WX Bx C B ?W ?&p ? ? x ?-` Bx C B ?WX Bx C B ?W ?&` Bx C B ?WX Bx C B ?W ?&p Bx ? X ? ? ?, ? ?Up ? ? ` Bx C B ?WX Bx C B ?W ?&p Bx ? ` ? ?, B{ B{x ?p ? ? h ?- C ?p ? ?Up ? ?5X 8 ?[ X 8 ? X 8 ?` X 8 ?d X 8 ?f P ?l ? $? X 8 ?m 0 ? X 8 ?q 0 ? X 8 ?t 0 ? P ?x ? $ ? $ ? X 8 ?z X 8 ? $?, X 8 @ P ?l ?+ $? P @ ?+ $ ?W h ?) P ?) ~ C%P ? ^ C&X 8 @ X 8 @
"& $ F IF D < 32F IK+ IU> <; IF+ IR IJ,~ X 8 IG X 9 II @ 4 A I F G E ( ) D O (400A1) (I5) 9 0 I O A 8 X ` PROBLEM PROBLEM SEE DICK HOUCHARD O%[r \ Is p @ Ie p @ Ia #p B Ic < K, " Ia $ F Ig D Iq Iq < K ,
: Iq;& Ig+ J, " Ia Ia D I I =2D Ix+ J
, ^:@d Iq: Iq3 Iq2d I&+ J-2 IvZD Ib" Ib: Iq; =3HIj+ Jq2d Iq+ J&" IvZD Ib. Ib Iq. I` =2HIj+ J)1F + J&+ J@d I D Iq $ D Ib: Iq2d I+ Jn =3F Im+ J/ =3F Im+ J/ =3& It+ J6 =3f It+ J: Ib = H: Ib3& Ia+ J/+ Jt $ D I Iw Ix FM*d J; $ D Ib Ib Iq = FM: Iq: Ib =3& It+ JD =3f It+ J> O2D Ix+ JJ"& $ M HM/$ 8& JF Ix D M+ JD < K , < K,
< K, < K,
Iq =3D Im+ JV" Ia $ D Ib Ib Iq = H: Ib2d Ia+ Jt: Ib8& JQ+ J/ $ . Iq D Io $ D Ih Io =3F Im: Ih =3F Im> Ih7F Ih+ J^: Io+ JY"& . Io $ . Iq2d + Jm" Ia $ F Ij D Ib $ . Iq D Ip Ip/ Io Ip D I` Ib I` = H: Ib2d Ia+ Jt: I`8& Jg: Ib; Ij+ Jc Io D Iq+ J/"$ . Ib D I_7F I_+ Jv" I_ $ H =.$ 8& Jr+ J- < K, ^:+ K $ D I`" Ie $ @hq I`
2J Iv+ J{ * Jq
2J Iu+ J~ * Jq
2J Iu+ K * Jq:
I`3j I$+ K ( H I`.$ 8& Jx Is,~ P Ia Iq Ic ( = x IxP Iq I` @ M P Ir I` $ Ia x Iz F A I $ (' WHICH VARIABLES FROM THE BANK?'/) (5A1)(I5) ('-ERROR: There are',I7,' variables in the BANK and limit is set at',I7/9X,'Program proceeds, ignoring the excess'/) ('-ERROR: Variable string too long, Contact computer center staff'/9X,'for help'/) ('-ERROR: Picking up 0 variables from the BANK, Try again'/) ('-ERROR: Illegal entry for range "',3A5,'",'/' Re-enter the entire list') ('-ERROR: Variable number',I6,' does not exist, Try again'/) ('-ERROR: Illegal range specification, Try again'/) ('-ERROR: No variable selected from BANK, Try again'/)('-ERROR: Variable "',A5,'" does not exist, program continues'/9X,'ignoring it'/) ('-ERROR: The following',I6,' variable names do not exist,'/9X,'Program continues ignoring them:'/(10(1X,A5))) ('-ERROR: Variable "',A5,'" is not of the required ',A1,'-Type,'/9X,'It will be excluded in all analysis'/) ('-ERROR: The following variables are not of the required ',A1,'-Type,'/9X,'They will be excluded in all analysis:'/(9X,10(A5,1X))) (' ')('-ERROR: Variable "',A5,'" is used more than once,'/9X,'Program proceeds ignoring the duplicate'/) ('-ERROR: The following',I5,' variables appear more than once,'/9X,'Program proceeds ignoring the duplicates'/(9X,10(A5,1X))) ('-All or some of the variables located in a structured data BANK may be'/' used for the analysis. A "ALL" or "*" may be entered if all of the'/' variables are to be used. Otherwise, enter the variables by either'/' their NAMES (as previously defined in the data BANK) or by their'/' variable numbers separated by commas. Ranges of variables may also'/' be specified by typing the extremes of the range separated by a "-".'/'-Multiple lines are available to enter the list provided the'/' last character in the line is a comma.'/' The list should be terminated by an altmode or a carriage return.'//) E H 9 0 ALL - * L , X P $E:]h6 \ MZ p @ K\ p @ L $ D K] $ t D L $ >. ;&$ >$ :.$ D L $ . :&$ D L@d K^ D L D L" K] $ @h
L
K_2D M`+ N> L
8& N + NuOd L L
K_2F M_+ N & F L 1D + N K^2F M_+ N K_3F 6+ N
K_2F L + N> L
6 FK_ M_ M` FL*d N@d KX" L
$ F L D L K_ F L3F M`+ NG2F M_3F M]+ N2F 63F L + N KX0( + NG: KX F L+ NG L & 2F L+ N 2D 63D L + Nu: K^ M` F =" KX $ D L L L2h M\+ N4 L3( M\+ N4: L8& N! L2D M`+ N+"& $ L HL/$ 8& N( M` D L+ N% < Qg, < Qj,
< Qm, K^ < Qp,
L3D M]+ N?6b KW0b + N4+N34 ND4 Nt K^@fM < Qr, < Qu,
=3F M^+ NK =3F M]+ NK L3F M]+ N?6b KW0b + N?+N=4 ND4 Nt: K^ M] F = & "FM6b KW0b + ND+NC4 ND4 Nt@d KX M_ M` FL*d NE: L; L+ N7d KX+ Nt $ D KW+ N : D L3d K]+ NN K] F L@f L F K\ & F L " L $ F L D L. L D L < Qx, < Q{,
L/$ $$ D L L2F L+ NZ" L. : F L " L $ D L L$$ K D L K\1( 3D + Nd1H 0D + Na+ Nd:
K\
L$,
0K L(M+ Nk L3D L+ Np: L ( $ L K H
Q: L8Hq: L. L+HNR"$ . K\4$ Q24D Q%+ Q( L3D :+ Nm < Q~, < R,
+ Nm L 1D + Mt K^3d K]+ Ny < R, , < Qa, f $ 3$ K^+ N~ < R, , 3d 9+ Mr < Qa, f" K^ $ F L D L"M0F + O7&L+ O6&M+ O < R , /$ D L" L/& . L L F L D L L < R
,
: L;< L+ O , 6$ 9+ Mk < Qa, f L M3f :+ O < R
+ O
: L; L+ O $ . L D L < R, < R,
$ D L $ D L 3d :+ O : F L L6FM+ O+ = F L" L $ D L L$$ K2D L+ O': L L H
Q$ L H
K Jq+ Oo: L8& O : L L F
Q+ L M7FM+ O5: L M` H
Q M2HL + Oo M$( K H
Q M$( K Hq+ Oo2 L+O:+ OM5F OK" L $ D L
L$* L =3F(K+ OF: L8( O<: L M` F
Q:& "FL = H
Q+M HL0D 2d L + PB.$ D K^ L D K]+ OQ L 2d L 3d L+ PB+ O@ $ . L D K^7D L + O2d L + Og D K] K]3$ K^+ PB L F KV.$ / K^.D L $ .D L"& . K^/ K] K^: KV * $
(K J
Q * $
(K J q DX+ Op L = D L" L $ D L L$$ K2D L+ Of L D K]+ OQ: L8& Ob L D K] L F KV.$ / K^.d L M` F
P & "F = H
Q+M:HL L3d K^+ O L 3D :+ Pm $ D L & / L $ F KV D KZ. L D L < R, < R,
a L D KY KZ$$ D L 3d :+ O~ : F L L / KY D L $ D L L
L3d L 3d KY+ Pj/ KY D L L$$ K H
Q L$$ K Dq+ Pj L
Q D L" L $ D L L$$ K2D L+ P L L$( K H
Q L. KYFHK/Hq+ Pj: L8& PZ $ . L D L
Q J
Q
q J q
/J 8& P*" L.K^/ K] K^ L * $
(K J
Q * $
(K J q
L J
L:
L.$ 8& P3 KX.D L$ 3D KW.d L L2$ L+ Pl+ P L7F
Q$D L" L $ D LD L$$ K3D L+ PU: L8& PI K^3d L + PO$ .D L+ Pj L FD K] $ / K^. K] D KX L D L
Q>& $ K]+K Fq. K]. KY"FL/( . L L: K
Q J
Q
q Jq
.J 8( Pe: L. L3d L+ P : KZ; KV+ Ov6d L+ Pq4< R!, , 6H 9+ Mk+ N}@d L D K\ $ D K^"& / L. K^ K^ F L D L
Q J => L5d Q < R$, < R',
+ Pn L3$ L+ Q" L/& . L L
Q H
Q.q8Hq L D K^7` L+ Q+ Ps K\ L q3H + Q5D Q q1H + Q: K\
Q HM+ Q : L; L+ Pv"$ . L4$ Q#5d Q < R(, < R+,
+ Q# < R-, < R0,
" L $ F K[ D L L < R1,
: L; K[+ Q , < R3, , "$ . K\4$ Q25d Q( < R6, K\ < R9,
+ Q0 < R;, K\ < R>,
" K\ $ F K[ D L L < R?,
: L; K[+ Q-, < RA, , L1d + Q^@f L D K] $ D L $ . L D K^ K^3D K]+ QN K^/& / K] K^ D L L L
Q3H
Q+ QA: L8& Q; K] D L3d L+ QN: L+ Q5: L L
Q F = L3F K]+ QM"& .F K]. L/ K] L
Q H
Q q Hq.$ 8& QG L D K^+ Q7"$ .D K]+ Q>"$ . L4$ Q^5d QS < RD, < RG,
+ QZ < RH, < RK,
" L $ F KW D L L < RM,
: L; KW+ QW, < RN, , + Q^ < RQ, , + Mk MZ L Ap ,~ h K_ Ma L X 8 L P L$ KZ @ L P L$ KZ $M P L$ = @ L P 0 L @ > K X 8 L%
$ : $ K] X 8 L1 X 8 L9 X 8 L@ $ = X 8 LH $M P 0 L @ > K P 0 L @ > K X 8 LN X 8 LT X 8 LY $ = X 8 LY $ = X 8 Lb $ L $ = X 8 M X 8 Lm $ M $L
X 8 Lx
$M X 8 M X 8 M
$ = X 8 M M X 8 M < = > < ('-',29X,'SELECT OPTION:'/) (' SELECT OPTION:'/' ?',$) (72A1) ('-ERROR: Invalid entry, Re-enter the line'//) ('+ ?',$) ('-ERROR: Variable "',A5,'" does not exist, Re-enter the line'//) (I5) ('-ERROR: Missing '' in an A-type variable'/9X,'Re-enter the line'//)('-ERROR: Too many values in the string'/9X,'Re-enter the line'//) ('-ERROR: Multiple values can only be performed on a ''EQUAL'' CONDITION'/9X,'Re-enter the line'//)('-ERROR: ',15A1,' Is too long for A-type variable,'/9X,'Re-enter the line'//) (37X,72A1)(G15.0) (I15)('-ERROR: Cannot have a decimal point in a I-type variable'/9X,'Re-enter the line'//) ('-ERROR: No qualifier accepted, Try again'//) ('-ERROR: Too many qualifiers requested'/9X,'Program will ignore the last SELECT statement'//)('-SELECT option allows the program to consider only those observations'/' meeting user specified criteria. Instructions to the SELECT option'/' (QUALIFIERS) are entered on a line or on separate lines. Each'/' QUALIFIER contains 3 basic parts: VARIABLE, CONDITION, and VALUE or'/' VALUES to be compared against. The variable may be specified by'/' either the variable NAME (if previously defined), or the variable'/' number (in the case of data BANK file, this is the number associated'/' with the BANK). The CONDITION may be one of the following:'//6X,'CONDITION',5X,'MEANING'/6X,9('-'),5X,7('-')/9X,'=',10X,'equal to'/9X,'<',10X,'less than'/9X,'>',10X,'greater than'/6X,'<= or =<',6X,'less than or equal to'/6X,'>= or =>',6X,'greater than or equal to'/6X,'<> or ><',6X,'not equal'//)(' The value to be compared against must be of the same type as the'/' variable it is compared with.'//' Enter each QUALIFIER immediately after the ? is typed out by the program'/' Several QUALIFIERS may be ''OR'' together by entering the QUALIFIERS on'/' a line separated by semi-colons (;). Enter a ^Z, a carriage return or'/' a blank line immediately after the ? to signify the end of all'/' QUALIFIERS. Up to 20 Qualifiers may be specified.'//' EXAMPLE: To consider all those observations in which variable 3 is'/11X,'not ZERO, and variable 5 is less than 4 or greater than 8.'//11X,'SELECT OPTION:'/11X,'?3<>0'/11X,'?5<4;5>8'/11X,'?^Z'//)(37X,'SAME AS THE PRECEEDING RUN'/) S . E H 9 0 - TTY ; ' L A , P X h M P gdXz \ TN p @ RY 13D TS+ T < V], , < V`, , < Vc, < Vf,
=2D TQ+ Th >2D TP+ Th >2D TT+ Th ?3D TY+ VR =2D TO+ Tn >2D TU+ Tn >2D TX+ Tn ?3D TP+ VW@d 9 D R`: R`@d RX"& $ $ $ D RW RW =2D TY+ Tu> RW8& Tr+ VJ $ D Rj TW TY FRd*d Tw TU TY F a*d Ty@d Rl D Rh Rj = D Ri3D TY+ U TWZD RT RT Rj3F Ri+ U*d T~: Rh0d + U Ri FRd: Rj3d RW+ T{ < Vh, , 6$ 9+ U < V\, f"$ .D R`" RX.D 9 < Vk, , < Vn, < Vq,
+ To TY D RU Rd3$ TR+ U Rd3d TQ+ U < Vt, < Vw,
" RY $ D RZ RZ
Q3D RU+ U@: RZ8& U 21D + UE < Vz, < V},
6$ 9+ U < V\, f Rf2D TY+ U%"& $ Rd HRd/$ 8& U! TY D Rd+ U TY D RX < V~, < W,
< W, < W,
$ 2$ RU+ U 90&
+ VO2D 2+ U2 RU2f RY+ U: 9 F 9
q J RU+ U\ RU2d :+ U.$ &$ D Ri ( >. ;&( >$ :.$ . D R < W , < W
: 9 RU F9" Ri.& $& . RU F Ri$& d H RU+ U\ 90$
+ VO: 9q RZU U\ $ >. ;&$ >$ :.$ D Ri $ . :&$ D Rl" Rl $ F R[ D RZ. Ri D R < W, < W,
TVZD RY RY$& `3F RU+ UU*d UP: RZ; R[+ UL+ U 90$
+ VO: 9"& . RZ$& . RY F9 & $ RY d F RU 9 R` F : RX@d R\ RT R`.d Rl0d + U & . Rj2f RW+ U Rj =3H =+ U: Rj TWZD RT RT Rj =3HRj+ U^*d Uf 9 Rl FC@d Rh Rj = D Ri RU0F + Us3D TT+ Uq < W, , + U: Rj = F Ri+ Uu Ri2$ TR2d TQ+ U: Rh0d + Ux Ri F a: Rj2f RW+ U| = H Ri2H TS3H TV+ U|+ Uu: R\1d
+ V < W, , + U Ri2D TV+ V2D TV+ V & 2F Rl+ V $ . RU6b 0b + V+V4 V%4 V
4 V% < W, , + U Rh1d + V < W , < W!,
+ U Rh a2D TT+ Uo> Rh &
$ 9. R\ TY HC &
$ 9. R\ < W$, " Rh $ F Rg D RZ RZ < W',
: RZ; Rg+ V, : Rj 9 R\ H2d RW+ V! Ri3F TS+ Tv3F TV+ Uk 13D TS+ V$ < W), < W,,
+ U a2D TR+ V( b3D TR+ U" Rh $ D RZ RZ a2D TO+ V0 $ . RU6b 0b + V0+V.4 V14 VH4 VH: RZ8& V) $ D Ri" Rh Rh> Ri
a J a/$ 8& V3" Rh $ TY H a.$ 8& V6 TW TX FRU*d V9 RU1D + VB < W., < W2,
< W4, $
$ 9. R\ < W8,
+ V < W9, < W=,
< W?, $
$ 9. R\ < WC,
+ V < WD, , + U $ 3$ 9+ VZ < WG, , 3d 9+ T_ < V\, f+ VZ < WJ, , " RX.D 9+ VZ < WM, , < WP, , 6$ 9+ T_ < V\, f 13D TS+ VZ < WS, , TN,~ X 0 Rm X 8 Rp X 9 VJ Rs @ $ = X 8 Rt X 8 Ry X 9 VJ Rs @ $ = P Rs RU @ Rd X 8 Rz $ RU P Rs RX @ Rd P S RX $ RU P 0 R_ @ > i P 0 R_ @ > i X 8 S X 8 S X 8 S
X 8 S @ a P Rh Rs C $ a X 0 S! @ $ = P Rs RV @ a P S" RV (C P Rs Rb @ a P S# Rb $C X 8 S$ X 8 S- X 8 S2 X 8 S; OX 8 T
@X 0 TK ('1'/'-'/'-',29X,'WESTERN MICHIGAN UNIVERSITY'//30X,12A5///30X,'CALLING NAME: ',A5/30X,'TIME-DATE : ',A5,2X2A5/30X,'TITLE',7X,': ',16A5/30X,'FORMAT',6X,': ',16A5/4(43X,16A5/)) (30X,'DATA FILE : ',A10/30X,'CREATED ON : ',2A5/30X,'BY PROJ-PROG: ',A1,O6,',',O6,A1/30X,'NUMBER OF VARIABLES IN THE BANK.',5(' .'),I7/30X,'NUMBER OF OBSERVATIONS IN THE BANK',4(' .'),I7) (30X,'NUMBER OF VARIABLES USED',9(' .'),I7) ('-',29X,'DATA FILE : ',A10,A1,O6,',',O6,A1) DSK S:5p \ X p @ WX < X , `F < X , `^ < X , < X!,
20D + X < X), < X,,
7D WX+ X < X2, < X5,
12D X+ X 21D + X < X7, < X:,
X,~ x WVx WVX 0 WX @ = ( < $ WV @ WV @ 4 @ (
X 0 Wk 0 2 @ ; $ 5 @ < $ 6 $ : $ ; X 0 W~ $ WX X 0 X 0 2 $ 5 $ 4 $ 5 $ 6 ('1',A5,' W.M.U. ',2A5,4X,16A5,3X,A5,4X,'PAGE:',I4/)('1',A5,' W.M.U. ',2A5,9X,12A5,18X,A5,4X,'PAGE:',I4/) TTY a<P \ XI 13D XI+ XT $ D 7 < XV, `^: 87D <+ XR < XW, < XZ,
+ XT < X_, < Xb,
XI,~ x WVX 0 X= ( < @ WV @ 4 $ WV $ 8 X 0 XC ( < @ WV @ = $ WV $ 8 F A I (' ENTER FORMAT ENCLOSED IN PARENTHESES'/) (' ENTER FORMAT ENCLOSED IN PARENTHESES: (',A1,'-TYPE ONLY)'/) (80A1) ('-ERROR: Format incorrectly specified'/) (' Any FORMAT specification must comply with the FORTRAN-10 Format'/' requirement. The FORMAT must also be enclosed in parentheses'/' and be no more than ',I3,' characters in length'//' Example: ENTER FORMAT ENCLOSED IN PARENTHESES'/11X,'(I2,F3.0,1X,F2.0,I1)'/) S . E ( H (@ L A ) M P SYSTEM ERROR CONTACT COMPUTER CENTER DSK SEQIN O$lH \ YF p @ Xl p @ Xo !p @ Y $ D Xk@f F Xi F Xl2F Xo+ Y] < ZG, ^: 0H 3D Xl+ Y_+ Ya < ZH, , 1( 2F Xl+ Ye < ZK, < ZN,
Xi0$ + Yh < ZE, a Xi0D + Yk < ZP, < ZS,
"& ( $ ( D Y Y Xq2D YM+ Yq> Y8& Ym $ D + ZD Y D Xk@d Y: Y2d Xk+ Y{ Xq2F YM+ Ys Y/& / Xk Y Xr HXq.$ 8& Yx"$ .D Xk+ Ys6D Xi+ Z$ Xr2D YI+ Z Xr2D YH+ Z Xs2D YJ+ Z Xs3D YM+ Z? Xr2D YF+ Z Xr2D YK+ Z Xs2D YL+ Z Xs3D YH+ ZD Xr3D YH+ Z Xr2D YJ+ Z= $ D Xi" Xo $ . Y
YMXJ'.$ 8& Z D Xi & / Xk $ D Y Y Xq3D YG+ Z: Y8& Z: Xk YG FXq"$ . Xk D Xm < ZU, & / Xk $ F Xn D Y Y < ZY,
: Y; Xn+ Z , < ZZ, < Z\, + Ye" Xk $ Xq3H YH: Xl Xq2H YK+ Z)"( .H Xl.$ 8& Z% $ . Xk&$ . Xk2d Xo+ Z= Xk. Y < Z`, " Xk $ F Xm D Y Y < Zc,
: Y; Xm+ Z1, $ . Xk&$ .D Xk Xl0$ + Z;6b Xi0b + Z;+Z:4 ZD4 Z<+ Ye < Ze, + ZD < Zg, , + YX Xo( . Xo D Y < Zj, < Zm,
+ YX YF,~ h Xr YI Xqx YNX 8 Y X 8 Y $ Xi X Y& @ ( Xr P Xm Y& Xh $Xq h P ~ YRP Xh ^ YSP Xk Y& $Xq h X 8 Y' X 8 Y+ $ Y ALL HELP EMPTYSTOP OBS $ - . * / ? " + ; (' ENTER # OF VARIABLES OR VARIABLE NAMES'/) (I5) (I5) (5A1)('-ERROR: Number of variables ',I6,' outside allowable range,'/9X,'Try again'/)('-ERROR: Variable name list too long, contact computer center staff'/9X,'for help'/) ('-ERROR: Reserved character "',A1,'" in variable name'/) ('-ERROR: Variable name "',A5,'" is reserved'/) ('+Re-enter the line'/) ('-ERROR: Variable name "',5A1,'" starts with a number'/) ('-ERROR: Variable name "',A5,'" is used in variables ',I5,' and ',I5) ('-Enter correction in the order: VARIABLE #, COMMA, VARIABLE NAME OR A - TO DELETE'/) (I,A5) ('-This line defines directly and indirectly the number of variables to'/' be used in the analysis. If a number is entered, it is assumed to be'/' the number of variables and variable name option is not selected.'/' If a variable name list is entered, the number of variables is'/' counted from the list. Variable name list should conform to the'/' following rules:'//' (1) The list is composed of 1 or more lines. If more than 1 line'/6X,'is needed the last character in the line must be a comma.'/6X,'The list must be terminated with a carriage return or an altmode.'//' (2) Variable name is made of 1 to 5 alphanumeric characters, the'/6X,'first being non-numeric.'//6X,'The names may not contain any of the following symbols:'//6X,'* ? - / , + '' . BLANK'//6X,'Nor may be any of the reserved words:'//6X,'ALL HELP EMPTY STOP OBS'/) E H 9 0 - L @ , X ` P $mLz \ \ p @ Zv < ]U, , @d Zv \ \ F =*d \% < ]S, a $ D Zn Zu0D + \,7` 9+ \#+ ]O @2D \+ \2 @2D \+ \2 A2D \ + \2 A3D \ + ]L"& $ D Z| Z| ?2D \ + \6> Z|8& \3 Z| D Zq ?3F 6+ \: ?3F Z|> Zq" Zq $ D Z| Z| ?3( \ + \h ?2h \+ \h: Z|8& \<" Zq $ ? H =.$ 8& \A ?2D \ + \I"& $ = H =/$ 8& \F \ D =+ \C < ]X, < ]\,
< ]^, < ]b,
7d Zv+ \b0d + \f" Zv $ F Zr D Z| \ \ F =*d \R Z| < ]c, < ]g,
< ]h, < ]l,
=2D \ + \] \ = F =*d \Z \ D ?+ \X Z| < ]n, < ]r,
aD Z|; Zr+ \Q+ ]P < ]t, < ]w,
6$ 9+ \# < ]R, f < ]y, , < ]R, f"& $ $ $ D Zp Zp ?2D \ + \m> Zp8& \j+ ]+ Zp ?G Z4& \t ?2H \ + \t ?2H 6+ \t> Zp 6 F ?@d Zp D Zo" Zp $ F Zy D Zo ? F Zz2F \ 3F 6+ ]
3F Z+ ]
3F \ + ]& \ ZD Z| Z| Z3F Zz+ ]*d \| Zo0$ + ]&: Zo Zz F =+ ]& < ]|, < ],
+ ] < ^ , Zv < ^,
6$ 9+ ] < ]R, f < ^, , " Zp.D Zv+ \% Zz Zo0F + ]2D 63D Z+ ]+7d Zo+ ]& =3$ \ + ] =2d \+ ] < ^, < ^ ,
+ ]: Zv0d + \f: Zp@f
Q < ^ < ^,
\ ZD Z| Z| Zv
Q3HZ|+ ]*d ]@ Zv D\ \ F =*d ]" Zz2D 63D Z+ ]+: Zo; Zy+ \w Zz3D \ + \%7d Zo+ ]+ $ D Zn+ ]"$ . Zv4$ \b4D ]P & / Zv $ F Zw D Z|.$ D Z{"& / Zv. Z{ Z{ D Zq Zq Z|
Q3H
Q+ ]9: Zq8& ]3: Z|; Zw+ ]0+ ]P < ^, Z| < ^,
6$ 9+ ]= < ]R, f < ^, , < ^ , < ^ ,
Zz3D \ + ]D Z| D
Q+F]+ $ . Z| D Z{"& / Zv. Z{ Z{
Q H
P. 8& ]H"$ .D Zv+ ]+ < ^!, , 6$ 9+ \# < ]R, f \ Zv Ap ,~ h @ \ ZuX 8 [ P [
Zz @ = P [ Zz $ Zv P [
Q $ Z| P [
Q @ = P [
Q @ = X 8 [
$ Zv X 8 [ X 8 [ $ Zz X 8 [! $
Q X 8 [& X 8 [) @ = P [
Q @ = X 8 [/ $
Q $ Z| $ Zq X 8 [6 X 9 [? $ Z| $ Zz X 8 [@ Y ` Z (X^ . > [.~ (3~ + ^( ~ + ^3Z . \x <x *<x .-> `yez+ ^/!" b + " ^0 b + Z . h + gg M?Th
& ^5 b + ^#,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1 ,> fO@ ^x+ ^>gR~@1 ,> f@@ ^x,> ,> @ 6 w+ ^K" ^x0B + ^F!"A`X#p 5@ ^C/#p !" X#p + ^K\p + ^Ka.9'1 ,> f,> ,> O@ ^x+ ^K,>
6 + _ 4` ^S"` Q@ ,> < ^y, ,^ ,> < ^|,
,^ *b ^P+ ^^,> < ^~, ,^ 7@ ^x+ ^Y,> < _,
,^ + ^[,> < _,
,^ Z 5" ^^,> < _,
,^ , 7@ ^x,
,> < _, ,^ , ,> < _, ,^ ,> < _ ,
,^ (@qd 1@ ,,
1@ #+ ^l0@ *+ ^^,> ,< ,~ (' Type G to Continue, X to Exit, T To trace.'/2H *,$) (A1) (1H 14A5/)(1H A5,1X,O6) PAUSESTOP .p X ^t p X ^u p ^w p ^w p X ^n X ~ ^t p x gG@ 1 ,> f7cp + (Bdb + . "+ . "T B#p @,~ 4B +P ^50
_ #p + _ ,~ > attempt to take SQRT of negative arg Kc3@ p p + _,Kc3K , _,
,~ Kc3J , _, ,~ Kc3I , _, ,~ Kc3H4B _B5@ _/5" _A+D ^50
_.U ,~ ,> ,> # $ )D /$ @,> 4d _9X $ (F) + _95F _95" _7"` , _P+ _@# ,> < _C, ` ,^ @ ,> < _D, _w,^ 5& _@" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + _PKc#K , _P @ ,~ Kc#J , _P @ ,~ Kc#I , _P @ ,~ Kc#H4B _t5@ _T5" _^+D ^50
_SU ,~ D _s!$ @ _r B _s5" _[#` + _p, _[!" B ,~ + _^(BdB + _^5B _Y _s,~ +7` _s+ _g`d +D ^50_b+D ^50
_bU `d @ 6 _r+ _] _s`B "` + _]/ _uid + _i+D ^50_b# _r,> < _v, ` ,^ @ ` _s @ ,> < _v, _w,^ + _dU", _[ _r+ _^+ _X ! ,~ x Kc 1 ,> f p 3" `+ _|3b `+ _~+D ^50
f{U,~ +D ^50}| ,~ `D ` F `@@ `%" j" % `)/;` : XD ` ` D `@ ` `,~ !t0 ' "S'qf!um. .#Y% !v yO^ RX C2|t(1 ,> f p 4@ `, @ `,> < `4, ` ,^ `,~ {e^b C2|p 1 ,> f p 5` ` 4@ `,+P ^50`5#p 3@ `/+ `.) r. !@ `3! n@ `3(|h" `/ `0 B `3 `0 `1 `1 `3 `3 `2,~ +D ^50
`- `2,~ ,~ 0 _i/X3 6P'M 5( bB W
R `@ x `ATTEMPT TO TAKE LOG OF NEGATIVE ARG CR@1 ,> f,> ,> p p Ep <b `B $Ep $ E . .& + `>" .!p Ap $Ep ,^ ,^ ,~ I$P 1 ,> f #p D F b &" .$ &$ 7@ "$ (@ . &" * `X)@
(@ $ &$ .$ .& (D (F . . #p * * ,~ .$ D .& -Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-i&lP 1 ,> f D `w F `x b &"j0 D `x&" D `yS Ao-& `t " B `y-& `t[p (F{5F `i[w0F+ `s+ `k p h& `f~ + `s " B `x&" t D `x-& `t " B `x&$ 2 $ D `w `x,~ `w `x,~ &" " B $ D + !$h X$h @@h *% " a 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 O 1 ,> f@ p .#p < XB aQ#p %p 8 XD a( Ep *" #p XB a @Ap p @
( 1D + a1D + a$4. a a(d a( FK 1d >1D Kp
& a),~ :
O&
1 ,> f `
ZAp [Ap ,~ U>m61 ,> f `
Ap ,~ H a3H bgZ xa3 A=Qi7 + @ ` 1p Q0A` a0@@ a3 b * aG@ , b4T ay1T + aN1T )+ ad1 , b4T aTT + aR ." &" "` QB a1 b ` + aY b + b INX
+ ac `
& b b& b b!` b!` aG+ ac a0?` a3
& b" ` 5H aRO a0 $ , b1T + b0T *+ aJ, b1T ', b0T + aJ> @@ b, b 0T 1T + ap0T 1T -+ aw4T aw+ ay $ a0, b 7@ b+ aw1T + a{4T b1T -+ a}0T + ay, b+ at!*Lu*
b J b+ as
& b$
'p
& b& ` $ b', b
, b0T 1T .+ b1T + b1t 14 + ay(L .,Wh+ a~SL b+ a}XL b+ b, b ! >9 @ b 2 b'*& 8+ 0@@ b b(*& b, b1T + b 7 , b14 ,~ 1t + b04 0t -,~ 4d b.4 T = b
6
8a4 a1 5$ aG0 aG< aGCANNOT ENTER TMP FILE!
Command error:
H b
"h 0
#b iSNAp O
, 7 OAp ,~ I4:1 ,> f, c Ap ,~ 4 4 b24 b^ KbN=1 ,> fO@ b^ p 4B b:, c4@ b:9 b>9 b<KbN= 1 ,> f@@ b^!$Lu ` @Ap `` a` + b\a` + b] D b4A (` bB/" #B b4@@ b5 !p X@ b0,> < b0, bd,^ 7@ b^+ bIOAp + b] #p Q"A` $ 1@ + bN0` =d bJ! H: @ b2@@ b3a|+ bT[ p d 0@ + bX[ p d 0@ + bX+ bW_ w6@ b^_ w#` 1 + bXSp Xp @ b3
b4+ b[@ b2+ b\+ b]
& b_+ b] Ap ,~ ERROR ON OPEN!
H H bcH bc G.t21 ,> f@ @Ap ! A`.!p @ ba ba @ bb@@ bc@@ bc & " ba< 1D + bp- b{=b bk ba< 0D + bxO " bb @ bb ba< - b{=b br7@ bcOAp !p < , bc, bc,~ <& bt ba1D + bw Ap + bt 1D + bw1$ + bt1d + c 0$ 0d -+ bt $ D bb+ b{" c , c*0@ + c p 4B c L ad+ c`b+ c $ 0d "+ c &$ $& (&}Z .G c .& $ .$ 7F + c ,~ A$ &$ (D G$1$ ((D (D
` 5@ c .2b M+ c L.& 7D !$Lu+ c2" c + c &p , c" ` ,~
& c < c",
.p M}ILLEGAL DEVICE NUMBER!
" c), c* ' Q&A` c*@ 1x ,~ 18 0.8 X =` c%,~ . H a|+ c.0" 0b / ,~ 0B 1B ,~ 0B / ,~ aJMm1 ,> f, dy+ cN@ , d#, du+ cNZ" 6Ep " B` " b cV $ 7cp $ 1B $ d cW, cP, dA+ cO6cp 0b " b cW$ d ({." XB` &$ @6@ .$ .$
a|+ cG[p d p0B + cK+ cI_w#` 1" + cK6cp 0d $QD` , d
+ , e ,~
& cX+ cL
& cZ+ cL@b -p . Q,A`
c\ 4P cV1P + c]/0 P =n cR,~ `
` `
CANNOT INIT DISK!
FILE NOT FOUND!
H H .
c]+ cRYC G aS a3 S; YC&<G<aS<a3&<E$;w |xcd Pc_ B` 1T !"L b @ XB` O@ c e c~@ , e
+ e !, 2, dj@ !.~ , e ` + e"" 1T "" QB c}, e f + 1$ 9 d + dx 8 cd@` cd e*( c| e n @ `N + e 6`
e1T e B` " B` \"
b @ B` \" b !" Z (Brb e b
B c b
+" `B` !" 2 b `b `b + d=!" 2 b !` 2B` + d=!$ 2 d !$Lu+ d@ e b @ e , e d !$Lu B c~ D c~,~ @@ d e *( d B d D d BX B` DX Z d (D} d ` D d DX " 2D` b e d " b e , e @ d+ e d BX @@ d e! b $+ dQ!" d X"X *"X !"`
+ dd!, 2, djB , e " X
d d, e + dd JX , e + dx
& e" " b e a` + db+ dKa` + db, e d+ + db x H dr h &( 2
Pc_ e(. c &. .0 P `bp + dnd
@ c~, e + dr`L+ dl c~+ dx ( !*Lu@
, e
,~ : x ,~ " B eO@ d O@ d g " ?$ e+ e d 5D d| e(D Dd + dx,> e` p+ e7 d + el! d + e7 d + el! d : +@ > ,^ + dx
& e),~ "
& e+,~ "
& e1,~ , e
& e8
& , e b ( e9+ e
& e<,~ @ ;` c+ d+ e
<@cd 0 CMQ Cannot do MPB QUEUE on GALAXY system. ( e+ e
`` ` P $` h
@d
X HX a` ,~ !" GB` + db @d6$ d
% 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
C2d;y1 ,> f6#p 0b + f@Ap f $ b 2+ ev "6@ &Z &." p 4D ek.$(B{(D{0d + f B f D f ( & Q& f 2+ eM4& eM1( ~9 eI H f3H f+ eY2( f+ ea.( 3( f f H f@@ f@@ emS"xZHen: em.( 3h f*b eS!$ 6@ fGD en f d 2+ e[3h f+ eR f(F + f6@ f+ e]O@ f+ eUOAp Z en3b f+ f/" * f B f+ ea@Ap f: !& @@ em!"x Hen: emGFen.( 3h f*b ed f d 2+ 3h f+ ec6Ap + f+ eYZ b + @gp + f 6@ &+ e{Z .$ 1$ $ ! d + f $ QD &, f
,p Z aD $ f f Q& [ [ &.& ." `b+ f! ." !` aB b :p d + f/'p .& Gp ,~ OAp ,~ G3]x1 ,> f@ ` + f
& f ` emp
Cannot write-enable high segment data area.
KbN@ 1 ,> f,
,~ fY\ fQ< X\ f * +