Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/bmd01v.sav
There are no other files named bmd01v.sav in the archive.
h '7HU C<- ?^x -7@Cx . ; /+ =('1BMD01V - ANALYSIS OF VARIANCE FOR ONE-WAY DESIGN - REVISED JUNE 24, 1969'/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA//) -\ >v4
W : Z e@@hN1:
9 ?@@ e " 0b " JB
f
g h h = i i <P j b3D f2F f7 + @ a3D f2F f7 + Y " Ob + Y(87H0PROBLM OR FINISH IS PUNCHED WRONG ON THE PROPER CARD OR EITHER CARD IS OUT OF SEQUENCE) -\ C "$ D. h"& . h$ 4$ " ^b + f(72H0ERROR ON PROBLM CARD, CHECK PROGRAM LIMITS ON NUMBER OF TREATMENT GROUP) -\ C " hb + o(58H0 WRONG PROBLEM CARD, THE NUMBER OF SPECTG CARD IS TOO BIG) -\ C " qb + x(55H00 AND 5 CAN NOT BE SPECIFIED AS INPUT BINARY TAPE UNIT)-\ C " zb + ~(33H0TOTAL NUMBER OF CASES IS TOO BIG) -\ C " b j k + (11H0THE NUMBER,I3,15H SPECTG CODE ON,I3,23H SPECTG CARD IS ILLEGAL) -\ C " b + (31H0ILLEGAL NUMBER OF SPECTG CARDS) -\ C " b e + (' THE NUMBER OF CASES IN GROUP',I5,' IS OUTSIDE THE RANGE OF BETWEEN 1 AND 9000, PROBLEM WILL BE IGNORED') -\ C "$ . =5d g $ D ;u-\ ="4 h4 X4 Y4` \ `2D i+ % $ D ;u-\ ="4 <P4 Y4 Z @ ^-\ ="4 <P4 X4 Z ^ @ ^-\ ="4 j4 X4 [ @ _-\ ="4 h4 X4 [ _ @ _-\ ="4 ;u4 \4 X _ ^4` >"$ . <P$ <P D k6b ;u0b 7 +74 :4 9 k4D p+ D $ 3$ jg O j1f g O A 4$ B $ D j " >b k5D D $ D <P+ I <P & FN `3D i+ I <PX@ H e4d K " 0b : e " Nb
g h $ . h&$ D l@@ l : Z j $ . l D m $ .D l h/ l5$ W h D l " wB
f m Z e x3: l9 Y c3D f2F f7 + g " `b + f(55H0SAMSIZ IS SPELLED WRONG OR SAMSIZ CARD OUT OF SEQUENCE)-\ C "` l j3: l9 Q" l5d \@@ = : Z e $hxXD m-\ ="4 m4 \4 \4` e x` @ m mD = e3: h9 k!$ =4$ x =4$ 4D @@ = : Z k " ]B
f n : Z e X \3: n9 | k d3D f2F f7 + " Vb -\ C : Z j"$ .hX$hX5$ 3: n9 : Z n =. D o o hX F<P o h\ F<t3: n9
n.D = k3: =9 y6b ;u0b 7 +4 4 ( " hb j <P " b + (20H0THE VARIABLE FORMAT) $ $D j " IB : Z e ;u3: j9 " &b : Z e ;u3: j9 # + '(1X,18A4) + , " vB <P " pb <P <P =4$ 4D 4 " _b : Z n " eb h<Ph<t 3: =9 0@@ o@@ p@@ p"$ . h D q y D ;u` ;u @ q-\ =v : Z e h`D p3: ;u9 : p q D r : Z j" rh` D o3: ;u9 ? $ D r `3D h+ F " yb + e" ] q o F ^-\ Aq4 ^ @ s-\ =44 r4 s-\ =44 s4 t"$ . h4d \ " b $ / s D ^-\ AF4 X4 ^ @ s $ / t D ^-\ AF4 X4 ^ @ t " b r ;u r s $ D r+ e-\ AF4 s4 t @ s $ / s D ^-\ AF4 X4 ^ @ t r D I s D C $ D r : Z e hx D ;u` ;u @ t tD q-\ =v@@ u : Z j h`D u3: ;u9 k uD p u t D u@@ s : Z j" uh` D s3: ;u9 q sD o" r u tD p" ] t s F ^-\ Aq4 ^ @ s6b r0b 7 +}4 4 4 e u FH e s FB+ " b e ;u u s e3: h9 e6b r0b 7 + 4 !4 4 ! " b : Z e 3: h9
+ (////22H TREATMENT GROUP , 12(I7, 2X) ) "
b : Z e x3: h9 " b : Z e H3: h9 " b : Z e B3: h9 " b p q D p p r qD p"` p o p D p" ]D q` q @ u q u D v p u D u o v D s u s D v " 'b p q u v ] v@ @ w ] q@ @ w " 0b o w s " 5b p w + B " Gb -\ C : Z e hN4D E $ 3D e+ E eX@ E e1:
9 A " 9b -\ C + J(18A4) + N(2A6,I4,A3,I1,43X,A3,A2,2I2) + V(///// 15H PROBLEM CODE , A6, / 20H NUMBER OF TREATMENT , 9H GROUPS , I4 ) + ](51H0ERROR ON TRANS-GENERATION CARD, SPECTG IS MISSPELT) + _(A6,I1,8(I2,F6.0)) + e(1H023HSPECIAL TRANSGENERATION/1H 3X4HCODE4X8HCONSTANT)+ h(1H 5XI2,1XF11.5) + p(34H NUMBER OF VARIABLE FORMAT CARDS , I2 / 18H DATA INPUT TAPE , I2 )+ v(23H BINARY RECORD LENGTH , I3 / 18H DATA INPUT TAPE , I2)+ w(I3) + y(A6, 1X, 13I5) + (////41H LISTING OF TREATMENT MEANS NOT REQUESTED ) + (//// 49H TREATMENT SAMPLE SIZE MEAN STANDARD 10H DEVIATION //) +
(1X,I6,8X,I6,F16.5, F17.5) + (/ 22H SAMPLE SIZE , 12(I7, 2X) )+ (/22H MEAN , 12F9.4) + (/22H STANDARD DEVIATION , 12F9.4) + '(///// 33X, 21H ANALYSIS OF VARIANCE /// 19X, 15H SUM OF SQUARES, 6X, 2HDF, 5X, 12H MEAN SQUARE , 5X, 8H F RATIO / ) + -(15H0BETWEEN GROUPS , F17.4, I10, 2F15.4 ) + .(2F11.0) + 0(2A5, 1X, 2A5) + 5(15H0WITHIN GROUPS , F17.4, I10, F15.4) + 9(// 1H , 5X, 5HTOTAL, F21.4, I10) + >(40H1COMPUTATION HALTED BY FINISH CARD. )+ G(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.) + U(123H0PROBLEM CARD IS SET UP WRONG, EITHER INPUT TAPE UNIT IS SPECIFIED WRONG OR THE NUMBER OF F-TYPE VARIABLE FORMAT IS TOO BIG) -\ C + + 0BMD01V (X z D # 0 :k|S0_YES NO PROBLM FINISH SAMSIZ SPECTG ~=@@ =. =,2d =-g O =,3& =-g O A 5$ =!!$ D =.+ ='4 D =* F =* Z =+ \ =+ =,,!p ,!p ,!p + = =* =* =+ =+ =.-|p ~@=.!$ D == : Z =< ==2d =<+ =4!$ D ==1: 9 =0+ =84 Z =: \ =; =;,!p ,!p + =. =: =;\ =<,Ap -|p ~== =O D =R =Q4d =@> =R =R& =O D =P =P$ =O =O/ F =P+ =J4 Z =M \ =N =N,!p ,!p ,!p ,!p ,!p + => =M =N\ =Q/ ,Ap ,Ap -|p {=R6b ;u0b 7 +=T4 =U4 =] <PX@ =W " ;vQ" ZB : Z =| `3: ;u9 =X =4D =]-\ >b+ =x-\ =E4 ;u4 <P4 =|4 =}4 =y@@ =} =|4d =l : Z =~ $ . =} D =~ <P.D =} <PX@ =g " =tB =~ Z =| `3: =}9 =h =~ 3: =|9 =b $ . =} D =~ <PX@ =o " =tB =~ Z =| `3: ;u9 =p + =[+ =u(20A4) + =x4 Z =z \ =z+ =R =z =z-|p s =~+ >
4 = >gQ * >l Z >l \ >m >m,!p >m $ "D >o-\ Aq4 >o >m F >p-\ AV4 >p!8 >gX8 *8 >l >m-|p : Z >r h<t D = h<P D >s : Z >s h` D >t6b >s0b 7 +>4 >4 > 4 >%4 >(4 >*4 >24 >J4 >M4 >N4 >P >t4$ >X5d >@@ >t+ >S-\ Aq4 >t @ >t+ >S >t4$ >X5d > !$ D >t+ >S!$ >t D >p-\ Aq4 >p @ >q-\ Aq4 >t >q @ >t+ >S >t4d >X-\ B|4 >t @ >t+ >S-\ B^4 >t @ >t+ >S" >t4D >5d >X" >f >t4$ >/5d >X >f D >t+ >S-\ Aq4 >t @ >p-\ =4 >p @ >t+ >S!$ = >t F >t!$ =!& >t F >u >t4$ >X5d >>" >u4D >5d >X-\ Aq4 >u @ >p-\ =4 >p @ >t+ >S >u4$ >X5d >C-\ Aq4 >t @ >p-\ =4 >p @ >t+ >S-\ Aq4 >u @ >p-\ =4 >p @ >q-\ Aq4 >t @ >q-\ =4 >q >q @ >t+ >S >t4D >X!$ D >t+ >S =D >t+ >S = D >t+ >S >t4D > >t =, B D >t >s >t F` >s3: ;u9 > >r3: =9 >
+ >b " >[b >r >t -\ C + >b(23H0TRANS-GENERATION ERROR//10H PASS NO.=I3,9H X VALUE=F10.5) + >d4 Z >n \ >n+ = >n >n-|p 0 9~j >u 4 O@ ?]+ >x4 @@ ?]O "$ D ?] $ : INX |H>{+ ?
?6@ ?] J ?
?J ?Z ?+ ? J ?z ?+ ?Y
z@ + ? #p & >
3L?+ ?
7@? /& 5f ?7 + ?@@ ?: ? L ?
PL?+ ?R d. R?d$ 2N + ?: ?: kN
y1kN
y CB` x?x ?H?YZ ?0B + ? d
:` ?]+ ?+ ? x?]4 }X?^ \ @C @ @D< @K0< 0| + 1\ + ?l,>p?]Z p?]+ p @ h@@ p@@(@)@0@3@ x@@ @@8@5@(@#@ P@-@ P@.@ h@@?t@ ?t@@@@ @"[ (/< 0"` S<p X< 0 p 3@ @L+ ?s*| ?o-< @Ywx?qZ` ?^+ @"! @w+ ?p< @M p 7 p + @,> ,> ,> &w p , @
,& .< 7@p + @ p , @
" @M @;.< p ` @N w,& ,& 5 ?z.< p d @N: ." Q ,& p ,& >` 9 @.< 9 ?z@@ ,^ ,^ ,^ + @d @ @ & 0b ." ." )B}5@ @ ,~ m< !< P\ @?< @M p [ p l< 0@X + @Z p .< / p Q \ @@+ @@@ @@!< P\ @?7@ @B+ @ < @C \ @A@@ @B!< P\ @?X X\ @? @O7@ @AD<7@ @BA< \ @@ < @?[`x @D, x ,^x @C+ ?^ ?^Q< \ @?: ?^ \ @@< @O p@;| @P < \ @@@@ @A+ @ @@ @@ Q< \ @?< @O p@;| @P+ @ 7 @R @S \ @@ @ @2X Q< \ @? @T \ @@+ @ ~x@2[`x @D, x + @:Z \ @?@@ @@@@ @@< @M \ @A+ @ 7 @B @AX\ ?^@@ @B@@ @A+ @!P@< ~0@D>x ! Z @
& @TU` eB + @J@ )@ G
" + @G
& @X+ @}6$ 1 ,> C". @
p .4 6$ @9.
.4 @@. @?SEQIN}0@Q @ @QSEQOUT @ @R@ @2
%5 Source level error at user's loc
` Z (X^ . > S.~ (3~ + @] ~ + @iZ . \x <x *<x .-> C%ez+ @d!" b + " @f b + Z . h + gg M?} @h
& @k b + @Y,
?NO CORE AVAILABLE - CAN NOT PROCEED
x @oa.3@1 ,> C"O@ A-+ @tgR~@1 ,> C"@@ A-,> ,> @ 6 w+ A " A.0B + @|!"A`X#p 5@ @y/#p !" X#p + A \p + A a.9'1 ,> C",> ,> O@ A-+ A ,>
6 + _ 4` A "` Q@ ,> < A/, ,^ ,> < A2,
,^ *b A+ A,> < A3, ,^ 7@ A-+ A,> < A6,
,^ + A,> < A8,
,^ Z 5" A,> < A9,
,^ , 7@ A-,
,> < A;, ,^ , ,> < A>, ,^ ,> < AA,
,^ (@qd 1@ ,,
1@ #+ A"0@ *+ A,> A< AB, ,^ + A,^ ,^ ,^ ,~ ('eType G tohContinue, X to Exit,T To trace.'/2H *,$) (A1) (1H@14A5/)(1HA5,1X,O6) PAUSESTOP hA-.p X `A0 A* p pA2X `A4 A+ p 0 A,pA7p j A-pA8p " pA:X `A< A$ X ~PA? A) p x zHABC6 1 ,> C", AN,~ [B 1 ,> C", AN,~ [B 1 ,> C", AN@ ,~ C6 1 ,> C", AN` ,~ ,> e|P w+ AP3!p p *| APa|+ AT p h" ab~ + AP,^ ,~ CR
B#p + As ,~ u Battempt to take SQRT of negative arg Kc3@ p p + BKc3K , B
,~ Kc3J , B ,~ Kc3I , B ,~ Kc3H4B B)5@ B5" B(+D @j0
BU ,~ ,> ,> # $ )D /$ @,> 4d B X $ (F) + B 5F B 5" B "` , B7+ B'# ,> < B*, C,^ @ ,> < B+, B^,^ 5& B'" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + B7Kc#K , B7 @ ,~ Kc#J , B7 @ ,~ Kc#I , B7 @ ,~ Kc#H4B B[5@ B;5" BE+D @j0
B:U ,~ D BZ!$ @ BY B BZ5" BB#` + BW, BB!" B ,~ + BE(BdB + BE5B B@ BZ,~ +7` BZ+ BN`d +D @j0BI+D @j0
BIU `d @ 6 BY+ BD BZ`B "` + BD/ B\id + BP+D @j0BI# BY,> < B], C,^ @ ` BZ @ ,> < B], B^,^ + BKU", BB BY+ BE+ B?|BZ! ,~ x Kc 1 ,> C" p 3" By+ Bc3b By+ Be+D @j0
BbU ,~ +D @j0Bd ,~ D Bz F B{@@ Bz%" j" % Bx)/;` : XD Bt5f BlaF + Bl.& @(|h& f Bz Bv Bw Bw Bz Bv D Bx@ Bz B{,~ !t0 _' "S'qf!um. .#Y% !v yO^ RXB{C2|t(1 ,> C" p 4@ C @ C,> < C, C,^ C,~ {e^b}CC2|p 1 ,> C" p 5` C4@ C+P @j0C #p 3@ C+ C) r. !@ C! n@ C(|h" C C B C C C C C C C,~ +D @j0
C C,~ ,~ 0 _i/X3 6P'M 5( bB W
R `@ 8Cx CATTEMPT TO TAKE LOG OF NEGATIVE ARG~0C KbN@ 1 ,> C",
,~ C#Y\ C$Q< X\ C%* + !$h X$h @@h *% " C- Bh L " Bh M+ x eX2G iSH YC aS iSH ~C-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 xC;iSH + U