PDP-10 Archive: decus/20-0137/bmd/bmdx94.exe from decus_20tap5

Trailing-Edge - PDP-10 Archives - decus_20tap5_198111 - decus/20-0137/bmd/bmdx94.exe

There is 1 other file named bmdx94.exe in the archive. Click here to see a list.

?p	000@0
@
0`

?hX2S?x "

<++G2	`p?`x2SF2`p(YES  PSDATA    FINISH         PROBLM     MAY 1,   1969      NO   (2A6,3I6,4I3,2A2,5A3,3X,2I3)(18A4)(A6,30X,2I3,2X,A2,4A3,9X,I3)(46H1BMDX94 - MULTI-PASS TRANSGENERATION - REVISED,2A8/41H0HEALTH SCIENCES COMPUTING FACILITY, UCLA//31H0PROBLEM CODE                  A6/31H0NUMBER OF CASES               I6/31H0NUMBER OF VARIABLES READ IN   I6/31H0NUMBER OF VARIABLES ADDED     I6/31H0INPUT TAPE NUMBER             I6/31H0OUTPUT TAPE NUMBER            I6/34H0REWIND INPUT TAPE                A6/34H0REWIND OUTPUT TAPE               ,A6/)(1H1,45X,8(2H *),2X,'P A S S   ',I3,2X,8(2H *),1X//)(40H0MEANS AND STD. DEVS. USED              ,A6/40H0GEOM. AND HARMO. MEANS USED            ,A6/40H0VARIABLES ARE SELECTED                 ,A6/40H0SELECTIONS ARE PRINTED                 ,A6/40H0BLANKS ARE TREATED AS MISSING          ,A6/)(19H0REWIND OUTPUT TAPE,3X,I2,17X,A6)(14H0THE FOLLOWINGI5,25H VARIABLES ARE SELECTED  /)(10(2H (I3,2H) I3,3H,  ))(31H0INPUT FORMAT                  18A4/(31X,18A4))(31H0OUTPUT FORMAT                 18A4/(31X,18A4))(20H0INPUT IS BINARY    )(20H0OUTPUT IS BINARY   )(40H1SELECTED CASES AND VARIABLES PRINTED   )(1H0,'ALL CASES FOR SELECTED VARIABLES ARE PRINTED')(20A4)(1H0,'CASE NO. ',I7,'IS NOT SELECTED IN THIS PASS BUT PRINTED BELOW.')(16H0INPUT CASE NO. I6,18H, OUTPUT CASE NO. I6/(1X,10F12.4))(65H1 VARIABLE INDEX     COUNT OF       MEAN    STANDARD DEVIATION   ,3X,11HMAX. VALUES,4X,11HMIN. VALUES/34H  NEW        OLD     CASES USED   )(I5,6X,I5,8X,F4.0,5X,F10.4,8X,F10.4,5X,F10.4,5X,F10.4)(1H0,3X////)(74H0 VARIABLE INDEX     COUNT OF     GEOM. MEAN       HARM. MEAN             ,1X/61H  NEW        OLD     CASES USED                              /)(I5,6X,I5,7X,F5.0,5X,F10.4,7X,F10.4)(1H0,I5,27H CASES WERE WRITTEN ON TAPEI3)(16I5)(45H0PROBLEM CARD  INCORRECTLY ORDERED OR PUNCHED)(26H0THIS PROBLEM IS TOO LARGE)(1H0,5X,'THE PROGRAM EXPECTED PSDATA CARD',3X/1H0,'WHEREAS IT FOUND',A6,'PLEASE CHECK THE CONTROL CARDS')BMDX94    + -<=@d4 <7,=@d::: <7, <7,
 (9 D4@f6:8 H6 < H3 ( H6 
: J1	 H12F'd+2a * J'd 
'd1J D7

13L:2N;7+6g3L62N7+6_ F5 F+2f,Od53(, ,$(	 H, 73D(9+2m <7,6J5+2u <7,"
, $ J'b D,= ,= <7",
:,=; 'b+2q, 73D(9+2w 1 D7 13D'a+2z (9 F'a3D<+2| (9 F<3D'c+2~ (9 F'c3D5+3 (9 F53D9+3 (9 F9 $3D6+3 <7#, <7&,
33H,;2J,<+6d3D(73D@+3
 1 F4 42F1+3

 1	 F(7 (7 F: F1	 @0D1D+3+3 (9 F'f 'f3F(9+3 <7,,3F(9+3 1 H'f &2F6+3 <7., <71,
 13H'a+3 
(9 J'a3H<+3 
(9 J<3H'c+3  
(9 J'c3H51D+3"+3# 
(9 J53H9+3% 
(9 J92f:Oj+ *3*: 
:$*	 J:7,++33

60L2H4+3,+334D33 <78,"

: $ L'a D,= ,= <7;,
:,=; 'a+3/,:6 <7<, <7?,
 <7A, <7D,
1D+3: <7G, <7J,
,'c2F1+3H+<7? <6o,=) <7L, <7O,
 <7Q,"5 $ F'` D,= ,= <7T,
:,=; '`+3D, $2D5+3Q 60D+3Q <7V,", $ F? D,= ,= <7Y,
:,=; ?+3N, $2D++3[ $3D@+3[ <7Z,": $ F< D,= ,= <7],
:,=; <+3W,6$5+3_ 60D+3_ <7_,, $3d++3c $3D@+3c <7b,, 12D5+3f <7e,, @0F+3i <7h,, <.(; F1 <3&1 1 F'e(.& F4 'e$&.& F1 'e$&.& F33D'c+3w 9.3 F5"5 $ D,=.$8(3v $2D6+3{ < D; D9+3} 'b D; 5 D9 $.'e D,;.; D'd.; D<.; D3.; D8 $3D6+4/.1 D. &/,;.1 F1 ./&/(: ."1. 
@ J @.$8&4	 $.(: D. &/'d.(: F1 ./&/,= ."1. 
@ J @.$8&4 $.,= D. &/3.,= F1 ./&/7 ."1. 
@ J @.$8&4 $.7 D. 'b.7 F- &/8.7 F1 ./&/- ."1. 
@ J @.$8&4$ $.5 D. &/<.5 F1 ./&/1 ."1. 
@ J @.$8&4,"$.;.8 D5.5 D1.5 D(:.5 D,=.5 D7.5 D'e.9 D1 5.& F;"(.4 H8 * /
4&
1/* J31j+6a H4 61H+4A.5 D4/&/4 ;@h@.$8&4B 50d\+6a@d1 D(8 'a3D<+4J3D1+4M & F(8+4N 'a2D1+4k $ D(8+4N $ D(8 $2D6+4k & F1 <7k,.'e D2 &.1 F5 (.1 H6 *.
3 J1

,; ,0@ L2L

'd ,0@ L2L

< ,0@ L2M

3 ,0@ L2M

8 ,0@ L2N $@ D2N &@ F2O ( @ H2O *(@ J2P 4 $@ D2P <7,8Q <7m, 61D+4i 53d<+4k 5.'e D1 62D6+4m $ D(8 $.1 D6 $.3 D1 $2D6+4s & F,< &3F6 D,<"1 $ F(; D4!$ D6 4 $@ D2L <6{,9e 9.3 D3 &.3 F,:2f3+5"3/(.,: ,: 2 F@.$8(5 ,; $@ D2L 'd $@ D2L < $@ D2M 3 $@ D2M 8 $@ D2N 6 $@ D2N <6t,<E $ D5"$.4$1 D'c 42d3+5"&/3.5 5 4.'c. 
@ J ?.$8&5+5 <7p,"&/3.5 5 F(8 D,1 ,1 <7r,
:,1; (8+5,6D6+5" @0D+5" <7s, <7v,
6D6+5$ @1D:1"5 $ ,= H? 
 @ J<.$8&5& *2J@+51 <7x,"5 $ F1	 D,= ,= <7{,
:,=; 1	+5-,7D6+57D@+5< &3F+5<6F++5< <7|,"5 $ F1 D,= ,= <7,
:,=; 1+58,6$++5E @1D+5E <8,"5 $ F1 D,= ,= <8,
:,=; 1+5A, 52D1+5N <8, <8,
"5 $ F1 D,= ,= <8	,
:,=; 1+5J,"5 $ D,= 92D1+5T ,= $< D2L <6s,:>4 5~7D(8+51D+5o ,=.5!*J @ ,=.5  @ H0(}0 H/

,=.

1 ,= 8<0@0 P9.1P8@

,=.

(:99H0@ ,=.52J @+5f ,=

 < L 6 ,=.52J @+5i ,=

 < L (< ,=

 62l <

 < L 6

 (<3, <

 < L (<1D+5~ ,=7`<+5~ ,=.'e!(H@ ,=.,= 
,= *(< J2L <6r,>2@ ,=.'e@ @9 ,=.,=@@ ,=.1H@ ,=.7 
,=(<H@:,=8&5O:4; (;+4v"5 $ .'e7h @+6 .,= * @ J2L <6q,>

 .7 
.
'e 
(@J @ .5!*2* @+6 .(: 
.
5

(@,} 
 @
 J2L <6p,=z @ @.$8&67D(8+636b(80b+6+6464646( <8,, <8,"5 $ F1 D,= ,= ,=.5 ,=.1 
,=.
(: <8,
:,=; 1+6, <8,, (81D+63 <8,, <8,"5 $ F0 D,= ,= ,=.'e ,=.,= 
,=.
7 <8,
:,=; 0+6,,7D@+66 <8", <8%,
 & F1 5 F'b"(.H8/$$@4D6; <8', $.'e D..'e F1"$/'e.6 D-"&../1 . /'e@j 6 /'e J (< .- 
@ J @.$8&6B:40d+6J 1 F,17F8+2W"&/8.6 6@h@.$8&6M $.1 D. 5.1 F1"&/1.1 F- ./&/1 . .- 
@ J @.$8&6V 9.D3 ,< D6 <8), <8,,@d+ (9 D4+3 <8.,, <6o,=) <81,, <6o,=) <84, <87,
 <6o,=) <89, 2Q_D+ZD; ; <8<,
:;; ++6i, <6o,=) <6o,

x2Lx	2Lx	2Lx	2L @	2L	2L	2M	2M	2N	2N43:66 @	2L'd02<4135136~P@	2L	2L	2M	2M	2N	2N	2O	2O	2P	2P<1'd02395(8136p,>5x2RX1
0102$1$<$(;$,$'d$:$@(7('f('a(<('c(5(9$8$9`'dX1(@=02$1$<$(;$'d$@(7('fX1`$,=$,=X1c(01X1h('fX1nX1pX1sX1w``h,<(@X1~$4X'fQ(<X@'fQ(<h@(<X2$4$1(<X2X2$,=$,=(@( @((@((<(6X2X2 X2/$,=$,=(@( @((@X23$1$@`@``X29X2>X2A
0,;X28$,1YES  a4  \8O !p @8I !p @8J !p @8C !p @8M !p @8F !p @8@ !p @8A !p @8N !p @8D !p @8? !p @8> p @8F p @8N p @8I !p @8L p @8> p @8B p @8A p	 @8C p	 @8M p
 @8D p
 @8B <9R,>W"8F $ .8A@j' .8N J' .8J J' .8M J' .8@ J' .8F J' .8C J'.$8&8j"8N $ F8H D8E <9L,9e"8F $ 8B2H8=+8~ .8I (' H8O <9K,:>4 9" .8M!*J' .8M ' H8@6b8C0b+9+9494949!(}8@8@ H8? 
.
8J

8I

8@ L8E 
.
8JL/ 
.
8C8E8EH/ 8C1H+9" .8I7`'+9" .8A!*J' .8F

8I ,7 L8O <9J,>2' .8A' @8E .8F@' .8NJ' .8@

8I
7J'.$8&8y:8E;/8H+8w"8F $ 8C1H+98 .8F *' J8O <9I,>
.
8A 
/J' .8D 
.
8A 
/ J' .8? 
.
8N 
/ J' .8A@j' .8N J' .8C 
.
8M

/,} 
'
 J8O <9H,=z @'.$8&9% 8O 8F Ap 8I Ap 8> Ap 8A Ap 8M Ap	 8D Ap
 8B Ap
,~x8Ox	8Ox	8Ox	8O 	8I	8>8I	8L8F8E8P8>8A8M8D8B@8P8L	8>8K8P8F8J8P(20A4)e

@ \9c !p @9^ !p @9X p @9^ !p @9a p @9[ p @9` p @9W p @9W p @9X p @9a p @9Y p @9Y <:',>W6b9W0b+9v+9t49v49v4:6D9X+9~ <:,,"9[ $ F9] D9Z 9Z.9^ <:/,
:9Z; 9]+9z,6$9X+: <:0,"9[ $ F9] D9Z 9Z.9^ <:2,
:9Z; 9]+:, 9W1D+:& 9`2d9W+:"9Y $ 9`$9_..9_ 
.
9^ 
/ J .$8&:
+:& <:4,"9Y $ F9\ D9Z 9Z.9^ <:6,
:9Z; 9\+:,+:& 9`2d9W+:"9Y $ .9^ 
9`$
9_.
.
9_ 
( J'.$8&:+:& <:7,"9Y $ F9Z D9Z 9Z.9^ <:9,
:9Z;<9Z+:", 9c,~@9d9`	9X99c9a99dX9^	9aQ(h9^(h(h9Y( 0E0 \:< D:< p @:;@d:;5@:D!$#7 :;"d2D:=Od:; :< :< :;,~VARSEL    9    0    1    2    3    4    5    6    7    8    9    .    ,    -    /         (A6,72A1)(18H THE COMMA IN COL.,I3,27H MUST BE PRECEEDED BY A NO.)(25H THE FIELD ENDING IN COL.,I3,22H HAS NUMBERS REVERSED.)(17H THE DASH IN COL.,I3,27H MUST BE PRECEEDED BY A NO.)(16H THE CHARACTER ',A1,9H' IN COL.,I3,12H IS ILLEGAL.)(40H / MUST BE ASSOCIATED WITH N-M/I FIELD. )(40H / MUST BE PRECEEDED BY A NUMBER.       )(73H0THE PROGRAM DIDNOT FIND VARSEL CARD AS EXPECTED.PLEASE CHECK DECK SET UP){8{@0m96 \;& !p @:{ p @:H@d:H & F:Q :G F:T D:z F:R F:P :O D:O <<
 ;'_D:TZD:H :H <<,
::H; :T+;4,:U3D:F2F:G+<"&$ $ F:S D:H1D$+;1 :U3F:|+;xOf:Q ;(ZD:z::Q :z :H  :U3H:H+;D*d;?+;I :H :Q F:U &$:z.:U F:z :G F:O+;x :H :U2D:O+;e :G2D:O+;y :P3F:P+;T D:P::H.:{ :z F :O D:O@d:z :T3D:N+<
+;x :R2D:{+;X :z D:Q :G D:R+;Y :z D:| D:| :|3$:N+;| :G F:P":|.:N&:Q/& :N::H.:{ D'.:Q8&;^ :O D:O@d:z $ D:Q :T3D:N+<
+;x :H :U2D:P+;l :O2D:G+;~ :z D:N :P D:P D:O@d:z+;x :H :U2D:N+;p :N D:T+;K :H :U2D:{+< :O2D:G+< :P2D:P+< :{ D:R D:O :z D:|@d:z::H; :S+;< <<, <<,
+<
 <<, <<,
+<
 <<, <<,
+<
 << , :H <<#,
+<
 <<%,,+<
 <<(,,+<
 $' D:H <<+,, ;& :H Ap,~X:}0:U$:UX:~$:HX;$:HX;
$:HX;$:U$:HX;X;X;(' CASE NO.=',I5,' A VALUE OF X(7) WAS MORE THAN FOUR STANDARD DEVIATIONS OUT'/7F12.3)~ piJ
<5.
 
( J .$8&<W <6!& F <5  <4 H#3f<D+<m <=, <=,
"<1 $ F<1 D<7 <6.<7 <=
:<7; <1+<i, <B,~x	<CP<C<7	<2<6<C<1P<C<6	<3<5<C<1P<C<5	<0<4<C<1P<C<9	<.<8<C<1P<C<4	<.<3<C<1P<C<0	<.</<C<1P<C</	<.<.<C<1X~<9	$<8(kN

y1,~	`Z(X^. >X.~(3~+=	~+=Z. \x <x*<x .ez+=!"	b+  "=	b+Z`.Z. h+ggM?}
&=!	b+=,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1,>>cO@=d+=*gR~@1,>>c@@=d,>,>@6 w+=7"=d0B+=2!"A`X#p5@=//#p!"X#p+=7\p+=7a.9'1,>>c,>,>O@=d+=7,>
6+ _4`=?"`Q@,> <=e,,^,> <=h,
,^*b=<+=J,> <=j,,^7@=d+=E,> <=m,
,^+=G,> <=n,
,^Z5"=J,> <=p,
,^,7@=d,

,> <=q,,^,,> <=t,,^,> <=w,
,^(@qd1@,,

1@#+=X0@*+=J,> <=y,,^+=J,^,^,^,~(' Type G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pX=`p X=ap =cp =cp X=ZX~=`p xgG@1,>>c7cp+> (Bdb+=.>"+>.>"TB#p@,~4B>+P=!0

>#p+=|  ,~>attempt to take SQRT of negative argKc1,>>c p3">(+>3b>(+>+D=!0
>U ,~+D=!0>  ,~ D>) F>*@@>)%"j"%>')/;`:XD>#5f>aF+>.&@(|h&f>) >%>& >& >)>%D>'@ >) >*,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>>c p4@>G @>1,> <>R,>2,^>0,~{e^bC2|p1,>>c p5`>64@>G+P=!0>R#p3@>J+>I2 >O+>;3`>O+>;@@>P >J>J+>A)r. !>P>N @>P(|h">K >K B>Q >L>L>M>M>Q>P,~+D=!0
>H >N,~  ,~ 0_i/X3 6P'Ms!hhyI^ *Vh P `@ 6P'M P'M]oxx>1Attempt to take log of negative argCR@1,>>c,>,> p  p  Ep<b>_ $Ep$ E. .&+>[".!p Ap $Ep,^,^,~>dY\>eQ<X\>f*+6>f6`>fS	YVBG9>fG9>e
GJ>cGK/K>cUexhUc*4ZYYX>OlX>;S	YVBRMSQTE0J>P/8>6K>2
f>+K|>*>~Z>>(0>(/>'/>'.>&.>&->%->%RMSQv>~Z|p>

G
>ae=|TvF>aZ>aY=aj=zP3?K~=ykoYUlrBKYX<:=)

Y]@=d

Y?=*

\!=<{-^=7{-X=2{-O=E{-N=X{-N=J{-M=G{-M=?VBSo&BTE)|=&\6.AwBP@VKV4PbXlVkBI

YPbKYYYh[|ggMA
JTUR/}F
/|N	@\:T(q5vX_<F

zR(TsT	`u6
(J"=!
&*

 R	WJ

>
_Bb
_2v	^,6RW	`
K^
2b
2RYmtL(bIz=)	G=[=	qG=ZzR=ZzR =h04<C

_<s

s<p	qG<9w0J<9w0K<8f<8w04<7	<7w05<6w05<6w06<5w06<5w07<4w07<4w08<3<3<2P4<2P5<10K<B<1<0w0H<0w0I</w0I</w0J<.N<ENz<E
;x;e!;<<<

a;x'<;< O<#c<%%u<w<(tA;D&	;<+tU;C;KzA:}3;6zU;yzi;|[<
z};~o;,!;X{<<4?;4S<

_;;

s;<	qG:}~E3:|WDJ:|at-:{+w3:{	:z]3::z:VCn:U%oG:TP4:TP5:SP5:SP6:R

?y:R0K;&:QzF:Qh%-:P+z:P+E3:O
:I&Kw:H:H/jG:G$N:F3?W;)3?Wu0;)G:D[:@o:D:C	qG:<:;0K:<{:;05:<{:>{~P:=
:0:A9b::
':4;:O:c:6w::7:!3:":939|G:[:o:$:&+9q?:'S9t

_9~

s:,	qG9b9`w049`w059w0599^9^P49]P59]P59\P69\p9[P69[P79Z0K9c
9Z9Y^^iw9Y/Uq9X9X9WC9W77C9e77Cx 9dh048O

u9G9?[8h?9LS8y

_9K

s9	qG8On8Nf8N8Kw058Kw058J8J8I8IP48HP58HP58GP68Gp8F8F8E0K8O
8Eb8D8D8C8CNB8B^^iw8BZ8A/Uq8As8@	8@i8?v8?8>8>]8=e8Qex8Q(R2Sh0I2Ph0H2Ph082Oh072Oh072Nh062Nh062Mh052Mh052Lh042L)1n4D
q43#9K3]O5s 6I1l0A5A4k

nA3U5}6E5%O6pnU3i4B!6V2c&W78?3f

a128'7'7;?W7h2u+7<?k3v&G8c2q,'7A@455&[8Ji1W?a542>w2q,;7Dz?4+54&o6,?u5tA27",O3:zS4$?7|'6,tU1[@	52w,c7Gzg4,S58'8ti1`32z,w7Jz{4A?58'+66t}1p&E232|-7
2[3D_4mK8-6M+3	2o7Ts4s_5N-#6VzA2W32szu1s?3

33Q4ts8-78)G31{	1wS333K4v8-K8,[3F{1~?33+7V/4vs5J-8.o3O{e3y

j5LL52 K393W55i3C8<

s6# _39#3W'7r6r	qG1
P]1	B1	P]1P^1P^1f1I1A02+w3,>	,=	i,=^^3,<$*,;9,;PH,:

,!,2PI,1l,17(=PI(<PJ(<(;PJ(;<(:PK(:

(9PK(9XS{(8PL(8B(7A'f 'f

'e	k'e'd9'd'bP5'anA'aP5'`@@P6??u?=p<P6<<;;:P7:9/\X9	i8P78P874z6M@Ks6N54o5
49343	l3UJ2M2A:NB9!9-28=8 7	j7^^iw6RCn6/Uq5M5:4E4
.Pq-%-Pr,A,/Uq+Pr+77N6]26&Kw5;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