PDP-10 Archive: decus/20-0137/bmd/bmd01d.exe from decuslib20-05

Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0137/bmd/bmd01d.exe

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

?p000@0?hX"[?x "

<++12	`!p+"[12x(SPCVAL    FINISH    TRNGEN    PROBLM    ('1BMD01D - SIMPLE DATA DESCRIPTION - REVISED ','JULY 14, 1969'/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA//)(2A6,I5,I3,I4,I1,I3,I1,39X,2I2)(18A4)(A6,8F6.0)(26H NO DATA FOR THIS VARIABLE)(2H  I4,F13.4,2F12.4,I7,4X,3F12.4)(7H0VAR NO6X,4HMEAN8X,4HS.D.4X,12HS.E. OF MEAN2X,6HSAMPLE6X,30HMAXIMUM     MINIMUM      RANGE//)(1H 18A4)(1H 20F5.2)(24H0VARIABLE FORMAT CARD(S))(A6,I3,I2,I3,F6.0,5X,I1,7(F6.0))(13H0PROBLEM CARD)(45H0CONTROL CARDS INCORRECTLY ORDERED OR PUNCHED)(15H PROBLEM NUMBER9X,A6,5X,13HMETHOD NUMBERI18/16H NUMBER OF CASESI14,5X,24HNUMBER OF SPECIAL VALUESI7/20H NUMBER OF VARIABLESI10,5X,26HNUMBER OF TRANSGENERATIONSI5/26H NUMBER OF VARIABLES ADDEDI4,5X,17HINPUT TAPE NUMBERI14/10X,31HNUMBER OF VARIABLE FORMAT CARDSI5)(20H0SPECIAL VALUES CARD/1H 8F12.5)(46H0CARD    NEW     TRANS    ORIG.   ORIG. VAR(B)10X,17HTYPE-40 CONSTANTS/45H  NO. VARIABLE   CODE    VAR(A)   OR CONSTANT)(2H  I2,I8,2I9,F15.5)(2H  I2,I8,2I9,F15.5,5X,5F14.5/50X,2F14.5)(1H06X,24H TRANS GENERATOR CARD(S))(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.)(' PROGRAM EXPECTED PROBLM OR FINISH CARD INSTEAD READ THE FOLLOWING'/1X,2A6)(' NUMBER OF SPECIAL VALUES INCORRECTLY SPECIFIED')(' PROGRAM EXPECTED SPCVAL CARD INSTEAD READ THE FOLLOWING'/1X,A6,8F7.0)(' NUMBER OF VARIABLES INCORRECTLY SPECIFIED')(' NUMBER OF VARIABLES + NUMBER OF VARIABLES ADDED BY TRANSGENERATION CANNOT EXCEED 1000')(' NUMBER OF TRANSGENERATION CARDS INCORRECTLY SPECIFIED')(' PROGRAM EXPECTED TRNGEN CARD INSTEAD READ THE FOLLOWING'/1X,A6)(' COLUMN 26 ON TRNGEN CARD MUST CONTAIN A DIGIT IN THE RANGE 1-7 FOR TRANSGENERATION CODE 40') 0H5EJEBMD01D    + -<( $ D

y <$),( <$*, <$-,
n3DY2FY7+"h3D!%2F!&7+"l <$3, <$6,
 <$8,, $2$

y+"k$<$;,<$#,(  <$',%V7$	+$
"	 $ F!$ D!+ !+ <$B,
:!+; !$+"t,

x3D!,2F!,+$ !0d0d+"|+"~ $ D! <$C,, $	$! Dc7`	+$ 	.! D	0dt+$ $23$|+$7$|+$5d#	 "#k B!* "#P B!%+# "#i B!* "#6 B!%"| $ D!+ <$F, !+( !+( <$I,
 "X_D!#ZD! !+(.! <$M,
:!; !#+#,n3H42J4+$:!+8&#

 <$O,, <$R,"c $ F!# D!+ !+ <$U,
