Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/bmd04m.sav
There are no other files named bmd04m.sav in the archive.
h 'PG A]- > x -HAx . <` /+ =(55H1BMD04M - DISCRIMINANT ANALYSIS-TWO GROUPS - VERSION OF,18H JUNE 9, 1966 ,/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA) $ D O-\ ="4
I " LB
P Q Q 3E 3E R R S S T L3D P2F P7 + M M3D P2F P7 + D " b
PQ + D-\ ;4 S4 O" 0b T "$ : Z U"$ .h3D3& / T.h3D$ 5$ /1: 9 [@@ U@@ V " mb T" $ 3$ Tg O $ T1f g O A 4$ j3$ 9D T " ;b : 9$ $D T1" mb Td + n(I7)a4" Q4 3E4 V4 J4 R V5$ : Z U " B
P 3: S9
+ ? T D Q@@ X : Z X h3D` @h3R : Z U Zh3E ( . X@@0Y Z W $
$ . U@@3F $ $ U( . X. @@+O X 3D D V : Z W & $ U(
X.
J L.
(L
W(
.
X. L & $ W
L.
D0+O3: V9 $ $ U W( . X. * $
W
U(
.
X.
(+O H+O W3: Q9 U3: Q9 : Z U X 3D D V : Z W & $ U(
X.
. LD(0Y3: V9 8 U3: Q9 5 X1: 9 : Z U ( 0Y 3R 0Z 3S Dh0s3: Q9 B : Z U h0s Dh6 3: Q9 H " Ob " bb : Z U : Z W ( U. 0Y
U (3R D 1 3: Q9 O U1: 9 M : Z U " Ub ( 1 1
h0s 3: Q9 V : Z U : Z W & $ U( H L. +O +P
L (0Y
(
00Y 3R (0Z 00Z 3S (
$ . U D 3F $ $ U( . *
$
.
U (3F H+O3: Q9 ^ U3: Q9 \ " 0b : Z U " 5b : Z W $ $ U( . +O3: Q9 u U 3: Q9 s-\ :`4 3S4 Q4 Y4 8S4 8_ " rb : Z U " 5b : Z W $
$ . U3F3: Q9 U 3: Q9 : Z U@@h0 : Z W h0s &
$ . U 3F UD03: Q9
U3: Q9 " 7b " 5b : Z U 03: Q9 @@ Y : Z U : Z W h0s U 0s &
$ . U 3FD Y3: Q9 U3: Q9 " K 3R 3S D Y " ^b Y "$ / Q. 3E. 3E D Z` Z @ Z` Q @ [" K 3R 3S 3R 3S [ 3R 3S Z F [ Y D [ "
b Q Z [ : Z X h3D D V : Z W ( . X@@1 : Z U h3E D \ & $ W \( . X. L h0 W(
X.
D(1 3: Q9 8 W3: V9 4 X1: 9 2 " ib : Z X h3D D V@@ \@@ ]@@h6 h3D` @ ]@@h6 : Z U ( . X 1 D \ ( . X 1 D ]3: V9 K \ ] X D6" K ] \ ] ] X"F6 X $6XD Z-\ @ 4 Z @ ^ " [b X V X66 ^ X1: 9 E " <b " xb : Z U : Z W ( . U@@6%1: 9 f U1: 9 e 3E. 3E D ^ : Z U!$ !&
, @*"D _ : Z X h3D D V : Z W" _ ( . X1 4d | W( . X 6%5d | X D _ W D ` W( . X 1 D _ W3: V9 r X1: 9 p `( . _ & s F6%"$ . _5d " Db U _ ` +
" b U _ ` U3: ^9 m S4d ?: X " Wb X " B
P Q : Z U 3E1:
9 N3D P2F P7 + " b X " 8b
P > S+ " Hb " Gb : Z U 3E3: Q9 : Z U h3E D ` : Z W h3E D a $
$ . U ( $ a
`(
. +O F3F3: Q9 % U ` 6 F0s U3: Q9 "> S+ {+ 5(36H0 SUM OF PRODUCTS OF DEV. FROM MEANS) + 7(7F16.5) + <(36H0 DISCRIMINANT FUNCTION COEFFICIENTS) + D(69H0 FIRST GROUP SECOND GROUP FIRST GROUP SECOND GROUP) + G(1H I4,F17.5,17X,I12) + H(10I5) + L(28H VARIABLES USED IN FUNCTION) + O(A6,A2,I2,2I3,4I2,46X,I2)+ U(49H0 VARIABLE MEANS BY GROUP AND DIFFERENCE IN MEANS) + W(I5,2X,3F16.5) + [(1H0//15H SELECTION NO.I4) + ^(I7,I14,F17.5,2F20.5) + b(22H0 MAHALANOBIS DSQUARE=F16.5) + i(57H VARIABLE MEAN 1 MEAN 2 DIFFERENCE) + r(79H0 POP. NO. SAMPLE SIZE MEAN Z VARIANCE Z STD. DEV. Z) + x(47H0 INVERSE OF SUM OF PRODUCTS OF DEV. FROM MEANS) + (66H RANK VALUES VALUES ITEM NO. ITEM NO.) + (1H I4,17X,F17.5,12X,I13)+ (15H0 PROBLEM NO. A2/21H NUMBER OF VARIABLESI4) +
(A6,26I2),+ 3,2H)=F16.5) + (18A4) + (' PROBLM OR FINISH CARD EXPECTED,BUT READ ',A6) + (40H0 ERROR ON SELECTION CARD OR DECK SET-UPI4) + (' VARIABLE FORMAT IS '/(5X,18A4)) " b Q + $(1X,I3,' ORIGINAL VARIABLES IS ILLEGAL')+ D " 'b T + .(1X,I4,' IS AN ILLEGAL NUMBER OF VARIABLES AFTER TRANSFORMATIONS') + D " 2b U 3D U + 7(1X,I4,' SAMPLE SIZE FOR GROUP ',I2,' IS ILLEGAL')+ D+ ;(' CARD READ WAS ',A6) + D(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.) "$ . O4d G OX@ F -\ AA+ + 0BMD04M hJ P 0 PLPROBLM FINISH SELECT k`9E!$ D :j : Z :m . :k Z . :k Z &
$ . :i. 's D :m Z :n :m Z :n &
$ . :n :i. $'sXD 9T-\ A:4 9T @ :l-\ A:4 :m :l5 9_ &
$ :n. :n :i. 's D :m :m. :k :n F :m. :k :n F :n3: :j9 9P :n3: :j9 9O :m. :k D :n" :m :m. :k. 4d 9u : Z :n &
$ . :m :i. "'s D :o $
$ :m. :i. . :n
:i.
7s J's $
$ . :n :i. :o H s3: :j9 9g :m. :k D :n" :m :m. :k. 4d : : Z :n &
$ :m. :i. "'s D :o $
$ :m. :i. *
$
:n.
:i.
7s H s $
$ :n. :i. :o H s3: :j9 9z : Z :n" :m. :n4D : &
$ :m :n.
:i.
/s
:m.
:i. ?s"D/s :n3: :j9 : : Z :n : Z :n" :m. :n4D :!" :m. :n4D :! &
$ :m. :n :i. 's (
$ :n
:m.
:i.
7s
:n.
:i. D?s :n3: :j9 : :n3: :j9 : : Z :n" :m. :n4D :- &
$ :n :m.
:i.
/s ,
$
:m.
:m :i. ?s D/s :n3: :j9 :$ &
$ :m. :m :i. 's D :j!$ &
$ :m :m.
:i.
D/s :m3: :j9 9G :j D :m> :m :m4d :_ :m. :k D :n" :m. :n4d :M : Z :n &
$ :m. :i. 's D :o $
$ :m. :i. *
$
:n.
:i.
"7s H s $
$ :n. :i. :o H s3: :j9 :? :m. :k D :n" :m. :n4d :9 : Z :n &
$ . :m :i. 's D :o $
$ :m. :i. . :n
:i.
"
7s J's $
$ . :n :i. :o H s3: :j9 :Q+ :9+ :e4 Z :h \ :h :i, p ,!p ,!p , p , p + 9F :h :h\ :k/ ,Ap -|p |h:o ;
4$ :|5d :r $ D ;
;
/ ; 4D :v $ 3D ; + :x ; X@ :v "$ . ;
4D :{"$ . ;
4D :| ;
X@ :z ;
D ; + ; " :~b -\ AA+ ;(25H ERROR ON TAPE ASSIGNMENT)+ ;4 Z ; \ ; ;
,!p ,!p + :o ; ; \ ; ,Ap ,Ap -|p `; + ;4 ;
=
Q * = Z = \ = =,!p = $ "D =-\ @ 4 = = F =-\ ?p4 =!8 =
X8 *8 = =-|p @@ = " <Lb " <:b : Z = " <8B
= = = = = =3D =2F =7 + ;' " <Eb = "$ s D = " <Ib = = = = = " =5d <4"$ . = $ = 5$ <2"$ . = 4$ ;0@ = @ = : Z = . = D = : Z = & $ = ( . = .
=.
</j=D = 6b = 0b 7 +;;4 ;B4 ;G4 ;O4 ;R4 ;T4 ;]4 ;v4 ;y4 ;{4 ;}4 <4 <4 < @ 4 = @ =-\ @ 4 = = @ = + <%" = 5$ < -\ A4 = @ = + <%-\ @x4 = @ = + <%" = 4D ;D5d < " = = 4$ ;Y5d < =
D = + <%-\ @ 4 = @ =-\ ;
4 = @ = + <%` = @ = !$ = = F =!!$ = !& =! F =! =!4$ < 5d ;j" =!4D ;D5d < -\ @ 4 =! @ =-\ ;
4 = @ = + <% =!4$ < 5d ;o-\ @ 4 =! @ =-\ ;
4 = @ = + <%-\ @ 4 =! @ =!-\ @ 4 =! @ =!-\ ;
4 =! @ =-\ ;
4 =! = @ = + <% = 4D < !$ = D = + <% = = D = + <% = = D = + <%" = 4D ;D5d < = = , @N D = + <% = & $ = = ( . = .
=.
/j D = + <% = & $ = = ( . = .
=.
/j D = + <% = & $ = = ( . = .
=.
/j D = + <% & $ = = ( . = .
=.
/j4D < = & $ = = ( . = .
=.
/j D = + <% =4$ <#"$ s D ="$ s D = " <Pb = " <fb = + <* $ $ = =( . = . =.
= J'j = 3: = 9 ;4 =5$ </ " <hb = = 3: =9 ;1 =5$ <4+ <6 " <sb = =3: =9 ; =5$ = " <mb + <:(A6,I3,I2,I3,F6.0) + <E(46H0CARD NEW TRANS ORIG. ORIG. VAR(B)/45H NO. VARIABLE CODE VAR(A) OR CONSTANT)+ <I(30H0ERROR ON TRANSGENERATION CARDI4) + <L(2H I2,I8,2I9,F15.5) + <P(1H06X,21HTRANSGENERATION CARDS) + <f(30H0THE INSTRUCTIONS INDICATED ON 25H TRANSGENERATION CARD NO.I2,4H RE-/29H SULTED IN THE VIOLATION OF A 31H RESTRICTION FOR THIS TRANSFOR-/31H MATION. THE VIOLATION OCCURED 29H FOR THE ITEM S LISTED BELOW./) + <h(10H ITEM NO. I3) + <m(32H0ITEMS ABOVE ARE FROM GROUP NO. I2//) + <s(41H0PROGRAM CANNOT CONTINUE FOR THIS PROBLEM) + = (1H0,35X,95HILLEGAL TRANSGENERATION CODE SPECIFIED ON PRECEDING CARD. PROGRAM WILL PROCEED LEAVING VARIABLE,I3,11H UNCHANGED.) + =4 Z = \ = =, p ,!p , p ,!p ,!p ,!p + ;
= =\ =/ ,Ap -|p 0 9~>p=TRNGEN =! 4 O@ > + =%4 @@ > O "$ D >
$ : INX |H=(+ ==
=B6@ > J =C
=BEJ =DZ =C+ == J =Dz =C+ >
z@ + == #p & >
3L=E+ =87@=E /& 5f =17 + ==@@ =F: =F L =E
PL=F+ =<R d. R=Fd$ 2N + =3: =F:
,~ -|p kN
y1kN
y CB` x=Dx =EH>Z =C0B + == d
:` >
+ ==+ =,x>
4 }X> \ >p @ >p< >x0< 0| + 1\ + >,>p>
Z p>
+ p @ h><@ p><@(>V@0>_@ x>C@ >C@8>a@(>O@ P>Z@ P>Z@ h><@>!@ >!@>;@>;ih>N[ (/< 0"` S<p X< 0 p 3@ >y+ > *| >-< ?wx> Z` > + >N! @w+ > < >y p 7 p + ><,> ,> ,> &w p , >7,& .< 7@p + >4 p , >7" >z >h.< p ` >z w,& ,& 5 >&.< p d >{: ." Q ,& p ,& >` 9 >1.< 9 >'@@ ,^ ,^ ,^ + ><d @ @ & 0b ." ." )B}5@ >8,~ m< !< P\ >l< >y p [ p l< 0@X + >BZ p .< / p Q \ >m+ >D@@ >m!< P\ >l7@ >o+ >H < >o \ >m@@ >o!< P\ >lX X\ >l >{7@ >nD<7@ >nA< \ >l < >l[`x >p, x ,^x >p+ > > Q< \ >l: > \ >m< >| p>h| >| < \ >l@@ >m+ >L@@ >l Q< \ >l< >| p>h| >}+ >L7 >~ ? \ >l @ >_X Q< \ >l ? \ >m+ >L~x>_[`x >p, x + >fZ \ >l@@ >l@@ >m< >y \ >m+ >L7 >n >nX\ > @@ >n@@ >n+ >NP>h ~0>p>x ! Z @
& ?U` eB + >w@ )@ G
" + >s
& ?+ ?*6$ 1 ,> AC. @
p .4 6$ lP>e.
.4 >m. >lSEQIN}0>~ @ >}SEQOUT @ >@ >_
%5 Source level error at user's loc
` Z (X^ . > S.~ (3~ + ?
~ + ?Z . \x <x *<x .-> AFez+ ?!" b + " ? b + Z . h + gg M?} ?
& ? b + ?,
?NO CORE AVAILABLE - CAN NOT PROCEED
x ?a.3@1 ,> ACO@ ?Z+ ? gR~@1 ,> AC@@ ?Z,> ,> @ 6 w+ ?-" ?Z0B + ?(!"A`X#p 5@ ?%/#p !" X#p + ?-\p + ?-a.9'1 ,> AC,> ,> O@ ?Z+ ?-,>
6 + _ 4` ?5"` Q@ ,> < ?[, ,^ ,> < ?^,
,^ *b ?2+ ?@,> < ?`, ,^ 7@ ?Z+ ?;,> < ?c,
,^ + ?=,> < ?d,
,^ Z 5" ?@,> < ?f,
,^ , 7@ ?Z,
,> < ?g, ,^ , ,> < ?j, ,^ ,> < ?m,
,^ (@qd 1@ ,,
1@ #+ ?N0@ *+ ?@,> @< ?o, ,^ + ?@,^ ,^ ,^ ,~ ('eType G tohContinue, X to Exit,T To trace.'/2H *,$) (A1) (1H@14A5/)(1HA5,1X,O6) PAUSESTOP h?Z.p X `?\ ?V p p?X `?a ?W p ?Yp?cp ?Yp?ep p?fX `?h ?P X ~P?k ?V p x |p?oCR
7 @ @
7 "` @ ,~ &` V-G {G ZCv\ 7f ]V#Q_I+0`}}P@ 9~jgG@ 1 ,> AC7cp + @ )@ / @( X@ @(B{4 @B ? B @ "P" @ B @ @ ,~ B @ B @ ""X+ @4B @ +P ?0
@ #p + @ @ attempt to take SQRT of negative arg Kc3@ p p + @-Kc3K , @-
,~ Kc3J , @- ,~ Kc3I , @- ,~ Kc3H4B @C5@ @05" @B+D ?0
@/U ,~ ,> ,> # $ )D /$ @,> 4d @:X $ (F) + @:5F @:5" @8"` , @Q+ @A# ,> < @D, A ,^ @ ,> < @E, @x,^ 5& @A" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + @QKc#K , @Q @ ,~ Kc#J , @Q @ ,~ Kc#I , @Q @ ,~ Kc#H4B @u5@ @U5" @_+D ?0
@TU ,~ D @t!$ @ @s B @t5" @\#` + @q, @\!" B ,~ + @_(BdB + @_5B @Z @t,~ +7` @t+ @h`d +D ?0@c+D ?0
@cU `d @ 6 @s+ @^ @t`B "` + @^/ @vid + @j+D ?0@c# @s,> < @w, A ,^ @ ` @t @ ,> < @w, @x,^ + @eU", @\ @s+ @_+ @Y|@t! ,~ x Kc 1 ,> AC p 3" A+ @}3b A+ @+D ?0
@|U ,~ +D ?0@~ ,~ D A F A@@ A%" j" % A)/;` : XD A5f AaF + A.& @(|h& f A A A A A A D A@ A A,~ !t0 _' "S'qf!um. .#Y% !v yO^ RXAC2|t(1 ,> AC p 4@ A- @ A ,> < A5, A ,^ A,~ {e^b}A C2|p 1 ,> AC p 5` A!4@ A-+P ?0A6#p 3@ A0+ A/) r. !@ A4! n@ A4(|h" A0 A1 B A4 A1 A2 A2 A4 A4 A3,~ +D ?0
A. A3,~ ,~ 0 _i/X3 6P'M 5( bB W
R `@ 8A4x A ATTEMPT TO TAKE LOG OF NEGATIVE ARG}HA9C 1 ,> AC#p ,~ S0 1 ,> AC#p +" A?,~ U ,~ KbN@ 1 ,> AC,
,~ ACY\ AEQ< X\ AE* + !$h X$h @@h *% " AM Bh L " Bh M+ x eX2G iSH YC aS iSH ~AMINX 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 xA\iSH + G