Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/bmd03s.sav
There are no other files named bmd03s.sav in the archive.
h ' X< Au- =~x - PAx . N /@@ A-\ =4
>-\ :[ 'G D A : Z B A D 'G"$ . ( & . F B " !b s B $QXD > $=XD ?-\ <x4 ]4 >4 r4 ?4 ?4 C4 #Q C5D & " b : Z C #Q3: r9 C 'F5d W $ D D : Z C!$ hs4d R"$ Cs4d R D C \ Fb D C #Q FV D D D: D C3: r9 I-\ 64 V4 b4 D4 'F4 'F-\ 6.4 #Q4 r4 E4 E " b 'F 'F 'G 'F5d _ " 5b + & : Z C" EDh#Q3: r9 ` E 'FD 'F @ D F s D F r D G!$ D r : Z G r5$ k $ D H+ l $ D H $ D H-\ 7+4 'G4 'L4 H4 H4 b4 F4 A4 F4 'F G D r A4$ &4D u G5$ w G1: 9 h" @ D r-\ ): G D r!$ 'F 'F D I E 'F 'F"D I 'F D J E 'FD 'F"` 'F!$ 'F 'F D J!$ 'F D K G4$ ' $ D K $ D L L M"$ . r D N 'I D 'I 'H D 'H K 'G "F X K I 'G 'HH I 'I K K I 'L 'LH "F Z K K I 'G 'H F Y Y D Y" 'G D J E 'G 'H"D K 'HD E 'I E 'G "D L K D K+ V $ D K $ D L O M"$ . r D N r I4d -: N K 'G "F X K I 'G 'HH I 'I K K I 'L 'LH "F Z" 'K D \ K K I 'G 'H F Y Y D Z 'H K"D Y Y D [ K I 'H 'J F [ [ D \" 'G D J E 'G 'I"D K" 'H D K E 'G 'I 'IF E "D L E 'H 'J"D M" 'K D N K D L K D M M D N : Z C"`h'G3: L9 W-\ 5i4 'G4 S4 K4 P4 l-\ 5i4 X4 ]4 K4 P4 l-\ 5i4 J4 O4 K4 P4 l r D P G5$ e $ . r D P@@ Q : Z C h T D Q!$ 'G hh 'G D R R R R hH Q hHF Q"` Q3: r9 f " 4b " Gb J 'L I 'F 'L 'F 'G 'M 'G J K " qb
M
M- : Z C"$ . $ K& . F D $ K D R6b K0b 7 +4 4 4 D Z S S3: R9 D Z S N S3: R9 C3: K9 | " }b
M : Z C"$ . $ K & . F D $ K D R " b D Z S ]3: R9 C 3: K9 " b Q N " )b B s @@ 'F B3: s9 3 " 0b
S + 1+ 1(3X, 2F12.4, 35X, 1H*, 2F12.4)+ 4(3X,3F12.4,23X, 1H*, 3F12.4 ) + G(67H0THE FINAL VALUES OF THE PARAMETERS AND THE PARTIAL DERIVATIVES ARE / 5X,40HFOR PROBIT LINE (ALPHA1+BETA*(X-XBAR)) 17X,1H*,5X, 35HFOR PROBIT LINE (ALPHA+BETA*(X)) ) + q(5X, 7HALPHA1= F8.3, 10X,6HDL/DA=3X,E10.4 ,13X,1H*,5X,7HALPHA =F8.3/5X,7HBETA =F8.3, 10X,6HDL/DB= 3X,E10.4, 13X, 1H*, 5X,7HBETA =F8.3/ 5X, 1HC 5X,1H=, F8.3, 10X, 6HDL/DC= 3X, E10.4,13X,1H*, 5X,1HC,5X, 1H= F8.3 / 120H0THE ESTIMATES MU-HAT AND SIGMA-HAT OF THE MEAN AND STANDARD DEVIATION OF THE TRANSFORMED DOSE TOLERANCE ARE AS FOLLOWS. / 5X, 10H MU-HAT= 3X, F9.4 / 5X, 10HSIGMA-HAT= 3X, F9.4 ) + }(39H0THE COVARIANCE MATRICES ARE AS FOLLOWS /, 5X, 16HFOR ALPHA1, BETA A6,35X, 1H*,5X,15HFOR ALPHA, BETA A6) + ( 5X, 13HFOR MU, SIGMA A6 ) + (3X, 9F12.4) +
(12H0CHI-SQUARE=3X, F12.4, 6H, WITHI5, 20H DEGREES OF FREEDOM. )+ (50H THE MEAN AND VARIANCE OF THE TRANSFORMED DOSE ARE / 7H MEAN= F8.4, 7H VAR= F8.4) + (54H0THE INITIAL VALUES AT START OF ITERATION ARE, ALPHA= F9.3, 3X,5HBETA= F9.3, 3X, 2HC= F9.3) + !(3X,9F12.2 ) + )(/// 45H0TRANSFORMED DOSE FOR TRANSFORMATION CARD NO I3,3H OF ,I3) + 0(46H END FOR OUTPUT USING TRANSFORMATION CARD NO I3, 3H OF, I3 //) + 5(1H05X,26HEND OF OUTPUT FOR PROBLEM A6 ) + <(48H0THE DATA GIVEN IS UNWORKABLE, BETA IS NEGATIVE. ) -\ AY+ + 0BMD03S h? |-1 0 pL. pN, C. v@'M!$ ( D ( : Z (! . ( @@1: 9 'P ( @@ ( @@ @@ (! : Z (! ( . ( ( D ("!$ (" D (" (" (" D (# (" . ( . ( (#"D (# (" . ( ' (" "
' . (
'
"F ($ ( . ( D ($ ($ . ( D (%!$ . ( D (% ($ . ( "D (& (% . ( "D (& (& . ( D (' . ( " D (' (' . ( D (( (# ($ ( D (# (% ( D ($ ($ ($ ( (# (& D ($ ($ (% ( (# (& D ($ (% (% ( (# (' D 3: ( 9 'V ( F + (4 Z ( \ ( (, p , p , p , p , p , p ,!p ,!p , p , p + 'M ( (\ ( -|p s0((!$ ) D ) : Z ) . )@@ . )@@1: 9 (+ : Z ) . )@@1: 9 (0@@ ) ) D ) )4D (6 $ . ) D ) : Z ) ) . ) ) D )!$ ) D ) ) ) D ) ) . ) . ) )"D ) ) . ) ' ) "
' . )
'
"F ) ) . ) D ) ) . ) D )!$ ) . ) )D )) )) . ) "D )) ) . ) "D )) )) . ) -D )) . )" )D ) ) ) . ) -D ) ) ) ) )D ) )' )D ) ) )# )D ) ) ) ) ) ' ) ) )D ) ) )) ) ) ) ) 5D 5 ) ) )5 ) ) ) 5D 5 ) ) ) ) ) ) D ) ) ) ) 5 ) ) 5D 5 ) ) )5 ) ) ) 5D 3: )9 (75 ) 5F 5 ) 5F )5 5F + ) 4 5Z ) 5s D 5r 5s"D 5r 5s D 5r 5s"D 5r 5s D 5r 5s"D 5r 5s D 5r 5s"D 5r 5s D 5s 5r
D 5t 5t4D 5+ : Z 5v . 5s 5t D 1: 9 5b+ 5n+ 5h(1H E12.4 ) + 5n4 Z 5q \ 5q 5r, p , p ,!p ,!p ,!p + 5 5q 5q\ 5t,Ap ,Ap -|p | 5v` 6 @ 6@@ 6@@ 6 @@ 6 @@ 6 : Z 6 . 6 . 6 D 6 . 6 D 6 . 6 D 6 . 6 D 6 3: 69 5z 6 6 6 6 6 6 6 F 6 6 6 6 6"D 6+ 64 Z 6 \ 6 6, p , p ,!p ,!p ,!p + 5v 6 6\ 6,Ap ,Ap -|p } 6 "$ . 68` @ 6:` 68 @ 6:@@ 69@@ 68 : Z 6; . 67 D 683: 689 6# 68 6: D 68 : Z 6;" 68 . 67 D 693: 689 6( 69 6: D 69+ 634 Z 66 \ 66 67, p ,!p ,!p ,!p + 6 66 66\ 69,Ap ,Ap -|p pH6;@@ 7; $ . 79 D 7= 79 D 7> 79$ D 7> $ . 7: D 7? 7<4d 6C $ D 7? : Z 7?-\ ): 78XD 6J 7=. 7: $ XD 6J 7: $ XD 6L-\ 5i4 6J4 6J4 7>4 7@4 6L@@ 7@ 7@4D 7 : Z 7A . 7:@@ Z 7A : Z 7B 79.D 7A . 79 7A. 7: 7A. 7:D "` 3: 799 6R 7A. 7: D 7@ 7A. 7: 7A. 7<D 7A3: 799 6N" 7?. 7?5D 6~ 7<.D 7? " 7b 7? " 7b : Z 7B . 793: 799 6f " 7b " 7b : Z 7B . 7<3: 799 6l " 7 b : Z 7B"$ . $ 79 & . F 7B"$ . 79. 7B D 7C " 7b 7B Z 7A . 783: 7C9 6y 7B 3: 799 6r 7@ 7;4d 7 7?3: 7:9 6D " 7b 7: !$ D 7;+ 7 " 7!b " 76 D 7; 7? D 7:+ 72+ 7(16H0ITERATION COUNT I5, 20H. VALUE OF FUNCTION. ) + 7( 27H APPROXIMATION TO SOLUTION.) + 7( 3H , 7E16.6) + 7 ( 43H0CRITERION FOR CONVERGENCE IS NOT MET AFTER I5, 11H ITERATIONS ) + 7!(34H DIFFERENTIAL COEFFICIENT MATRIX. )+ 7+(78H0MATRIX OF DIFFERENTIAL COEFICIENTS IS SINGULAR, PROBLEM CANNOT BE CONTINUED. ) + 724 Z 77 \ 77 78, p , p ,!p ,!p , p ,!p ,!p ,!p , p + 6; 77 77\ 7</ ,Ap / ,Ap -|p 0 {(7C" 7d 7k4$ 7I5d 7F@@ 7m+ 7a!$ 7k D 7m" 7e D 7n+ 7K 7k D 7m!$ D 7n 7m5d 7N 7e 7n"D 7m+ 7a 7m !& F 7l-\ A54 7l @ 7l-\ @#4 7l @ 7n 7f 7n 7f 7n 7g 7n$ 7g 7n 7h 7n 7h 7n F 7o 7n 7o D 7m+ 7a4 D 7i F 7i Z 7j \ 7j 7k,!p + 7C 7i 7i 7j 7j 7m-|p 0 "_ u7 I X }n 6v,c U6 X> Tql{87o 8 D 8-\ AS4 8 8 @ 8 8 8D D 8" 8 D 8-\ A4 8 8 @ 8 8D 8 D 8 8 8$ !& F 8 8 8 8 8 8 8 8 8 8 8 8$ "D 8 84D 85d 8"` 8 8D$ D 8+ 8
@@ 8+ 8
4 Z 8 \ 8 8,!p ,!p ,!p + 7o 8 8\ 8,Ap ,Ap ,Ap -|p 6P'L yD& t{P
q9 4M:v 4mB p8 \tW@8+ 8((53H1BMD03S BIOLOGICAL ASSAY, PROBIT ANALYSIS - REVISED ,2X,'FEBRUARY 11, 1969'/42H HEALTH SCIENCES COMPUTING FACILITY, UCLA.//) $ D :k@@ :l " 9vB
:l
S :m r r T I 'F 'F s s :n :n :o :b3D :l2F :m+ 9\"$ t. r$ r5$ 9m $ . r D :o :o T F T-\ ?c4 I4 :_ :o @H-\ ?x4 s4 :_ @ s s4d 9i : Z :p"$ . ( & . F :p $ . :p D :q " 9{B
:q :r :p Z :s = Q3: :q9 8G :p :d3D :q2F :r+ 9q3: s9 8?" s5$ 9b $ 3$ :og O :o1f g O A 4$ 8W $ D :o " : b $ $D :o " 9~B : Z :p (
:w3: :o9 8Y -\ <4 :n4 :k :kX@ 8` " :xQ" xB : Z :p ]3: r9 8a :kX@ 8f " :xQ" xB : Z :p T3: r9 8g :kX@ 8l " :xQ" xB : Z :p H3: r9 8m : Z :p hH4d 9_ :p T H Ds" :` :ps s5d 9_ :p3: r9 8q-\ AS4 r 5 8} r4$ 9 :m4D 9 r5D 9 :o H5d 9 :o@@H :o@@ T I D :s t D :t+ 9 :o T H D :t :o H D :s : Z :p" :ths5$ 9
:p H D :s :p s D :t :p3: r9 9 :t D 'G 'G4$ 9_5d 9!$ :s D 'G+ 9-\ AS4 r @ 'G :e :u :f :v :g :w" :` D r+ 9 :h :u :i :v :j :w r D 'G :o H5d 9" :o@@s-\ 7]4 :_ :o @ \+ 9' :o T H Ds :o $sXD 9&-\ 7]4 9& @ \!$ 'G D :t : Z :p hs 'G :t Dhs $hsXD 9--\ 7]4 9- @h \3: r9 9) " 8b " :b
S " :b :oH T, :u4 :n5D 9O " : b " :#b : Z :p ]3: r9 9; " :%b " :#b : Z :p T3: r9 9A " :=b " :#b : Z :p H3: r9 9G :l4D 9O " :2b " :'b
S + 8( " :,b " :#b : Z :p \3: r9 9R " :/b " :#b : Z :p s3: r9 9X + :] :c3D :l2F :m7 + 9`+ 9e!$ D :l+ 90 " :7b $ 3D :k+ 9e :kX@ 9d -\ AY " 8b " :@b + 9b " 8b " :Hb
S s + 9b " 8b " :Tb + 9b " 8b " : b :u "$ t D s+ 8M+ 9{( A6, A6, I1, F5.5, I4, 4F6.0, 18X, I2,2I1,2I2) + 9~( A6, I1, 8( I2,F6.0))+ : (12A6) + : (1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.) + :(48H0CONTROL CARD ERROR. SPECTG CARD EXPECTED BUT A A6,35H CARD WAS FOUND. EXECUTION DELETED.) + :(8H PROBLEM 1X,A6, 1H. )+ : (35H CONTROL GROUP DATA. SAMPLE SIZE N= F6.0, 13H, RESPONSE R= , F6.0, 1H. 3X, 3A6) + :#(20H UNTRANSFORMED DOSE. ) + :%(3X,9F12.2 ) + :'(10H RESPONSE. ) + :,(1H05X,26HEND OF OUTPUT FOR PROBLEM A6 ) + :/(14H SAMPLE PROBIT ) + :2(19H SAMPLE PROBABILITY )+ :7(33H0DATA INCORRECT,PROBLEM DELETED. ) + :=(52H0NO NEW PROBLEMS, PROGRAM TERMINATED BY FINISH CARD. ) + :@(13H SAMPLE SIZE. ) + :H(66H0NON PROBLEM CARD ENCOUNTERED CHECK DATA DECK. EXECUTION DELETED. ) + :T(75H THE NUMBER OF SPECIAL TRANSGENERATION CARDS IS ILLEGAL. PROBLEM CARD CODE= 3X, A6, 3X, 2HT=, 3X, I3, 1H. ) + :[(54H0ILLEGAL NUMBER OF DOSES SPECIFIED. EXECUTION DELETED.) + :]4 Z :` \ :a+ 8 :` :a-|p p:_ 0 ~p:bPROBLM FINISH SPECTG OPTIMI ZE C. C HELD CONST ANT. |h;p < 4$ ;}5d ;s $ D < < / <
4D ;w $ 3D <
+ ;y <
X@ ;w "$ . < 4D ;|"$ . < 4D ;} < X@ ;{ < D <
+ < " ;b -\ AY+ <(25H ERROR ON TAPE ASSIGNMENT)+ <4 Z <
\ <
< ,!p ,!p + ;p <
<
\ <
,Ap ,Ap -|p q0<
+ <4 <* =.Z = \ = =,!p = $ "D =-\ @#4 = = F =-\ @4 =!8 =X8 *8 = =-|p @@ =
' F3: = 9 < =
4d <h : Z = . =
4 D =6 . = 7 +D ="$ . =$ =5$ <h4: 4Z =4 . =]4 <4 <a+ =4$ <h5d <4@@ =+ <c-\ @#4 = @ =+ <c =4$ <h5d <9!$ D =+ <c!$ = D =-\ @#4 = @ =-\ @#4 = = @ =+ <c =4d <h-\ A.4 = @ =+ <c-\ A4 = @ =+ <c" =4D <35d <h" = =4$ <I5d <h = D =+ <c-\ <
= + <h+ <w(43H0TRANSFORMATION CANNOT BE PERFORMED. CODE = I4, 6H DOSE= F12.4, 5H ARG= F12.4) + <~4 Z = \ = =
,p , p ,!p ,0p ,!p ,!p , p + < O@ =}+ =4 @@ =}O "$ D =} $ : INX |H=+ =0
=66@ =} J =6
=58J =8Z =6+ =0 J =8z =6+ =y
z@ + =0 #p & >
3L=9+ =,7@=9 /& 5f =%7 + =0@@ =9: =9 L =9
PL=9+ =/R d. R=9d$ 2N + =': =9: kN
y1kN
y CB` x=8x =9H=yZ =70B + =0 d
:` =}+ =0+ = x=}4 }X=~ \ >c @ >d< >k0< 0| + 1\ + >
,>p=}Z p=}+ p @ h>/@ p>/@(>I@0>S@ x>6@ >6@8>U@(>C@ P>M@ P>N@ h>/@>@ >@>/@>/h >B[ (/< 0"` S<p X< 0 p 3@ >l+ >*| >-< >ywx>Z` =~+ >B! @w+ >< >m p 7 p + >/,> ,> ,> &w p , >*,& .< 7@p + >( p , >*" >m >[.< p ` >n w,& ,& 5 >.< p d >n: ." Q ,& p ,& >` 9 >%.< 9 >@@ ,^ ,^ ,^ + >/d @ @ & 0b ." ." )B}5@ >+,~ m< !< P\ >_< >m p [ p l< 0@X + >5Z p .< / p Q \ >`+ >8@@ >`!< P\ >_7@ >b+ >; < >c \ >a@@ >b!< P\ >_X X\ >_ >o7@ >aD<7@ >bA< \ >` < >_[`x >d, x ,^x >c+ =~ =~Q< \ >_: =~ \ >`< >o p>[| >p < \ >`@@ >a+ >?@@ >` Q< \ >_< >o p>[| >p+ >?7 >r >s \ >` @ >RX Q< \ >_ >t \ >`+ >?~x>R[`x >d, x + >ZZ \ >_@@ >`@@ >`< >m \ >a+ >?7 >b >aX\ =~@@ >b@@ >a+ >AP>\ ~0>d>x ! Z @
& >tU` eB + >j@ )@ G
" + >g
& >x+ ? 6$ 1 ,> A[. @
p .4 6$ k>Y.
.4 >`. >_SEQIN}0>q @ >qSEQOUT @ >r@ >R
%5 Source level error at user's loc
` Z (X^ . > S.~ (3~ + >} ~ + ? Z . \x <x *<x .-> A^ez+ ?!" b + " ? b + Z . h + gg M?} ?
& ? b + >y,
?NO CORE AVAILABLE - CAN NOT PROCEED
x ?a.3@1 ,> A[O@ ?M+ ?gR~@1 ,> A[@@ ?M,> ,> @ 6 w+ ? " ?N0B + ? !"A`X#p 5@ ?/#p !" X#p + ? \p + ? a.9'1 ,> A[,> ,> O@ ?M+ ? ,>
6 + _ 4` ?)"` Q@ ,> < ?O, ,^ ,> < ?R,
,^ *b ?&+ ?3,> < ?S, ,^ 7@ ?M+ ?.,> < ?V,
,^ + ?0,> < ?X,
,^ Z 5" ?3,> < ?Y,
,^ , 7@ ?M,
,> < ?[, ,^ , ,> < ?^, ,^ ,> < ?a,
,^ (@qd 1@ ,,
1@ #+ ?B0@ *+ ?4,> @< ?b, ,^ + ?4,^ ,^ ,^ ,~ ('eType G tohContinue, X to Exit,T To trace.'/2H *,$) (A1) (1H@14A5/)(1HA5,1X,O6) PAUSESTOP h?M.p X `?P ?J p p?RX `?T ?K p 0 ?Lp?Wp j ?Mp?Xp [ p?ZX `?\ ?D X ~P? ?I p x x?bC6 1 ,> A[, ?n,~ [B 1 ,> A[, ?n,~ [B 1 ,> A[, ?n@ ,~ C6 1 ,> A[, ?n` ,~ ,> e|P w+ ?p3!p p *| ?pa|+ ?t p h" ab~ + ?p,^ ,~ C6Md 1 ,> A[, @ ,~ [&r 1 ,> A[, @ ,~ [&r 1 ,> A[, @ @ ,~ C6Md 1 ,> A[, @ ` ,~ ,> e|P w+ @2ap p *| @a|+ @ p h" ab~ + @,^ ,~ CR
0
@6#p + @% ,~ u @5attempt to take SQRT of negative arg Kc3@ p p + @EKc3K , @E
,~ Kc3J , @E ,~ Kc3I , @E ,~ Kc3H4B @[5@ @I5" @[+D ?
0
@HUm,~ ,> ,> # $ )D /$ @,> 4d @RX $ (F) + @R5F @R5" @Q"` , @j+ @Y# ,> < @], A5,^ @ ,> < @^, A,^ 5& @Y" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + @jKc#K , @j @ ,~ Kc#J , @j @ ,~ Kc#I , @j @ ,~ Kc#H4B A
0
@lU ,~ D A
B A
5" @t#` +` A , @t!" B ,~ + @x(BdB + @x5B @s A
+ A `d +D ?
0@|+D ?
0
@|U `d @ 6 A
+ @w A
`B "` + @w/ Aid + A+D ?
0@|# A
,> < A, A5,^ @ ` A
@ ,> < A, A,^ + @}U", @t A
+ @x+ @q|A x Kc 1 ,> A[ p 3" A,+ A3b A++ A+D ?
0
AU ,~ +D ?
0A ,~ D A, F A-@@ A-%" j" % A*)/;` : XD A&5f A aF + A .& @(|h& f A- A) A* A) A- A( D A+@ A, A-,~ !t0 _' "S'qf!um. .#Y% !v yO^ RXA-C2|t(1 ,> A[ p 4@ AE @ A4,> < AN, A5,^ A4,~ {e^b}A4C2|p 1 ,> A[ p 5` A94@ AE+P ?
0AN#p 3@ AH+ AG) r. !@ AL! n@ AL(|h" AI AI B AM AJ AJ AK AM AL AK,~ +D ?
0
AF AL,~ ,~ 0 _i/X3 6P'M 5( bB W
R `@ 8AMx A4ATTEMPT TO TAKE LOG OF NEGATIVE ARG}HARC 1 ,> A[#p ,~ S0 1 ,> A[#p +" AX,~ U ,~ KbN@ 1 ,> A[,
,~ A\Y\ A]Q< X\ A^* + !$h X$h @@h *% " Af Bh L " Bh M+ x eX2G iSH YC aS iSH ~AfINX 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 xAtiSH + <