:!+; !#+#, <$V,, <$Y, <$\,
7d	+#, <$b,"	 $ F!" D!+ !+ <$e,
:!+; !"+#), <$f,, <$i,"c $ F!! D!+ !+ <$l,
:!+; !!+#1,Z!%1B#P+#P <$n,, <$q,,"| $ D!+ !+( 21D+#A <$t, !+( !+( <$w,
+#O !+( 3 D!/$$!5$$  <$z, !+( !+( <$},
"! $ H!  D

y !+(.

y <%,
:

y; ! +#K,:!+8&#:"	 $@h

y H) "Y Hn"H4@hc.$8&#Q6`}+#X "#g B!-+#Y "#f B!-"| $ F!) D!+ <%,"	 $ F!) D! ! <%,
:!; !)+#^,"	 $@h	.$8&#bZ!-1B#f+#f1B#g+#g <$#,%2Z!*1B#k+#k <$&,&7 	+"h"	 $!(3H	+#w:c /

y H!!lcH

y /

y!!H) 43(/ / H4 n2h/ / Hn.$8&#l:!+; !)+#[ <%,,"	 $hc HX3h"W+$

y JX(} 
)
 J) () H"W <$%,)

 @) <$$,)

) H

y+$ <%
,,+$

,4n,H!( <%
.$8&#|+"^ <%,,+"g <%, <%,
"	 $ F!& D!+ !+ <%,
:!+; !&+$,+"g <%,,+"g <%!,,+"g <%$,,+"g <%', <%*,
+"g <%+,,+"g <$#,

xXx	"Wx!+p!*

yx"YX!90n0!$|$	$!$}$|$	$!*$!X~"0n0!X!Z`

yX!=0!,(}X"X!U0n$2$2$3( #$3(X!-X!<(YX!XX!_0!$}$|$	$	$|$!$

y$!X!z(}X!RX!O(YX"X!~

X"
$!+$2$2$3( #X"

yZZ(/X!E
X!>X!B$(X()(

y$c(4(n(!(X~"%X~"+0!,(}X~"2X~"7	X~"@X~"F0nX~"M	['h6 \%1"	 $ F%0 D%.6b}0b+%8+%64%84%=4%G %.6@/+%N %.!&#7 /"f5&%N+%M %.6@/+%B %.!&#7 /"f4&%M"	 $ D%0 %0 %.  /3H}+%M:%08&%C+%N"	 $ D%0 %0 %.  /3H}+%M:%08&%I+%N %.!& F	:%.; %0+%5 %1,~(25H ERROR ON TAPE ASSIGNMENT)iC<@ \%U p @%Q p B%R4 %d5`%[ $ D%Q %Q3D%R+%_ %R1D+%` <%k, $3D%Q+%c $3D%Q+%d <%n, %Q D%R+%g <%p,, <%j,(  %U %Q Ap %R Ap,~`%R`%QX%R(21H0TRANSGENERATION CARDI3,26HMISPUNCHED OR OUT OF ORDER)(22H0THE VALUE OF VARIABLEI4,8H IN CASEI5,54H VIOLATED THE RESTRICTIONS FOR TRANSGENERATION OF TYPEI3,1H./40H THE PROGRAM CONTINUED TREATING VARIABLEI4,20H AS A MISSING VALUE.) Y~jiJty7 \& p @%z+&%CNp,> p @%| %|"$ D& <'y,)

 %| D& <'z,(q,^,~d| D%z $t3d	+&- $.	 D%|"&/	.%| %|@h	 H/.$8&&+"| $ F%y D%}( 2 F%v %}( 3 D%s %}( 2 F%{ / H%u/& %{/($ 
%{/*$
 %{/($ 
%{/*$
 %{/($5H&A %}(D# D%{!&3F	+'[ %s!&3F	+'[ %}( 2/&

$24&&L4F&I %}( 21D+'C <'{, <'~,
"d	+'`6b%{0b

+&Z+&N4&Z4&_4&g4&j4&l4&u4'4'4'4'4'4' 4'"4'%4')4',4'.4&I4&I4'14'34'54'74'<7$%u+'X5d&]@d%w+'] <'x,)

 @%w+']7$%u+'X5d&b!$ D%w+']!$%u D& <'w,)

 @ <'v,)

 @%w+']7`%u+'X <'u,* @%w+'] <'t,)} @%w+']7$%u+'X4D&\!$}%u4D&s5d'X <'r,)

 @& <'s,& @%w+'] %t D%w+']!&%z %u D%x!(%z!&%x F%u4$'X5d& <'p,)

 @& <'q,& @%w+']7$%u+'X5d'!$}%x4D'5d'X <'n,)

 @& <'o,&@ @%w+'] & D%w+'] <'m,)

 @%x <'l,)

 @%u <'k,& @ <'j,& @%w+']7@%u+'X!$%u D%w+'] %}( #%u D%w+'] %}( #%u D%w+']7$%u+'X4D&\ %}( $# D& <'h,) @%w+'] %{ /%u D%w+'] %{"/%u D%w+'] %{ /%u D%w+'] %{7@/+'X %{ %u/ F%w+'] %}( #3d%u+&`+&\ %{ /3d%u+&`+&\7`%u+'X <'g,*" @%w+'] <'f,*Q @%w+'] <'e,*N @%w+'] <'d,(q @%w+']7$%u+'X4D&\ %{ $/ D& <'c,) @%w+'] %}(7$#+'X4D&\ %}( $# D& <'a,) @%w+'] %}( 3/&$35&&I %}( 3 D%t"%t $ D%v %}(.%v 2D%u+'T!$#7 %u"d D%} %}(.%v!*#
7  "j J%w"%}2H%w+'V:%v8&'I+'^ %}( # D%w+'] <', %}( <(,
 %v!& F	 %v %w F/:%}; %y+&/ &,~p	&%up%u	&x%ux%ux%ux%up%u	&x%xx%ux%ux%xx%xx&x%ux&x%ux&x%ux%ux%ux&x%ux&x&X%~$%}X&$%s$%z$2$%vkN

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,>*lO@([+(!gR~@1,>*l@@([,>,>@6 w+(."([0B+()!"A`X#p5@(&/#p!"X#p+(.\p+(.a.9'1,>*l,>,>O@([+(.,>
6+ _4`(6"`Q@,> <(\,,^,> <(_,
,^*b(3+(A,> <(a,,^7@([+(<,> <(d,
,^+(>,> <(e,
,^Z5"(A,> <(g,
,^,7@([,

,> <(h,,^,,> <(k,,^,> <(n,
,^(@qd1@,,

1@#+(O0@*+(A,>)<(p,,^+(A,^,^,^,~(' Type G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pX(Wp X(Xp (Zp (Zp X(QX~(Wp xCR
T2")+) D)	!$3beDh& B)
 ) )	@) )@) )))
`F)7)	 )7 "` )
,~ &`V-G {G ZCv\ 7f ]V#Q_I+0`} 9~jgG@1,>*l7cp+) (Bdb+).)"+).)"TB#p@,~4B)+P(0

)#p+)  ,~>attempt to take SQRT of negative argKc3@ p p+)*Kc3K  ,)*

,~Kc3J  ,)* ,~Kc3I  ,)* ,~Kc3H4B)@5@)-5")@+D(0
),U ,~,>,># $)D/$@,>4d)7X $(F) + )75F)75")5"` ,)V+)>#  ,> <)B,*",^@,> <)C,)},^5&)>+P(0)C,^,^,^,~! ,~xxAttempt to raise negative single precision number to non-integer powerKc#@ p p+)VKc#K  ,)V @,~Kc#J  ,)V @,~Kc#I  ,)V @,~Kc#H4B)z5@)Z5")d+D(0
)YU ,~ D)y!$ @)x B)y5")a#`+ )v,)a!"B,~+ )d(BdB+ )d5B)_  )y,~ +7`)y+)m`d +D(0)h+D(0
)hU `d @6 )x+)c )y`B"`+)c/){id +)o+D(0)h#)x,> <)|,*",^ @`)y@,> <)|,)},^+)jU",)a)x+ )d+)^! ,~xKc1,>*l 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,>*l p4@*7 @*!,> <*B,*",^* ,~{e^bC2|p1,>*l p5`*&4@*7+P(0*B#p3@*:+*92 *?+*+3`*?+*+@@*@ *:*:+*1)r. !*@*> @*@(|h"*; *; B*A *<*<*=*=*A*@,~+D(0
*8**>,~,~0i/X36P'Ms!hhyI^**VhP*`@*6P'MP'M]oxx*!Attempt to*takelog*ofnegativesargG?@1,>*lp*i*j++*Sg&t@1,>*l*p*j++*SG?1,>*lp*j+*Sg&p1,>*lpB*i#`3b*h+*eD*k*j3b*k+*]%"(D?d$"@($)B6*o6`*oS	YVBG9*nG9*n
GJ*lGK/K*lU*i9**h9)*hv**K9LR*Q9%9*j7)*g7(*g7'*f7&*fJ*k5u*e5b*dE*]E*S
f*K|**~Z)}c	*b&*b%*b%*z*0*/*/*.*.*-*-*RMSQv*~Z|p)|NX:GYXpX2)ypX2)ypX1)x
~J)d'G)c
~J)c
~I)a
~I)S	YVBSo&B	WG)Z.G)M.F)P.E)S.D)V.V)V	WG)KPU7RMSQTE/8)o~IzP)KNR:JYX0)G
)ae)TvF)aZ)aY)aj)

P3?KS	YVBPU7RMSQaj~)B)
)
)	DA(rDR(qI;)I:)])])DR|p(pkoYUlrBKYX<:(

Y]@([

Y?(!

\!(3{-^(.{-X(){-O(<{-N(O{-N(A{-M(>{-M(6VBSo&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(h05&u&`

a'''s

u';'pO'q%a&L4%~'ju&'3'hu%&+&m&>'1?'o&%S(&&$+&{M&\?'y{a&]S'z

_&+a'^

s&.	qG%~%}f|	%}\WN%{/Rz%{L%zy&%zP4%yP5%yP5%x%x%w%w0K&
%v#T/}UJ}%v%ul{+|3j	%u%=%tu=009j	
%t

%sf	nP&A%d

a%Zu%R%)%bQ%c3%jG%g!%g[%Yo%k%n%p	qG%RY%RY%Q0K%U;s[%V;s[}%V]%Fq%K

a%8%a%N&1%B&E%M%=)%?G%P[%3o%4!%G%5%6+%C?%CS%H

_%I	qG%1f|	%08N4d{	_N$P4%0P5%/P5%/0K%1
%.#T/}UJ}l{+|3j	u=009j	f

=IKg%2=IKg{%2(R"[h04"W"k]#E

E#bs$l97%$1A"^	#Pq#OnA#Xl0i"+A#g"s&k$}U#Y"t&#J1:A$

u$;"|+%1:i$

,'#Z1:$w#

,;#[1:%$tA!U$F,O%$I,c#]1:M$3#,w#^t}"~1:a$ #w#-%u#bA!_3$M-#bu%#bU!zIoA"%G$O-3$&u9#	[$R2#luM#!o#23%Io}"2#2G#|Io"7$U2[$%za#Io%"@+$V2o$$zA!93"u?$Y3%
G#zU!<IoM"FS$\3%o#*,y#mz}!>S$b3?%	hA"g#2{!Bg#(3S%	hU"c&A!~#M{%!E{#)8?%	hi!Z{9!O&U"
+#{$e8S$	h}"l&i"-{a!R&}"S$# 7$i8{%m"h5#={u$

_$) K#09%"jI#Aa$

s$* _#19#%!	qG!--X?!-9vr!,f|	!+PH!+o!*l!*PI!)PI!)"[!(8N4PJ!(d{	PJ!'_N$PK!'PK!&J~!%j!%P4!$P5!$P5!#P6!#!"P6!"P7!!!!P7! P8! 4z!.!
!#T/}UJ}Pp%j!+)CEM5]4g[Zl{+|D~Y3j	ZLXCjXqd{ncu=0CFho09j	;j?nf	:=

yh

y>~

xRM>0ORM>Hx0(Rcp"[\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