Trailing-Edge
-
PDP-10 Archives
-
decus_20tap2_198111
-
decus/20-0047/cross1.exe
There is 1 other file named cross1.exe in the archive. Click here to see a list.
?p 0 ` 0 ?h X { ?x "
<+ + =2 ` ~-00W ]@{ =l 2 ]8 ( (' CROSS1',8X,A5,9X,2A5//) (/' NAME OF SURVEY? ',$) (12A5) (/A5)(//A5) (8X,A5) ('+'/$) (' CANNOT FIND DATA FILE ',A5/) (/48A1) (9X,48A1////) (9I) (9I1,9L1) (I2) (3I,2A1) (I,2A1) (5X,128I1)(5X,128A1)('1')(' ENTER COMMAND: ',$) (' COMMAND NOT AVAILABLE--RUN CROSS2'/) (' ENTER ONE OF THE FOLLOWING:'/' XTAB, ITEM, STOP, OR DETAIL'/)(' TO OBTAIN MARGINAL FREQUENCIES FOR A VARIABLE OR'/' TO CROSS-TABULATE 2 OR 3 VARIABLES, TYPE "XTAB".'/' TO INTERCORRELATE 2 TO 9 VARIABLES, TYPE "ITEM".'/' TO TERMINATE THE PROGRAM, TYPE "STOP".'//' TO HALT EXECUTION OF A COMMAND, TYPE "ABORT".'/' TO GET HELP AT ANY POINT, TYPE "EXPLAIN" OR "?".'//' FOR A MORE COMPLETE EXPLANATION OF ANY OF THE ABOVE'/' COMMANDS, TYPE "EXPLAIN" AND THE NAME OF THE COMMAND.'/) (' FURTHER EXECUTION OF A COMMAND MAY BE HALTED AT ANY'/' BREAK POINT BY TYPING "ABORT". TO SUPPRESS THE PRINT-'/' ING OF TABLES OR OTHER OUTPUT, TYPE <CTRL>O AND PRESS'/' <RETURN>.'/) (' IF YOU NEED AN EXPLANATION OR FURTHER INSTRUCTIONS,'/' YOU MAY RESPOND TO ANY REQUEST FOR INPUT BY TYPING'/' "EXPLAIN" OR A QUESTION MARK.'/) (' VARIABLES TO BE TABULATED? ',$) (' ENTER ONE VARIABLE TO OBTAIN MARGINAL FREQUENCIES OR A'/' PAIR OF VARIABLES TO BE CROSS-TABULATED. ENTER THREE'/' VARIABLES IF A CONTROL IS DESIRED. THE THIRD VARI-'/' ABLE MAY BE FOLLOWED BY AN EQUALS SIGN AND A CATEGORY'/' NUMBER (0 TO 9). AN ENTRY IN THE FORM ''V1,V2,V3=C'''/' ASKS FOR A CROSS-TABULATION OF VARIABLES V1 AND V2 FOR'/' RESPONDENTS BELONGING TO CATEGORY C OF VARIABLE V3.'/' AN ENTRY IN THE FORM ''V1,0,V3=C'' REQUESTS MARGINAL'/' FREQUENCIES FOR VARIABLE V1 FOR THOSE RESPONDENTS IN'/' CATEGORY C OF VARIABLE V3. IF THE THIRD VARIABLE IS'/' FOLLOWED BY AN INEQUALITY SIGN (<>) AND A CATEGORY'/' NUMBER, RESPONDENTS IN THAT CATEGORY WILL BE EXCLUDED.'/' IF YOU DO NOT WANT TO HAVE ANY VARIABLES TABULATED,'/' TYPE "NONE".'//' WHEN VARIABLES TO BE CROSS-TABULATED ARE LISTED ON THE'/' SAME LINE AS THE COMMAND (E.G., "XTAB 1,2"), THE OUT-'/' PUT OPTIONS WILL BE THE SAME AS IN THE LAST PREVIOUS'/' CROSS-TABULATION, IF ANY.'/) ('+INVALID ENTRY--VARIABLES RUN FROM 1 TO ',I3/)('+INVALID ENTRY--VARIABLE WITHOUT CATEGORIES'/) (///' DOWN: VARIABLE ',I3)(' CONTROL: VARIABLE ',I3,2X,A2,' CATEGORY ',I1,A1) (///9X,'FREQ',4X,'PCT'/) (' ',I1,A1,5X,I4,4X,2PF5.1) (/' TOT ',3X,I4,4X,2PF5.1) (' ENTER (WITHOUT PUNCTUATION) ONE OR MORE OPTIONS FOR OUTPUT:') (' 0--EXCLUSION ANALYSIS ONLY'/' 1--FREQUENCY OF RESPONSES'/' 2--PERCENTAGES ACROSS'/' 3--PERCENTAGES DOWN'/' 4--PERCENTAGES OF TOTAL'/' 5--CHI-SQUARE'/' 6--NOMINAL TAU'/' 7--YULE''S Q / GAMMA'/' 8--PHI / ORDINAL TAU'/' 9--SOMER''S D'/) (' OUTPUT OPTIONS? ',$) (///' DOWN: VARIABLE ',I3/' ACROSS: VARIABLE ',I3) (' CONTROL: VARIABLE ',I3,2X,A2,' CATEGORY ',I1,A1) (///' FREQUENCY OF RESPONSES:') (//5X,20(1X,I4,A1,$)) ('+',4X,'TOT'/)(1X,I1,A1,2X,20(1X,I4,1X,$)) ('+',3X,I4) (/' TOT ',20(1X,I4,1X,$))(///' PERCENTAGES ACROSS:') (1X,I1,A1,2X,20(1X,2PF5.1,$)) (/' TOT ',20(1X,2PF5.1,$)) (///' PERCENTAGES DOWN:')('+',3X,2PF5.1)(///' PERCENTAGES OF TOTAL:') (/' CHI-SQUARE IS UNDEFINED.')(/' CHI-SQUARE =',F7.2,' WITH ',I2,' D.F.')(' PROBABILITY OF CHI-SQUARE THIS LARGE IS ',$) ('+1.') ('+',F4.3)('+LESS THAN .001') (' NOTE: EXPECTED FREQUENCY IS LESS THAN ',$) ('+1 IN ONE OR MORE CELLS.') ('+5 IN ONE CELL.') ('+5 IN ',I1,' CELLS.') ('+5 IN ',I2,' CELLS.') (/' GOODMAN AND KRUSKAL''S TAU IS UNDEFINED.') (/' GOODMAN AND KRUSKAL''S TAU = ',F6.3) (' (KNOWING VARIABLE',A1,I3,$)('+ DOES NOT REDUCE ERROR',' IN PREDICTING VARIABLE',A1,I3,')') ('+ REDUCES ERROR',' IN PREDICTING VARIABLE',A1,I3,' BY',A1,2PF4.1,'%)') ('+ ELIMINATES ERROR',' IN PREDICTING VARIABLE',A1,I3,')') (/' YULE''S Q IS UNDEFINED.') (/' GOODMAN AND KRUSKAL''S GAMMA IS UNDEFINED.') (/' YULE''S Q = ',F6.3) (/' GOODMAN AND KRUSKAL''S GAMMA = ',F6.3) (' (VARIABLE',A1,I3,' = CATEGORY ',I1,A1,') TENDS WITH ',' (VARIABLE',A1,I3,' = CATEGORY ',I1,A1,')') (' VARIABLES',A1,I3,' AND',A1,I3,' ARE NOT ASSOCIATED')(' 95% CONFIDENCE LIMITS FOR Q ARE',A1,F6.3,' AND',A1,F6.3) (/' PHI IS UNDEFINED.') (/' KENDALL''S TAU IS UNDEFINED.') (/' PHI = ',F6.3) (/' KENDALL''S TAU = ',F6.3) (' UPPER AND LOWER BOUNDS FOR PHI ARE',F6.3,' AND ',F6.3) (' (RANK CORRELATION CORRECTED FOR TIES)') (/' SOMER''S D IS UNDEFINED.')(/' SOMER''S D = ',F6.3)(' (PERCENTAGE DIFFERENCE',$) (' (PROPORTION DIFFERENTIAL',$) ('+ FOR VARIABLE',A1,I3,' RELATIVE TO VARIABLE',A1,I3,')') (///' ZERO ORDER Q = ',F6.3/' PARTIAL Q = ',F6.3/' DIFFERENTIAL Q = ',F6.3) (///' EXCLUSION ANALYSIS:'//' TABLE TOTAL ',I4/' EXCLUDED ',I4/' SAMPLE SIZE ',I4) (' VARIABLES TO BE CORRELATED? ',$)(' ENTER 2 TO 9 VARIABLES TO BE INTERCORRELATED. ANY'/' VARIABLE TO BE CORRELATED THAT IS PRECEDED BY A MINUS'/' SIGN WILL BE REFLECTED. IF YOU DO NOT WANT TO HAVE'/' ANY VARIABLES CORRELATED, TYPE "NONE".'//' WHEN THE COMMAND "ITEM PART" IS GIVEN, ANOTHER VARI-'/' ABLE MAY BE ENTERED SEPARATELY AS A CONTROL. IF THE'/' CONTROL VARIABLE IS FOLLOWED BY AN EQUALS SIGN AND A'/' CATEGORY NUMBER (0 TO 9), CORRELATIONS WILL BE LIMITED'/' TO RESPONDENTS IN THAT CATEGORY ONLY. IF THE CONTROL'/' VARIABLE IS FOLLOWED BY AN INEQUALITY SIGN (<>) AND A'/' CATEGORY NUMBER, RESPONDENTS IN THAT CATEGORY WILL BE'/' EXCLUDED.'/) (' CONTROL? ',$) (' ENTER CONTROL VARIABLE OR TYPE "NONE": ',$) (///' ITEM INTERCORRELATIONS:') (//' CONTROL: VARIABLE ',I3,2X,A2,' CATEGORY ',I1,A1) (//10X,9(2X,I4,A1)) (' ',I4,A1,4X,9F7.3)(/' MEAN ',4X,9F7.3)(' MEAN ABS ',9F7.3)(' OUTPUT SAVED AS FILE ',A5,'.OUT'/) (' THE COMMAND "STOP" MAY BE GIVEN AS A RESPONSE TO ANY'/' REQUEST FOR INFORMATION. EXECUTION OF THE PROGRAM IS'/' TERMINATED, AND THE DATA FILE REVERTS TO ITS ORIGINAL'/' FORM.'/) p1: 0 F ? ?.
< <> RESETf STOP STARTEXPLAMAP 0 PART IN > ABORTJOIN XTAB ' _@Qua
= POOL ITEM } SAVE UNMAP8 z8] 9Lf3 }ym P1:` DETAIh p NONE CUT .MAP .MAP .MAP .DAT .DAT .MAP .OUT FOR05 .DAT .TMP + -< ,h $ "D ( o D d D K a D 8 ] D Y f D < %Y, 0 ^. E D 7 < %X, 0 < %Z, < %],
< %`, , < %c, < %f,
3D o+ 3D _+ %% D T < %V, ,= @ F5 < %T, ,6 F+ < %h, < %k,
< %Q, ,=4 < %l, < %o,
+ < %P, -$ < %q, i_D IZD u u < %t,
: u; I+ , "& $ D u u +2H + $@h+> u8& ! < %u, i_D EZD u u < %x,
: u; E+ ', @d "6 F+ I < %z, < %},
< %~, " $ F + D u u < &,
: u; ++ 1, < &, " $ F * D u u < &,
: u; *+ 7, < &, " $ F ( D u u < &
,
: u; (+ >, < &
, < &,
2d D < &, < &,
7` "+ ^+ m < &, < &,
< &, " $ F & D u u < & ,
: u; &+ N, < & , " $ F $ D u u < &!,
: u; $+ T, < &", " $ F 1 D u u < &%,
: u; 1+ [, h_D 0ZD n ( . .& H*d `: ; 0+ `6d "+ m < &', < &*,
2D + f < &+, < &.,
d " D x+ o < &0, , < &3, , < &6, h_D 'ZD H H < &9,
: H; '+ s, < %3, + < &:, < &=,
J3D _+ 3D o+ m3D m+ 2D `+ 2f b+ 3D d+ (3D g+ #3D _+ %%2D `+ < &?, , 2D j+ < &B, , 2D c+
< &E, , 2D g+
< &H, , 2D p+ < &K, , 2D i+ < &N, , 2D ^+ < &Q, , < &T, , + m < &W, , + m < &Z, < &],
J2D c+ < &_, , 2D `3D \+ + < &b, , 2D d+ # < &e, , 2D g+ % < &h, , 2D _+ ( < &k, , + mO@ ! 02D J+ , 02D o@@ !6 !+ . < &n, , 6 !+ 5 < &q, h_D #ZD H H < &t,
: H; #+ 2, 03D p+ m 03D c+ m 03D _+ %% 03D `+ = 02D \+ > < &u, , < %3, + < &x, < &{,
$ 3D t+ ( t L
O@ K3d 2f + J3d 2h + J3d 2l + J@@ K6 K+ M < &, < ',
7 K+ (O@ K
32jW+ S
32j W+ S
033j0W@@ K6 K+ V < ', , 7 K+ ( < %O, *r @ 0` Oj
'@@ 2J ]3J b+ \+ ]6. O@ < %N, *r @ G0` Oj G7 + c6. G+ c
J G5H f6* G+ f6* + f L L D 3 F W F H & 3f G+ l & 2F L+ 6& G+ n & 3F L+ D G F3 FW6@ L+ + D 3 D G t 3 F u"W/& . u u ( , $
G
(
.
.
j( y
x
l J +.$ 8& vd x l D < ', < ' ,
D 96 + Y D 97D + < ' , < ',
< ', , t 3 H t"W/( . t t < ', t , $
G
(
.
.
(
< ',
.$ 8(
< ', < ' ,
+ # < ' , , 7 (+ o3& + D < '", , < '%, m_D [ZD H H < '(,
: H; [+ , 03D p+ m 03D c+ m 03D _+ %%O@ J 03D `+ * 02D \@@ J6 J+ , < '), , 6 J+ / < ',, , 7 J+ o3F 0+ < %3, + < '/, j_D ZD u u < '2,
: u; + 5 j_D
ZD < '4,
: ;
+ 9, j 8 ( "H(*d =L (D )D )D *D *D +D +D ,D , D ( < %L, .6 @ 6 F+ a < %J, , < '5, < '8,
< ':, < '=,
h < '>, " & H F u u < 'A,
: u; + O, & ( .& t ( 8 H Y < %I, *r @ & ( .& L ( 8 H Y < %H, *r @ & ( .& ( 8 H Y < %G, *r @*d L 3 F 2"W/& . 2 2 F D G L 3 F 1"W/& . 1 1 F D t 3 F 0"W/& . 0 0 * b$
G ( $ . . @j ".$ 8& m: ; + j: G; + e < %E, -$ < 'C, < 'F,
< 'G, < 'J,
" " $ < 'L, "
( J T H u u < 'O,
: u; T+ ~, t ( 8 H Y < %D, *r ( . H L ( 8 H Y < %C, *r ( . H
*( 8 J Y < %B, *r
(
.
( J G$* b$( . . :
".$ 8& {7 + J3F g+ $ 6 + < t 3 F ."W/& . . . F M D L 3 F &"W/& . & & F J D $$ ( . . @d x 3 F #"W/& . # # * $
( . . , b$
* $
.
.
(".J x.$ 8& ' & b$ $ $ . . ( $ ( . . x/F": ; J+ : ; M+ J3D g+ $ F3 FW 3 F 5"W/& . 5 5 F D D G t 3 F 5"W/& . 5 5 * $
G ( . . @j y.$ 8& D L 3 F *"W/& . * * * $
G ( . . @j y.$ 8& L G@f>: G; D+ A@d 3 F "W/& . F
"W/& .
F D t 3 F "W/& . * $
G ( . . , b$
G * $
.
.
(".J y * $
G ( . . , b$
G * $
.
.
(".J y.$ 8& ` G( $ G ( . . y.F>: ; + ] Gf>F k3&' F >.F : G;+ ,D ,4& &@f * F t 3 H "W/( . * $
G ( . . 7F y+ : * DP.$ 8( *1$ $ D * L 3 F "W/& . * $
G ( . . 7H y+ : D .$ 8& "& . "$ . *$ D t L
W/
3 W/3$ H % < 'S, < 'V,
D 96 + + Y D 97D + . < 'X, < '[,
7 (+ 77 )+ p7 )+ F7 *+ 7 *+ s7 ++ Y7 ++ ;7 ,+ U7 ,+ !n < '^, , < 'a, L 3 F "W/& . F D L < 'd,
: ; + >, < 'f, , t 3 F "W/& . < 'i, t < 'l,
L
3 J V"
W/, .
V
V L * J * b$
G ( $ . . < 'n,
:
; *+ N, < 'p, * $
G ( . . < 's,
.$ 8& G < 't, L 3 F S"W/& . S S F ' D & $ G ( . . < 'w,
: ; '+ _, < 'y, G < '|,
7 )+ p7 )+ F7 *+ 7 *+ s7 ++ Y7 ++ ;7 ,+ U7 ,+ !n+ "2 t 3 F M"W/& . M M F % D ( $ G( . . f y F k3$ D L 3 F I"W/& . I I ( $ . , b$
G * $
.
.
j("
l J 8.$ 8& ~: ; %+ u L 3 F F"W/& . F F ( , $
G
(
.
.
j( y
G
0
l J +.$ 8&
< '}, , < ( , L 3 F "W/& . F D L < (,
: ; + , < (, , t 3 F "W/& . < (, t < ( ,
L
3 J "
W/, .
L J ( $ . < (
:
; + (, < (, * $
G ( . . < (,
.$ 8& ! < (, L 3 F
"W/& .
F " D ( < (,
: ; "+ 8, < (, G < (,
7 )+ F7 *+ 7 *+ s7 ++ Y7 ++ ;7 ,+ U7 ,+ !n+ "2 L 3 F
"W/& .
F D ( $ G( . . f y F & k3$ & & D & t 3 F "W/& . ( $ . , b$
G * $
.
.
j("
&
l J 8.$ 8& T: ; + K t 3 F "W/& . ( , $
G
(
.
.
j( y
G
0
l J +.$ 8& ` < ( , , < ( , L 3 F "W/& . F X D L < (",
: ; X+ o, < ($, , t 3 F F"W/& . F F < (', t < (*,
L
3 J E"
W/, .
E
E L P J ( $ . < (,,
:
; P+ ~, < (., ( < (1,
.$ 8& w < (2, L 3 F +"W/& . + + F M D & $ G ( . . < (5,
: ; M+
, < (7, G < (:,
7 *+ 7 *+ s7 ++ Y7 ++ ;7 ,+ U7 ,+ !n+ "2 t 3 F )"W/& . ) ) F D L 3 F '"W/& . ' ' ( $ . , b$
G * $
.
.
j("
G
0
l J 8.$ 8& #: ; + t 3 F $"W/& . $ $ ( , $
G
(
.
.
j( y
G
0
l J +.$ 8& 0 L 3 F #"W/& . # # ( , $
G
(
.
.
j( y
G
0
l J +.$ 8& ; < (;, , < (>, L 3 F !"W/& . ! ! F z D L < (A,
: ; z+ J, < (C, , t 3 F /"W/& . / / < (F, t < (I,
L
3 J -"
W/, .
-
- L w J ( $ . < (K,
:
; w+ Y, < (M, ( < (P,
.$ 8& R < (Q, L 3 F %"W/& . % % F v D ( < (T,
: ; v+ g, < (V, G < (Y,
7 *+ s7 ++ Y7 ++ ;7 ,+ U7 ,+ !n+ "2 < (Z, , "$ . 4D }5d < (], , 7 ++ Y7 ++ @7 ,+ ]7 ,+ !w+ "2 $ $ G Q( . Q. P( . P. y$ yh H $ $ G ( . .
(
.
.
( y$
yj J / / H $ b$ G $& . Q. $( . P. " "$" $& . Q.
$* .
P.
("$
".
#
j J G 2d D D
J v 0d @d v@d H" * $ F % D $" $ G$(
(
.
.
$ 0P( .0P. 8 y$( yn
G ( N 2. Z+ ."( 2 H H 1H + 4 $0 .0P$* b.
h(" H v.$ 8& #: $; %+ "6D H+ 9 < %@, +_ < (`, < (c,
6D H+ G < (e, , l2d D+ @ < (h, , D2& Z3d + D < (k, < (n,
2& Z+ T < (p, , + T < (s, , 6$ H+ K < (v, , 0D + N < (y, , 0d 0$ + Q < (|, < (,
1$ + T < ) , < ),
7 ++ Y7 ++ ;7 ,+ U7 ,+ !n+ "27 *+ [ < ), , "$ . 4D b5d | < ), , 7 ++ @7 ,+ ]7 ,+ !w+ "2 G$$ ( . . h y ( . . f yF G F @d " * $
P(
.
P ( $ G. h y H ( b$ G
$* .
P.
l("
$* .
P.
j("J
J .$ 8& l D + @d )" $ G$(
(
.
.
(
.
.
G 8>/0 y$( yp P ).$ 8& } ) 8 D @d " * $ F Z D $@f ) P( .P & $ G. y F " $ $ * b$
G
$, .
P.
$. . P. "8". $0"n N ).$ 8& d D ) D : $; Z+
D l D
n@f 8*d ! $ 22d t+ $ F 82d L+ & F 9
3& k+ ) F 9 < ) , < ),
< ), < ),
l3f + 0 < ), < ),
3f 2( l+ 4 < ), < ) ,
3( l+ 7 < ) , < )",
7 ++ ;7 ,+ U7 ,+ !n+ "2L *D +5$ > < )$, , "$ . 4D H5d u %0D + C < )', , 1D + E < )*, , 7 ,+ ]7 ,+ !w+ "2 $ b$ G $& . Q. $( . P. "$"h H $ b$ G $& . Q.
$* .
P.
("$
"j J D .P & b$ G. @&".F Y$< %?, .;!& F )*d [: $;$ O+ Z" & / $ F D O $ . D !"& / *. ! ! F ~ D $ $ . O D "& / . ( b$ G
$
$, .
(P.
O 8$. .(P.
8"$
0"j J .$ 8& : $; ~+ : O; + {: ; + y & / * $ F z D & / $ F x D O $ . D "& / *. F w D $ & / O $ ( b$ G
$
$, .
(P.
O 8$. .(P.
8"$
0"j J .$ 8& $ : $;4 w+ F: O;[ x+ : ;K z+ & ,D +4$ ! ,D +4$ " D
1h + G < )2, < )5,
#
l+ J < )6, < )9,
#
l+ N < )>, < )A,
0H + R#
Z+ R < )D, < )G,
7 ,+ U7 ,+ !n+ "2L *D +D +5$ X < )J, , 7 ++ [ 0f + u /$ 4D d5d ! %0D + ` < )M, , 1D + b < )P, , 7 ,+ !w+ "2 $ b$ G $& . Q. $( . P. "$"h H $ b$ G $& . Q.
$* .
P.
("$
"j J $ $ G Q( . Q.
P(
.
P.
( y$
yj J $ $ G ( . .
(
.
.
0 y$
yl L /
/ J Y < %=, .F @ J J H -+ !)@d D / & / * $ F D D .$ D Z"& / *. Z Z ( $ G
P(
.
P.
0P( .0P.
8 y$
( yl L .$ 8& ! : ; D+ ! & / $ F 8 D O.$ D W"& / . W W ( $ G
(
.
.
O 0( .0.
8 y$
( yl L /.$ 8& !: O; 8+ ! / D Y < %<, .F D + !a $ $ GO Q( . Q.
P(
.
P.
( y2* y@ .& F $ $ GO
(
.
.
(
.
.
0 y2,( y@ .( H O $ $ G
(
.
.
P(
.
P.
0 y2l( y+ !O $ $ G"
( (
.
( .
P( .P.
8 y$
0 yj J $ $ G
(
.
.
P(
.
P.
0 y$
( yl L !+ !^ $ $ G" O Q( .Q. O
(
.
.
( y$
yj J $ $ G P( .P.
(
.
.
( y$
" yj J ! J D !d < )S, < )V,
1d + !g < )X, < )[,
0D + !j < )\, < )_,
1d + !m < )a, , 6 ,+ "2L *D +D +D ,5$ !r < )d, , L +D ,5$ !u 0f + u /$ 4D !y5d " < )g, , + "2 $ b$ G $& . Q. $( . P. "$"h H $ b$ G $& . Q.
$* .
P.
("$
"j J $ $ G Q( . Q.
P(
.
P.
( y$
yj J H &+ "#7 ,+ "!@d & / * $ F 7 D .$ D
"& / *.
( $ G
P(
.
P.
0P( .0P.
8 y$
( yl L .$ 8& ": ; 7+ " D & n@f 8*d "# $ 22d t+ "' F 82d L+ ") F 9 < )j, < )m,
0F + ". < )o, , 1f + "0 < )r, , < )u, < )x,
: G; + 33FW+ "7 < ){, , 6 ++ # %0F + # 33FW+ #@f D F F F U 3 F "W/& . t
L
(3$, .
3 . b$ .
8".L D (W$. . 3 , b$
.
0".L (3$. . W , b$
.
0".L (W$. . W , b$
.
0".L U.$ 8& "@ D$ Ud D $ f F " 3F + # F G@d D 3 F "W/& . t
L , b$
(W$. . W. (3$0 . 3. @"$8"p P , b$
(3$. . W. (W$0 . 3. @"$8"p P .$ 8& "_" 3D + # D @d D 3 F "W/& . t
L , b$
(3$. . 3. (W$0 . W. "@". U$8"p P , b$
(W$. . 3. (3$0 . W. "@". $8"p P .$ 8& "x" 3D + # D L < )~, < *,
< *, < *,
< * , , F3 H FW < *
, , + oO@ ! 03D J@@ ! 02D a+ # < %3, + ! 03F oO D !6 !+ #! < *, , 6 !+ #( < *, h_D ~ZD H H < *,
: H; ~+ #$, 03D p+ m 03D c+ m 03D _+ %% 03D `+ #/ 02D \+ #1 < *, , < %3, + < *, j_D !ZD H H < * ,
: H; !+ #4, @d 3D + # jZD H H#3f + #> < * , , + # H
(33j W+ #C < *!, , + # H 0F *d #: H1$ + # D L@d D D H 2D a+ #t < *$, , < *', h_D ZD H H < **,
: H; + #N, 03D c+ m 03D _+ %%O@ J 03D `+ #X 02D \@@ J6 J+ #[ < *+, , 7 J+ #L < %3, + < *., < *1,
0$ 2d + #a+ #d < *4, < *7,
+ #J < %;, *r @ 0` Od '@@ 2D ]3D b+ #i+ #j6& O@ < %:, *r @ G G0$ 0d + #n+ #o F G 3 F W F H7& G+ #t F F H"& . / H F " D 3D + #y < *8, , < *;, , F 96 + #~ Y F 97F + $ < *>, < *A,
< *D, " L $ H D s s# < *G,
: s; + $, < *I, , " L $ F D $ ( ($ ( . $. $. !& F s $.$ D "& / L. F D s 2F + $p $3F L+ $p $# H t# H L
$
( # 7 "h h H + D"& . / H F D G@d D t 3 F }"W. } } F D $ L 3 F {"W. { { F D 6 $ . $ D y t"W/& . y y F D $ . 6 D S L"W/& . S S ( b$ G * $
.
.
, $
6.
$.
0"$
("l L .$ 8& $3: ; + $/: 6; + $*: $; + $& t 3 F K"W. K K F W D $ L 3.& F H"W/& . H H F U D 6 $ . $ D E t"W/& . E E F N D L 3 D C C/ 6 C ( b$ G * $
.
.
, $
6.
$.
0"$
("l L .$ 8& $P: ; N+ $M: 6; U+ $H: $; W+ $C & ($ G s( . s. $. @f s 3D + $i ( ($ G s( . s. $. H s $ ($ G $( . $. s. s( . s. $. s H s: G; + $!: s; + $@d D " L $ * ($
( . . $. sH * ($
( . . $. # sH .$ 8& $u $"( . Lh !&} F9"( . Lh !&} FN < *L, # < *O,
" L $ F K D s & ($ s( . s. $. < *Q,
: s; K+ % , : $; + $ < *S, " L $ F I D s s < *V,
: s; I+ %, < *W, " L $ F { D s s < *Z,
: s; {+ % , : ; "+ #w < *\, , < *_, , + o < *b, < %9, 0 ^. E D [. E D U < %6, ,=5 %- < *d, < *g,
< *i, , < %4, ,- < *l, < %3, -b < %3,
h e 7 z` w x yx Ex 'x x Yx Yx )p Y [h v Dx Yx Yx Yp [ Tx Yx Yx Yh f vh t L x 'x p [ T` T t T uh f T s` T q T rx x EX
( T X ( T X $+ X $+ X
$ X
! $3 X
! $W X
" $[ X $ X $ X $ X ! $3 X ! $W X " $[ X $ X $ " X # X # X ~ ( 0 X
( J ( X & X & X & X & X & X & X & X * X 0 *X } ( J X [ X n X aX k ?X G X } X ~ ( 0 X aX
$ t $ L $ $ ' $ X a $ X f X k $ t X n $ $ 9 $ G $[ X t X v $ $[ $( y (0+ X y $ ( X | X X ~ ( 0 X | X X
$ 8 "( X
$ X
$ X
" $ 8 X $ X $ X " $ 8 X X $ t $ L X $ $ $ 9 $ G $[ X * X - $ $[ X 0 X 1 $ $ [ $ " X 4 $ y X 6 $ y X 4 $> X 8 X - $ $[ X 0 X ; $ $ [ ( 8 X 4 $ y X > (+ X 4 $> X A X - $ $[ X 0 X ; $ $ [ ( 8 X D ( + X 6 $ y X 4 $> X E X - $ $[ X 0 X ; $ $ [ ( 8 X D ( + X > (+ X 4 $> X X H X K ( v $ X P X U X V ( D X W X Y X ^ X a X c $ H X e $ H X X h X m ( X q $ 8 $ t X t $ 9 $ L X { $ 9 $ L $ 9 (
X W $ 9 $ L X X X X (
$ 8 $ t $ $ 9 $ 9 $ L $ $ : X " $ 8 $ t $ 9 $ L X ' $ : ( 2 $ ; ( ( X X - X 0 X 3 ( - X 5 ( X 8 ( $ N $ " X X # X g X ~ ( 0 X k ?X
$ X a X f X * X ~ ( 0 X , X
$ $ ' $ X a $ X X 1 X 5 $ $ 9 $ $[ X ; $ $[ X X = $ $[ ( s X ? (9 X A (N X X # ` X C $ U X `
U, H *p F *p D *o p @ *n *n& *q/$ D *o5$ *y" *o.& && .& F *o *o *p *p *o,~ ], H *~ F *~ D *} p @ *|1 + + " *|&$ ( . *|/( " *|.$ $ . /d *| *|. ( *| Cp *} *~ *~,~ (12A5) (A4,12A5) MAP ZMAP 0
.TMP .TMP .TMP .TMP I y \ + < +@, ,- < +B, +_D +ZD + + < +E,
: +; ++ + , < +F, < +>, , 03$ ++ +6 02d ++ +6 < +I, +_D +ZD + + < +L,
: +; ++ +), < +<, ,- < +M, +_D +ZD + + < +P,
: +; ++ +0, < +R, < +:, ,+ +8 + 0 F 0*d +7 +,~ h + 7 +h + 7 +h + 7 +h + 7 +X
+ ( 0 `
X
+ ( 0 X
+ ( 0 `
#SD Y a 6EW 4=8) =>VT s8Y *U* u*U*G"N< \ +Z p @ +Y p B +V p D +X!$ D +X4@ ,
d +V D +X3 +X+ +j D +W +[ D +U +Y +X D +Y+ +m +[ D +W +X D +U +Y D +Y +WF +W!$ D +W +UH +U!& F +U" +U( < ,, .Y } < ,, .Y +W F +Z < ,, .F D +V# +V F +T!( 3h +U+ ,
+U
+U +\ & f +T +T +] +\ +T +] +T +[ +T( !& F +X +Y3& +X1$ + ,
!& F +X +Z +X Ap ,~ p +Y +^x +Zp +Y +^ (2A5) SEQIN SM@ \ , p @ , p @ , p @ , < , , < ,#,
< ,%, ,,~ P , , $ , $ , X , P , ^ , (2A5) SEQOUT _M@ \ ,+ p @ ,( p @ ,( p @ ,* < ,5, < ,9,
p< ,;, ,+,~ P ,* ,) $ ,( $ ,* X ,( P ,) ^ ,+!" X" ,W*" ,]4 INX + ,V@@ ,K+ ,O ,c $ + ,S
& ,d ` Z ,_
& ,f ` H H ,^H ,_DEVICE NOT AVAILABLE
? RENAME FAILED ` Z (X^ . > X.~ (3~ + ,m ~ + ,xZ . \x <x *<x .ez+ ,t!" b + " ,u b + Z` .Z . h + gg M?}
& ,z b + ,h,
?NO CORE AVAILABLE - CAN NOT PROCEED
!* - ** ,^ ,~ * x ,> < - *< - p Z@ -`|+ -P w,~ "p h a`~ + -
h$ - ``~ + -S/"+ -P ,~ @ @ @ @ @0 @x @@ @` edX91 ,> 04, -!" QB - < -, + ,SMI 1 ,> 04, - -U+ -)MI 1 ,> 04, - -V B - p d"~ l"
B -!" GB -+ ->I5R1 ,> 04, - & -X B -*\ -= p d"~ l" B -*\ -= p .& d"~ l" $ B -*\ -= p .& d"~ l"
B -*\ -=.& Sp *\ -=Xp B -@@ - -X B -(F QF - < -, + ,EV4i91 ,> 04 " -@+ -NS ,i@1 ,> 04 " -B+ -N_ ,i@1 ,> 04 " -E+ -NK>2 1 ,> 04 " -G+ -NK>40 1 ,> 04 " -J+ -N[<I71 ,> 04 " -L
& -Y @ )@ .
" 5B -O
& -_,~ .
.4 SEQIN ^ -TSEQOUT ^ -URANDOM ^ -W -
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS:
a.3@1 ,> 04O@ . + -dgR~@1 ,> 04@@ . ,> ,> @ 6 w+ -p" . 0B + -l!"A`X#p 5@ -i/#p !" X#p + -p\p + -pa.9'1 ,> 04,> ,> O@ . + -p,>
6 + _ 4` -y"` Q@ ,> < . , ,^ ,> < .",
,^ *b -v+ .,> < .#, ,^ 7@ . + -~,> < .&,
,^ + . ,> < .(,
,^ Z 5" .,> < .),
,^ , 7@ . ,
,> < .+, ,^ , ,> < .., ,^ ,> < .1,
,^ (@qd 1@ ,,
1@ #+ .0@ *+ .,> < .2, ,^ + .,^ ,^ ,^ ,~ (' Type G to Continue, X to Exit, T To trace.'/2H *,$) (A1) (1H 14A5/)(1H A5,1X,O6) PAUSESTOP .p X . p X . p . p . p X . X ~ . p x C6 1 ,> 04, .>,~ [B 1 ,> 04, .>,~ [B 1 ,> 04, .>@ ,~ C6 1 ,> 04, .>` ,~ ,> e|P w+ .@3!p p *| .@a|+ .D p h" ab~ + .@,^ ,~ gG@ 1 ,> 047cp + .P (Bdb + .K. .T "+ .L. .T "T B#p @,~ 4B .S+P ,z0
.T#p + .H ,~ > attempt to take SQRT of negative arg Kc3@ p p + .dKc3K , .d
,~ Kc3J , .d ,~ Kc3I , .d ,~ Kc3H4B .z5@ .g5" .z+D ,z0
.fU ,~ ,> ,> # $ )D /$ @,> 4d .qX $ (F) + .q5F .q5" .o"` , /+ .x# ,> < .|, /\,^ @ ,> < .}, /7,^ 5& .x+P ,z0.},^ ,^ ,^ ,~ ! ,~ x x Attempt to raise negative single precision number to non-integer power Kc#@ p p + /Kc#K , / @ ,~ Kc#J , / @ ,~ Kc#I , / @ ,~ Kc#H4B /45@ /5" / +D ,z0
/U ,~ D /3!$ @ /2 B /35" /#` + /0, /!" B ,~ + / (BdB + / 5B / /3,~ +7` /3+ /'`d +D ,z0/"+D ,z0
/"U `d @ 6 /2+ / /3`B "` + / / /5id + /)+D ,z0/"# /2,> < /6, /\,^ @ ` /3 @ ,> < /6, /7,^ + /$U", / /2+ / + / ! ,~ x Kc 1 ,> 04 p 3" /R+ /<3b /R+ />+D ,z0
/;U ,~ +D ,z0/= ,~ D /S F /T@@ /S%" j" % /Q)/;` : XD /M5f /EaF + /E.& @(|h& f /S /O /P /P /S /O D /Q@ /S /T,~ !t0 _' "S'qf!um. .#Y% !v yO^ RX C2|t(1 ,> 04 p 4@ /q @ /[,> < /|, /\,^ /Z,~ {e^b C2|p 1 ,> 04 p 5` /`4@ /q+P ,z0/|#p 3@ /t+ /s2 /y+ /e3` /y+ /e@@ /z /t /t+ /k) r. ! /z /x @ /z(|h" /u /u B /{ /v /v /w /w /{ /z,~ +D ,z0
/r /x,~ ,~ 0 _i/X3 6P'M s!hh yI^ *Vh P `@ 6P'M P'M]ox x /[Attempt to take log of negative arg I$P 1 ,> 04 #p D F b &" .$ &$ 7@ "$ (@ . &" * 0)@
(@ $ &$ .$ .& (D (F . . #p * * ,~ .$ D .& -Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-i&lP 1 ,> 04 D 02 F 02 b &"j0 D 03&" D 03S Ao-& 0/ " B 03-& 0/[p (F{5F 0$[w0F+ 0-+ 0& p h& `f~ + 0- " B 03&" t D 03-& 0/ " B 03&$ 2 $ D 02 02,~ 02 02,~ &" " B $ D + 04Y\ 06Q< X\ 06* + 6 07 6`07 S YVBG 9 06G 9 06
G J 04GK/K 04h0u 0&h0u 0$ ;F3 0Fi 03Fi 03 :Q 0/pX. 02pX- 02 RMSQ TE 0J /z /8 /`K /\
f /U K| /T /> ~Z /7 c /M b& /T b% /S b% /S z /R 0 /R / /Q / /Q . /P . /P - /O - /O RMSQ v /E ~Z|p/6N X: G Y X pX2 /3pX2 /3pX1 /2
~J / 'G /
~J /
~I /
~I /S YVBSo&B WG / . G / . F /
. E / . V / WG / P U7 RMSQ TE. /8g /) ~IzP/NR: J Y X Y RMSQ TE ~J|0.X G
.Sae .HTvF .PaZ .LaY .Kaj .FP 3?K ~.E P )G S YVBP U7
cz .3
cf .; -@}P.3ko YUlrBK Y X <: -b
Y]@ .
Y? -d
\! -v{-^ -p{-X -l{-O -~{-N .{-N .{-M . {-M -yVBSo&BTE ) |-wg ,rc -Ulrg1 UlrT3 UlrC< UlrBK Ulr0O UlrB Ulr [ Z Y Y X pX. -
pX. -pX- -pWb -
& u^
" r:^` ->l5m -)A* -':
( -E
8@#x -M lJ -$ e,( -CS YVB Df -J Da -H
_
G --cl` -=
8v: -@ Lc -N t(B -)4zp,\6 . AwB P @ VK V4 PbXl VkBI
YPb K YY Yh[|gg MA
J TUR /}F
/|N @\: T(q5v X _<F
zR (TsT ` u6
(J" ,z
&*
R W J
>
_Bb
_2 v ^,6 RW `
K^
2b
2 RYmt L (bIz,h ) D' ,^ =" f7 c ,T }K ` [C V )O ,S U T O ~n ,I HN v
,W5(3|p,=
a ,* G ,4 [ ,1 o ,5 ,9 ,; qG ,* %q ,*u3 ,)0K ,+ /83 ,(
,( 1Q ,- 1Q~ ,-
a , G , [ , o , ,# ,% qG , %q ,u3 ,0K , /83 ,
, %u , %u~ ,h04 +Z tA +m zA +j G ,
[ +c o +d , , + , ? , S ,
, qG +Z +Y +Y ' +X +X +W ] +W0K +Z +V E +V +U q +U +T1 +8 1|P+ + +@ ? +B S +
_ +
s +E qG + +w3 7P4 +P5 +P5 +P6 +0K +
+ D 0
_@? +_@?{ + G +
[ + o + qG *} j *}
*|05 *}06 *~06 *~ j * j~P* G *y [ *t o *w qG *o *o05 *o06 *p06 *p
*n *r ~P*q(R {h04 Y -% ` ) n a ? s %Q 97 & ; G 3k '" o i 3 o ! # (: g (e p 0
W -
! ! u "_
*+ 5
; A ; u - u A % %l 9K & O &Q M 3 '% j G 'S os ( 7 { @ t )
k 1
!/ ! u3 "x
*. I l0A %% 0": "# %s %o 9 T c &T ' & 4 m [ 'V t ( K ! (h u )
4
!C %< uG )~
3 *1 ] A u ^ pe ! 9a !)$" #l0U C & %P 9s T w &W ; ' t? + %E o + ts ( # !# D u' 4
7
!W !d u[ *
#a q l0i G nA D a #C & %q > &! &Z O S tS '( ? 'C ! . u ( s 0 !7 B u; 2
9
!k )S uo *
3 *4 2a f$A "2
c ]! | &/ >s &" &] c S tg % S 'F ! 'X u (
;
! )V v *
G *7 8A , }
a 9 } 1 e &C ? Z 3 w R t{ )
' >
" !g v *
[ %; - &'a $ A D s * \a # 8U H E T RA G":e "# &W %t ? [
; @ b? )X v+ *
o #f ! ( + v! ) RU "v:E !O$'A #
O D bS )[ v? #
#j K 5 o% ` 9 0
Ga Z : v 7"'! "&E #E & ! ?C
c )- bg !j vS #
#j
a I a uA o M 1 ' p ua D ^ }' d C&@a % ' %u ?W `
w )0 b{ )\ {? #!
+ #i ] f &! oM a +a 4 ?k ` W (C ' (v { <
G c )_ {S *
? %: X JA Y u 6 u!
O &u "@! ") , ' ? &' &e &G ] us 1 7 'O &{ 'f z ( k R '/ N {3 )$
)2 c# !m {g #(
S #o %a f u c K a b 9M K ' @ !^ ,' %x @ &* % &[ \ z '/ K %D ' G { ( (F 'C (y {G C
3 )5 c7 )a {{ *
? #n a m A w \ 9a P ?a "( "& #J ,; %z z? &+ + &h &o %N zs 4 %C '# 'i {' J (I 'W Q {[ )'
J cK !r | #$
S #v tA m
! ! i 9u Y cA $a "=& #L&) $P ,O %} zS &. ? ( ' ` { 5 s %B '7 'l {; K Y 'k O {o E
3 )6 c_ !p |# #$
g #w U #"A !n
B c! , ,c %~ zg &0 S &k ' c { '2 'K M {O T Y ' (| | )*
G )9 cs )d |7 *
{ #y
ti o 8 c 0 >u h Xa N 3 #6&. $p ,w 0 z{ &3 ? + '+ b {/ 9 s ' N {c ` ' (K ( ( | Z
[ N h_ !u |K #+
*8 t} # #P - 1 { &6 S , '? e {C 9 's 'n {w ( ; (M h? T |+ Z
o )> hs )g |_ #1
# *; u * uE bA p |! 9 |U t"-A "!&e #d 3 $ - & {# r g . 'S d {W '4 , 'p | ( O (P hS ) |? [
)A i " |s #/
7 #~ &a y &m ; | M d% |i { -! !$E "Q G % -3 & {7 s { &n ,? l {k = / ,s 's | n c (Q hg ) |S %?
R i "
_ *
K $ 0 &A [ % 2 7 {K &9 5 ,S n { %L C ' - 't |3 o w g h{ [
? %>
+ P i/ "
s *
c *> &U {A ' > Pa ]"FA "+&.e $~ o % 23 7 { &: # &q ,g v | %J W @ - (" g i )
S x
? )D iC "#
#4
s *A , # = } % v {! & PA s ?m mF! !a"FU H 3 ($ (T i# )
g y
S )G iW "'
#4
*D { {5 $ a @ q F 0 F5 3"Fi K ^&! #t %Y 2[ & K 2 - ' '8 D -C 'w G w 3 (V i7 l
{ {
? X ik ")
/ *
s $ za e k
A - ia . ! FI 5"F} O$ "[&5 5 + %X 2o = s _ &t -# ' ': L -W 'y [ (' (Y iK }
{
S W i )j
C #:
$ 3 zA I y v
! G"a !w iA 4 -e [ ? %Z 3 > &? s 8 -7 ; '= X -k '| o (* 3 (Z i_
#
g )J j )m
W #:
*G G ( zU A i! ;&4! % S %] 3 &
_ > -K ' O L X - t ~ G (] is
7
{ [ n ".
k *
/ *I [ 2 zi a ! |
/ &B s = -_ ' c '> ' \ . u ~ [ n_
K
` o )o
*!
C $ o 9 z} A Q 5 {e ' ha ~ A < Fe 1 S %c 3? & C
&u -s ' w O ; ] n? ~ + (, o " ns !
_
# )M o' "0
*$
W $ ! ? { n hA ! R U U 3A !$e "n g %f 3S & W &E &x 2
O O ` nS
? (. " o $
s
7 b o; )r
*'
k $ 5 O&A # ,a t r -! D i V 3! u i * { %V 8? & k
/ &{ 2s ' 'A c ng '} S (1 # o &
_
K )P oO )u
#N
$ I ,A ^ + V
a } W W b&U g } 1 8S & &H C J 3 ' 3 %I w n{ ( ? (2 + . o/ )
s
_ %= oc )x
' #N
$ ] 2! $ ? \&i k
A 7 Va w LA !g ; # %T 8g & W J 3 ' %H o S
? 9 oC )
s ! ow "7
; ** q S tlCI & ! / VA L! @ {a LU 8&!A $ 7 8{ & &K k I 3/ ' 3 %G 'P o# g
S %@ oW )
_ ! p ){
O #X
_ 3
a 3 p L5 {u ' Li >$!! "t K %h 9 M H 3C ' G e 3 o7 ( { (5 ? (` ok )
/
s ! p ";
c #X [
s -E =
A T LI "! !y& % #> M = _ %k 9# N ' &N G 3W [ e oK ( (7 S (c o )
C ,
! ! p3 "@
w #[ qG
w0J
'9 @w w1,
P]
w0K w1- P^ w0K Vh w1- Y#- 0-" P^ w0L Q@ Vi w1. P_ QA Vi w1. JG P_ :Q QA Kq ~Vj ~w1/ }P` }QB |Vj |w1/ {WL {QB zVk zw10 yQC yVk xZ' xQC wVl w +w3 7QD v v uw04 u } tw05 t U s 3w05 2 5oM 2PH 1w06 1PI 0w06 0w1 /'9 /PI .w07 .w1 - %1 - 8 7 (PJ ' b 'w07 & :Q &w1 %VT % q $ 3 $PJ #w08 #Q, "VU "w1 !PK !Q- VU w1 @h $S 8 }a w; PK Q- VV w1 \PL [Q. [VV Zw1 ZW8 YaR6: YQ. XVW Xw1 WW9 W 0* xQ/ VVW VW9 U }- PQ/ PVX O -K OW: N 0 NQ0 MW: M } LW; L K{ KW; K HN J 7x# JW< IP4 I w9 H %p H: GP5 Gw1 F
h FP5 Ew1 E D C D ,P6 +w1 +P6 *Q *w1 ) : ) 5ph (P7 (Q 'w1 ' &P7 & /7 %Q %w1 $ xP8 $Q #w1 #W$ "Q "w1 !)t4 !W% }A
Q W% Q U" W& UJ ~ Q Y{ A W&
4!+
a Q w0r
Q
w0s .) Q /E w0s W &B Q w0t W p] r 8 Q W 5Ws Q s W Q W ~ w " +E3 "W ! G
! 4!" W W ?C M w0\ w0] 4{ w0] /83 WPp Vw0^ V q UiP U u= TPq Tw0^ Sw1@ S H N
NPq Mw0_ MYU( L 09j Lw1A K&r3 KV JPr Jw0_ IV| Iw1A H
H GPr Gw0` FV} Fw1B E D 0 EPs DV} Dw1B C 0/C >
]eH :
Fa1 9V~ 9Pt 8V~ 8V 7V 7W 6 q 6w0H 5w0I 5 4 +w0I * 0# * I 9g P\ w0J =+ RM> 0ORM> x 0 (R~j@{\B: /\>X \>5 '\7N +\2g 'r'I (\)8 *\)7 \ \ )\+ ,\6 .\. ,[rO .O[mN O[m O[m O[l| [l{ &O[l+ O[k O[k O[j] O[jR O[i% r%H ([Z [X %[Qg r% 0[Ms /[M" -[M +[L ,[FG [@v *r#e OD^w'd w]!+{ 0