Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0137/colchi/colchi.exe
There are 2 other files named colchi.exe in the archive. Click here to see a list.
?p00`?hX " 
 
<++2	`*@8(//,' WMU - COLLAPSING CHI SQUARE',//)(' ','HOW MANY ROWS?'/)(I)(' ','HOW MANY COLUMNS?'/)(' ','ENTER IDENTIFICATION.'/)(14A5)(' ','ENTER FREQUENCIES.'/)(40I)(' ',14A5)(' ','TYPE:'/3X,'1 TO TERMINATE'/3X,'2 TO ENTER',' MORE DATA'/3X,'3 TO COLLAPSE'/3X,'4 FOR GAMMA STATISTICS'/3X,'5 FOR THETA'/)+ -<hOdf"$ De <
 <	,, <
, <,
3<,, <, 
:q+,,"f $ <,"
 ($Jp.H
:p+8&
:o+f$$ Fo D
[]Jo0.$8&, <', <*,
6b00b+
`E(' ','WHAT IS THE NEW NUMBER OF ROW CATEGORIES?'/)(40I)(' ','ENTER NEW ROW CATEGORIZATION'/)(' ','WHAT IS THE NEW NUMBER OF COLUMN CATEGORIES?'/)(' ','ENTER NEW COLUMN CATEGORIZATION.'/)}@G2 \ !p @3 p @7 !p @+ p @6 p B3Od-"$ D, <+,, <., <1,
 <3,,"6 $ F2 D6 <6, `_D2ZD, , <9,
:,; 2+q,@d/ `ZD, ,7`7+y:/*dv"7 $ F1 D,@d5"/ $ 7 H.$(.,.3 
'k.J5.$8&| $$6.,.+ 5 Fk:,; 1+{:6; 2+o `@f7*d <:,, <=, <@,
 <B,,"3 $ F/ D6 <E, `_D.ZD, , <H,
:,;@.+,@d/ `ZD, ,7`7+:/*d"6"$ F4 D,@d5"/.$87"H. ($,...+@'k.H5.$8& $$,.6.+.5 Fk:,; 4+:6; /+  6 Ap 3 Ap,~X-KX,P$6X-QX,P$7X-UX,P$3X-ZX,P$7(' ',20X,'CONTINGENCY TABLE'//)(' ','VAR',I3,40I6)(/' ',I2,I4,41I6)(/' ',41I6)(//' ','CHI-SQUARE = ',F12.5,4X,'PROB =',F8.5)(' 2X2 CORRECTED CHI-SQUARE = 'F12.5,4X,'PROB =',F8.5)(' ','CONTINGENCY COEFFICIENT = ',F12.5/' PHI-SQUARE = ',F12.5/' PHI-PRIME = ',F12.5/' DEGREES OF FREEDOM = ',I4)G"N0 \
O.
.
U 
/k.J' ($O..U 'k.HX.$8&:O; S+"N $ .I '.HK.$8&*@dL"&.m"$.N$ DJ"m $ FQ DX"N $ (3HN+6 (2Hm+: 
N$
mjhK HL+> X 
.
I 
/$
 XjlK
 JL ($.X.Uh'kLLHL.$8&3:X; Q+2 <,H <,, <,"m $ FP DX <,
:X; P+K,"N $ <, <,
"
m ( JV HX ($.X.U <,
:X; V+S .I < ,
.$8&O <!,"m $ FV DX X <$,
:X; V+] <&,
 <', <*,
 $2dN+
 $2dm+
fKL L2DL DO0m2fN NFWf&}D Jll LQlK LM
QM RlQ"Ml 
R
Q
#
"
L


M
 LL <
,H <,, </,
 <1, <4,
KAp,~hLJKxnXNq$XXNs$$'k$'XNu$X$KXNw(L(KXN|(L(KXN(T(O(m$J(' ',8I7)(/' ','GAMMA = ',F12.5/' TAU-A = ',F12.5/' TAU-B = ',F12.5/' TAU-C = ',F12.5/' DYX = ',F12.5/' DXY = ',F12.5)g>l\@ \[ !p @G p @= p @M p @;Od>"& F9"&.M FF"(.= H7@hE"F $ HE DN"7 $ FD D;@fM &.N F8.$ DB"&/M.8 8 FD DL"&/=.B B ($.L.G 'k.HM.$8&r:L; D+p $$;.N.G k$M.DE:;; D+j:N; E+h@d? &/M $ FC DN"7 $ FB D;@fM"&.N F8.$ DB"8 $ HA DL"&/=.B B ($.L.G 'k.HM.$8&
:L; A+ $$;.N.G k$M.D?:;; B+:N; C+@d<"M $ FK D;"7 $ FJ DK.$ DJ"&/=.J J ($.;.G *$
K.
;.
G 
/k$
'k.J<.$8&:K; J+:;; K+@d8"= $ FI D;"F $ FH DK.$ DJ"&/M.J J ($; 
.
.
G 
K.
.
G 
7k$
/k.L8.$8&/:K; H+,:;; I+*dE D?f? F:f; F=h< HGj8 J>: 
?
:
 L:&}= ?:D DN ?:
 H[ <\, ?: FL <[, @< <$} = ?:D< DF ?:> ?: D9 ?:G ?: D@ <], <`,
 [,~p=Mx[X>P(:(N(L(F(9(@(' ','D = ',I5/' T2 = ',I5/' THETA = ',F12.5)i".H  \v !p @e p @h p @q !p @eOdi"& Ff@fj"&.q Fo"&.h Fd"d $ Ho Dq.$ Dm"&/h.m m .e 
q.
e 
/$
'.Jj.$8&:q; o+@dp"d $ Fn Dj.$ Df"&/h.f f Fm Dg@dg"o $ Fl Dq.$ Dm"&/q.m m ($g..e *$
j.
q.
e 
/k$
'k.Jg.$8&:q; l+@dh &/q $ Fk Dq/$ Dm"m $ ($g..e *$
j.
q.
e 
/k$
'k.Jh.$8&%:q; k+# g/h#.Dp:g; m+:j; n+fjdp Di <8, <;,
 v,~Xir$p$j(i 0 uj^
`!u  (4	G"N
Q\D@p@?pB@pDDA!$FdDA01"+	+O+	 @A$ DD ?F FB@h?0D0b+U+X2&G+X"B HE <,% @? ? H@4D^ <,"@@ <, AD D@ @1d+d$}D DC!$ D= D0D+e!& F=!&*2fB+u@f>0D+i G F> <,J @C <
,%@@!$d=3dC+j @ FA+!$ D> D0D+z <, F D>@d> DC B>= D>C D>3DC+ DC!$d=3$C+{ ?C@ DA+ @ DA $2dA DA A3dE+	!$ DA D A Ap,~xBxBx=xBp@Ax?xE 0yD& RGW!u  \]?X{ \ p @ p B4@b# D  D@fD D2d+*" F <h,% @  D7f+."&3F+c 1&0D+1+e 3f+36f+C 3f+67&+C  F F!& F!$D  D  Dd2D+9!$ D7d+e!$ D+e!$ D@d!&@ F  H 
 J&} F
 J H F2d+O!&FF!$d!&wff F  D F   D  H D  D  H F7f+^!&F3H+`2D+O  D+e!$ D+e!$ D+e@d   Ap,~x	`Z(X^. >X.~(3~+m	~+xZ. \x <x*<x .ez+t!"	b+  "u	b+Z`.Z. h+ggM?}
&z	b+h,
?NO CORE AVAILABLE - CAN NOT PROCEED
C6Md 1,>q,
,~[&r1,>q,
,~[&r1,>q,
@,~C6Md1,>q,
`,~,>e|Pw+
2ap p*|
a|+ ph" ab~+
,^,~gG@1,>q7cp+ (Bdb+. "+. "TB#p@,~4B+Pz0
 #p+  ,~>attempt to take SQRT of negative argKc1,>q p3"@+*3b@+,+Dz0
)U ,~+Dz0+  ,~ DA FB@@A%"j"%?)/;`:XD;5f3aF+3.&@(|h&fA => > A=D?@ A B,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>q p4@_ @I,> <j,J,^H,~{e^bC2|p1,>q p5`N4@_+Pz0j#p3@b+a2 g+S3`g+S@@h bb+Y)r. !hf @h(|h"c c Bi ddeeih,~+Dz0
` f,~  ,~ 0_i/X3 6P'Ms!hhyI^ *Vh P `@ 6P'M P'M]oxxIAttempt to take log of negative argKbN@1,>q,
,~qY\sQ<X\s*+6t6`tS	YVBG9sG9s
GJqGK/Kqo)?K@nx?Na;-9I9cqglXSS	YVBRMSQTE0Jh/8NKJ
fCK|B,~Z%c	;b&Bb%Ab%A@0@/?/?.>.>-=-=RMSQv3~Z|p$G
aeTvFaZaYajP3?K~
+e
-pR
P)yP)GS	YVBPU7
r:
r&-pR}P\6.AwBP@VKV4PbXlVkBI
YPbKYYYh[|ggMA
JTUR/}F
/|N	@\:T(q5vX_<F

zR(TsT	`u6
(J"z
&*
 R	WJ
>
_Bb
_2v	^,6RW	`
K^
2b
2RYmtL(bIzh)	h0459IC]Oq`>*-bAcUe
aeGe[!oh.1+3?6Se
_^	qG]0K)4z	]	
YPytYPytzph04E
qA	G	[LoO	X+V?US
_
s	qGDkh8DCCOBB0KD4zA
HUTvHHUTvzH
{A+G6[|ha/o+?S
_
s	qGrfq	qpgpoP4oP5nP5nmP6mP6lP7lP7k0KvP8k
jgj;>{i&/iehnh
gfgzMffMeRe1dKV=xKV=y0wh04[

a4';)O*	uc+w,/
P\3[]bAO3`	{!j
A#?pSp
_r
s	qGO;QN%NfMoM	L;RLKPHK9JPIJPIIPJIPJHPKHG/X7G;RFFmEP4EP5DP5DP6CP6CP7B.BP7A0K[P8A
@\y@m?n=?C=7<q<
;0/C;
Fa1:zM9]817L]Lt`\h04JU>K';OOctanwRtAS
GVwS[_?Su
g
{,+ /? #1!OS 74&
_
s	qGnmfmlJX	XWPHWPIVPIV/X7UP4UMUTP5TP5SP6SRP6RP7QQP7P0K
OO&/NnNM?CMTLLXvK0/CKzMJyJRI%J%Js0
aK':!;=O@%acBwtAUE3zA}Gao(!Q	hAf++.2!y?1S3&
_n
so	qGK
7f7n6	6C5PH5PI4PI4f3/X73P42P52P51P61P60P70./P7/0K_P8.{.&/-2-
,zM,M+=)a=)u``(R
_
a
s	qGP4qP5pP5pP6oP6oP7n
ng&/fnf0/CezMeMER1d0(Rup\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0