Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap5_198111 - decus/20-0137/bmd/bmd03d.exe
There is 1 other file named bmd03d.exe in the archive. Click here to see a list.
?p	0@0 @	0
@0
9?x " 
 
<++K2	``CL	%h9J.2	%`(DELETE    NO   AFTER     !FINISH         $    TRNGEN    PROBLM         BEFORE    ('1BMD03D - CORRELATION WITH ITEM DELETION - REVISED ','JUNE 26, 1969'/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA//13H PROBLEM CODE21(1H.),A6/20H NUMBER OF VARIABLES14(1H.),I6/16H NUMBER OF CASES18(1H.),I6/34H NUMBER OF TRANSGENERATION CARDS..I6/26H NUMBER OF VARIABLES ADDED8(1H.),I6/34H NUMBER OF VARIABLE FORMAT CARD(S)I6//33H TRANSGENERATION (IF ANY) OCCURS A6,14H ITEM DELETION///)(2A6,I2,I5,2I2,I3,I2,33X,A2,A5,2I2)(A6,2I2,10F6.0)(18A4)(23H TRANS-GENERATION CARDS//)(A6,I3,I2,I3,F6.0)(I4,I5,I6,I5,4X,F9.4)(30H CARD NEW  TRANS OLD    CONST./23H  NO. VAR.  CODE VAR(A)//)(45H0CONTROL CARDS INCORRECTLY ORDERED OR PUNCHED)(1H047X,18HCORRELATION MATRIX/43X29H(SAMPLE SIZES IN PARENTHESES))(1H08X,12HVARIABLE NO.)(1H08X,24HVARIABLE NO. (CONTINUED))(1H026X19HTRANSGENERATOR CARDI4,42H HAS ILLEGAL CODE. PROGRAM CANNOT PROCEED.)(45X,30HMEANS AND STANDARD DEVIATIONS //5X,8HVARIABLE,6X,4HMEAN,2X,8HSTANDARD3X9HNUMBER OF/25X,9HDEVIATION,4X,5HITEMS,//)(6X,I4,4X,2F10.4,3X,I6)(' PROGRAM EXPECTED PROBLM OR FINISH CARD INSTEAD READ THE FOLLOWING'/1X,A6)(' NUMBER OF VARIABLES CANNOT EXCEED 90')(' NUMBER OF DELETE CARDS INCORRECTLY SPECIFIED')(' PROGRAM EXPECTED DELETE CARD INSTEAD READ THE FOLLOWING'/1X,A6)(' COLUMNS 7 AND 8 OF DELETE CARD',I4,' CONTAIN A NEGATIVE NUMBER')(' NUMBER OF DELETION CODES INCORRECTLY SPECIFIED')(' NUMBER OF VARIABLES AFTER TRANSGENERATION CANNOT EXCEED 90')(' NUMBER OF TRANSGENERATION CARDS INCORRECTLY SPECIFIED')(' PROGRAM EXPECTED TRNGEN CARD INSTEAD READ THE FOLLOWING'/1X,A6)(' VARIABLE FORMAT CARD(S)'/1X,18A4)(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.)0BMD03D    + -<@i * D X $ D3; <;j,@i <;k, <;n,
!3D!t2F!u7+9 3D3	2F3
7+95 <;u, <;x,
 <;y,, 3;1D+9# <;|, <;J,A <;,,+9 <<,,+9 <<, <<,
+9 <<	, <<
,
+9 <<,,+9 <<,,+9 <<,,+9 <<, <<,
+9 *2D!>+98 !3D3;+99 <;h,? $-/ W$ W4d9$ $ D!t $ D3=!v3D!r2F!r7+9B7d!v $ D3= <<, <<,
7$!
+9&4D9g $-3$!
+9&"!
 $ F*n D3k <<#, <<&,
.9$D*nZD*
:*n+9L,!3D Z2F Z+9( 3k7$!+9*5d9V $ D!t 3k * D*4$9-4D9e $3$*+9-"* $ (-$.3k6@ 3t+9d (-$.3k  3t H* <;g,<i @3=5 9d (-$.3k 
"$ J 3t.$8&9[:3k; *n+9I+9h $ D!t  W.3k D *0d-+9/" * $@h *.$8&9l"$2.3:$3:4D:5d91 <<*,, <<-,, 3: D7d"3: $ D3k <<0, 3k <<3,
!3H2W2J2W+93 <<6, <<9,
7h2W+9~ 2W1h+: <<=, <<@,
"3:0H7d:3k8&9u6 7d+:+9  $ D3= *
 <<A,, $ D*G,
:3k;F*+:, <<I,"*
:3k;*+:, *$4*/4*7$.$( D7d"7d"$@h	 H*n Hq H"$ HY@hA.$8&:" * $@h*? H3= H!w.$8&:! ! D!
:3k; 3:+:-,6b3=0b+:4+:24:54:44:5 <;b,?L6b!t0b+:9+:74:c4:O4:9"!
 $ F39 D! ! F* * F3<4f:M"3< $ &-$.! 3t3F"$+:E * *-$
.
! 
(3t3J3
+:J+:L *6@3
+:L * &3
 F9 <;`,<i @3=5 :L * 
"$ J3
.$8(:>:!;39+:;+:c3*+D3<4d:c" * $ F38 D*
+:+:a *
+:a *
 D9 <;,<i @3=5 :a *
+:b:!8&:T:*+:g+:e4:g4:h4:h <;Z,?L" * $ 3
2H"$: *.$8&:i@d!"$. * D!q"!q $ F Y D3k 3
3F"$+; 3
F*?3
F3=!&F!w.$ D4"&/ *.4 4:! 
3
3J"$+: 
3k 
(3
L 	
(3
L *n 
3
L q
3
L "$ 
(3

3
L Y:
 A.$8&:w+;  */3k.D!:3k;  Y+:o  * 3
3F"$+;	 3
F*?3
F3=!&F!w:Y;3;+:*"4u.d!w+; 
*?
!w J!uJ!w J! H!?!(3H!w+;"!u*?3= 
!w*} H9 <;Y,Ao @!? <<U, <<X,
.$8&;"7d $hA H!>"
	
qY H!
!>
"$
 
	
4!>*nH45h;*$XHY@h4;H	+;.;3l3HY!<;X,Ao>@4;!>
`!v!s99`!v!s99`!v!s99`!v!s99`9 *!9x4x9833m2X!@ [! Y3:3=p!s	9p!s	9833m2X!@ [! Y3:3=p!s*p!3;x9X8
0!0*$ W$!$!
$3:$3k$!(*0!v$!$*0!X8t`3;X~8QX~8VX~8[0!X~8b$3kX~8iX~8nX~8uX~8{0!X7e'0*$W$!$3:$3k$*0Z(3
X8:
X8G$(!u(!?$!X8%X8,X8%X8/g&=i  \<h p @<h p B<g#7 <g"` <h,~WH H<u F<t D<t p @<r p B<q p B<o2`<q+<~ <r D<q <q D<o+= <q D<q <r D<o@d<p"$.<q D<s4d= <o F<s"<s $><s.H<p.$8&= <o/<q.<p <t <t <u,~     (18A4)(1H0I3,3H  *F10.5,9(A1,F9.5),A1)(1H 6X,10(3X,1H(I5,1H)))(1H03X,10I10)(1H0,14X,90HA $ INDICATES THE COEFFICIENT IS NOT COMPUTED DUE TO A ZERO DIVISOR, A ZERO IS INSERTED.  )aJMm \> p @=g p @=f p @=e p @=w $ D=m5`> <>e,"&/=f.=g =g F=l D=m =m <>h,
:=m; =l+>,+>7D=e+>a5d>:=m:=m <>i, <>l,
 ">6 B=h ">a B=8" * $ F=l D=m@d=f"&/=f.=g =g F=k D=h:=f2D=m+>- =f!& Fq =n F=8 =m  * F=
+>: <>c,<v @=i =f =i 	 Hq =i 
 A J=
 
=i 
(Y J=8Z=h1B>6+>61B>:+>: =i Y2D X+>: ">: B=h ">` B=8:=h; =k+>'6b=m0b+>?+>=4>?4>M4>T <>o, <>r,
"=f $ F=k D=g =g <>s,
:=g; =k+>C, <>u,"=f $ F=j D=g =g <>x,
:=g; =j+>I,+>[ <>z,"=f $ F=j D=g =g <>},
:=g; =j+>P,+>[ <>~,"=f $ F=i D=g =g <?,
:=g; =i+>W,:=m; =l+># $ D=mZ=81B>`+>`1B>a+>a <?,, >,~h=m=h *X=$/X=x@	=nX=y$=m(q(=8X=|$=
X=e=n	(qX=n	(qX>
(25H ERROR ON TAPE ASSIGNMENT)iC<@ \?
 p @? p B?4 ?5`? $ D? ?3D?+? ?1D+? <? , $3D?+? $3D?+? <?", ? D?+? <?%,, <?,A ?
l??Ap??Ap,~`?`?X?Y~j?9~j- D(17H0DATAOF VARIABLEI4,30H+VIOLATES3RESTRICTIONDFOR2CODEI3,19H.THISWASFOR CASEI6)(20H0TRANSGENERATORCARDI3,44H?HASVARIABLENUMBERS0TOO?LARGE;FOR?PROGRAM.)(32HTHEDATAWILLREMAIN@UNCHANGED.) 0iJ
4@
4@4@04@34@54@77$?0+@?5d?|@d?-+@D <@X,Ao @?-+@D7$?0+@?5d@!$ D?-+@D!$?0 D?J <@W,Ao @ <@V,Ao @?-+@D7d?0+@? <@U,B~ @?-+@D <@T,B` @?-+@D7$?0+@?4D?{!$}?04$@5d@? ?* D?-+@D <@R,Ao @?J <@S,?V @?-+@D!&?) ?0 D?1!(?)!&?1 F?+4$@?5d@ <@P,Ao @?J <@Q,?V @?-+@D7$?++@?5d@'!$}?14D@&5d@? <@N,Ao @?J <@O,?V@ @?-+@D ?* D?-+@D <@M,Ao @?1 <@L,Ao @?+ ?13d?J2`?J+@? <@K,?V @ <@J,?V @?-+@D7D?0+@?!$?0 D?-+@D ?(?0 D?-+@D ?(?0 D?-+@D7$?0+@?4D?{ <@I,B @?-+@D ?/ D?-+@D <@[, <@^,
+@B <@`, ?3.?- <@c,
 <@e,,+@F ?..?) ?- F:?3; ?2+?c ?H,~p?0?(x?1x?+x?+x?1x?1x?Jx?+x?Jx?0x?Jx?0x?0x?0x?Jx?0x?Ix?IX?=$?3X?4$?/$$?1X?DkN
y1,~	`Z(X^. >X.~(3~+@n	~+@yZ. \x <x*<x .ez+@u!"	b+  "@v	b+Z`.Z. h+ggM?}
&@{	b+@i,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1,>C)O@A>+AgR~@1,>C)@@A>,>,>@6 w+A"A>0B+A
!"A`X#p5@A	/#p!"X#p+A\p+Aa.9'1,>C),>,>O@A>+A,>
6+ _4`A"`Q@,> <A?,,^,> <AB,
,^*bA+A$,> <AD,,^7@A>+A,> <AG,
,^+A!,> <AH,
,^Z5"A$,> <AJ,
,^,7@A>,
,> <AK,,^,,> <AN,,^,> <AQ,
,^(@qd1@,,
1@#+A20@*+A$,>A<AS,,^+A$,^,^,^,~('eTypeGtohContinue,Xto Exit,TTotrace.'/2H*,$)(A1)(1H@14A5/)(1HA5,1X,O6)PAUSESTOP.pXA:pXA;pA=pjA=p)XA4X~A:pxCR4BA|+P@{0
A}#p+Aq,~>attempt to take SQRT of negative argKc3@ p p+B
,~Kc3J3,BB#+D@{0
BU ,~,>,># $)D/$@,>4dBX $(F) + B5FB5"B"` ,B9+B!#  ,> <B%,C,^@,> <B&,B`,^5&B!+P@{0B&,^,^,^,~! ,~xxAttempt to raise negative single precision number to non-integer powerKc#@ p p+B9Kc#K  ,B9 @,~Kc#J  ,B9 @,~Kc#I  ,B9 @,~Kc#H4BB]5@B=5"BG+D@{0
B<U ,~ DB\!$ @B[ BB\5"BD#`+ BY,BD!"B,~+ BG(BdB+ BG5BBB  B\,~ +7`B\+BP`d +D@{0BK+D@{0
BKU `d @6 B[+BF B\`B"`+BF/B^id +BR+D@{0BK#B[,> <B_,C,^ @`B\@,> <B_,B`,^+BMU",BDB[+ BG+BA! ,~xKc1,>C) p3"B{+Be3bB{+Bg+D@{0
BdU ,~+D@{0Bf  ,~ DB| FB}@@B|%"j"%Bz)/;`:XDBv5fBnaF+Bn.&@(|h&fB| BxBy By B|BxDBz@ B| B},~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>C) p4@C @C,> <C%,C,^C,~{e^bC2|p1,>C) p5`C	4@C+P@{0C%#p3@C+C2 C"+C3`C"+C@@C# CC+C)r. !C#C! @C#(|h"C C BC$ CCC C C$C#,~+D@{0
C C!,~  ,~ 0_i/X3 6P'Ms!hhyI^ *Vh P `@ 6P'M P'M]oxxCAttempt to take log of negative argC*Y\C+Q<X\C,*+6C,6`C,S	YVBG9C,G9C+
GJC)GK/KC)x?NC;-9CC"C9CqC"lXCS	YVBRMSQTE0JC#/8C	KC
fB~K|B}Bg~ZB`c	Bvb&B}b%B|b%B|zB{0B{/Bz/Bz.By.By-Bx-BxRMSQvBn~Z|pBNX:GYXpX2B\pX2B\pX1B[
~JBG'GBF
~JBF
~IBD
~IBBS	YVBSo&B	WGB=.GB0.FB3.EB6.DB9.VB9	WGB.PU7RMSQTE/8BR~IzPB.NR:JYX
."dBRMSQTE~J|0BG
A|aeAqTvFAyaZAuaYAtajAoP3?K~AnBAmAmAlDAAUDRATI;AgI:Ae]Ah]AhDR|pASkoYUlrBKYX<:A
Y]@A>
Y?A
\!A{-^A{-XA
{-OA{-NA2{-NA${-MA!{-MAA:#OeA4S	YVBSo&BTE)|A\6.AwBP@VKV4PbXlVkBI
YPbKYYYh[|ggMA
JTUR/}F
/|N	@\:T(q5vX_<F

zR(TsT	`u6
(J"@{
&*
 R	WJ
>
_Bb
_2v	^,6RW	`
K^
2b
2RYmtL(bIz@i)	G@i[@i	qG@hZzR@iZzR @hh05?J@G
PA?4@
PU?=?g@Pi?D@SU@5@P
a@7'@Q&a@F9%?q
u?{;@N@KI@3@[G@^[@`?Y@;o@c?m@<@eQ@@@?zA?j'%@"YS@Z
_?b
s?c	qG?4<?4	?3?1?00K?H('K?0UJ?/a?/bNN?.p?.?-(M9?-l{+?,e?,?+M?+%=?*?*p!y?)u=?)|?(L|?(N?LNrp?KA?
a?u??)?Q?3?G?!?[?
;s[?;s[}?
>h5>A>[>=!$=x>o'>r;>BJA=yO>C%a>`JU=|c>sJi=w>uJ}>>I>I3>x>z3>P>(G>P[>}o>~,>a>W>We>-+?3>??
_>
s>	qG=xa=w:=rK=n	BP5=lP5=kP6=kp WP6=jP7=j.=iP7=i0K>
=h
)=hh=g=g(MJ *g[0k=fX< *+Z
=fa=e
T)=8:=
f++=C0&rO>
<|-<~
a==G=[<{o=	qG<tl<s
<q]<p<p05<t06<t06<u
<o<o]<v]|p<vG<m[<l	qG<h<h0K<h<gL<gL<iL~p<i(R9h049-9Z-%:
&C<G?<U!99*E:L<&W<I?<Xo8 !M9( %9b:"!;0<&k:?/;!a8b:<&:?C;X
a8
!u9-o99S:43E:c'<'<L?W;0&a8ioM9;SE:%):53Y:j!;H;<+:?k;Uoa7e&u9/;h,;:*z?;S'18uJ}82y:=tA:q<,O:*zS;P'E93!9p
0
E:g;j{<08?;_{98,A:[{m;'+;k <38S:e{M8n+%;|;*?;n #<68g;Z{a80:hS;u 7<98{:i9V;.
_;x K9~9:o9X
s;y=<=9#:o	qG7e,~7dl7dP]7cP?4!P]4!P^4 a4 P^4
,h3=PH3<l3<o3;PI3;`3:PI3:PJ39PJ39PK38PK383PL3
J~3	,A92X8~2W+	*oP4*nP5*nP5*mP6*m:*@p WP6*?z**P7*:~*.*P7*1<*P8*4z*.*
*"%UJ"$)O!w;|h!vh!v(MJ *g[0!uD~!t(M9!t=x!sk!s2~!rX< *!qe!@+Z!?M!?7!>
/C!>09j!;j?!
!9!
!@o!a!
| [:=
C0>~ Zye YP\ YRM>0ORM>0(RY09\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\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