Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/bmd01s.sav
There are no other files named bmd01s.sav in the archive.
h'85x-0Ax. T/ $ D9-\=M4
+@(52H1BMD01S - LIFE TABLE AND SURVIVAL RATE - VERSION OF 18HMAY 20, 1966      ,/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA//)     $ D9 $
 D: $ D: $ D; $ D; $ D< $ D< $ D= $ D= $ D> $ D> $ D? "lB
 3D2F7+W3D2F7+> "sb
 +>-\=C449@@:"$.$4$e "]b +d('0NO. OF SUBPROBLEM CARDS SPECIFIED WAS' ,I3,'.  ILLEGAL.'  )   +> : Z Z8 "2b  "Hb8  "AB
9 8F 3D2F7+x "xb
 +> $ D	"$.$5$}".95$+ "b +> "b9 +>+('0MAXIMUM NO. OF PERIODS AFTER DIAGNOSIS IS',I3,', WHICH IS GREATER THAN 31.') +( '0MAXIMUM NO. OF PERIODS FOR THE LIFE TABLE COMPUTATIONS WAS',I3/   ' WHICH IS NOT LESS THAN THE MAXIMUM NO. OF PERIODS AFTER DIAGNOSIS,',I3)  @@ 3D+9 "b  $3$gO 1fgOA4$% "b  $ D : Z : Z : Z $`$ &$..@@1:9( 1:9' 1:9&-\9"$.$4$M "5b +>+9('0NO. OF VARIABLES,',I3,', INCORRECT')  "}b  4d=  D+> $ D : Z"$. / F : Z "FB : Z $`$ &$..1:9D  3:9B 3:9? 4do "Mb	 :	 "Qb  "[b  4dV  D+W $ D : Z"$. / F "db @@ $ D : Z : Z &`$ ($.. @ @h	1:9` "ib : Z 	1:9h :: 3:9^ 3:9W 5dr $ D 9 Do+y : Z"$. 9/ F  Dho3:99s 9 D : Z ho D : Z : Z $$.@@>1:9} 3:9{ 5d $ D+  D : Z"$. / F : Z : Z &`$ ($..  &$ 
.
D(>1:9
 3:9	 3:9-\7-\;. 4d-\p 3:9y 3:9e 4d= "ob @@`9 @ : Z!$ Dh>3:9@@L"$ D-\4L444?4F4444!$ D : Z` @L : Z &$."H Dh>3:9+"$ D-\4L444?4F4444 3:99)"$ D"& F-\4L444?4F4444+L"$.94DA 9X@@-\A/+F(A6,3I2,A1,I2,I4,I2,I4,A1,A2,4X,I2,36X,I2)   +H(5F4.0)   +M(12H PROBLEM NO.6X,A2/16H SUB-PROBLEM NO.I4) +Q(1H028X,5HTABLEI2,16H  SURVIVAL  DATA)  +[(85H0PERIODS AFTER    ALIVE AT BEGIN-   DIED DURING   LOST TO FOLLOW-UP   WITHDRAWN ALIVE)+d(85H   DIAGNOSIS     NING OF INTERVAL    INTERVAL      DURING INTERVAL    DURING INTERVAL)+i(6H0GROUPI3,20H  PATIENTS DIAGNOSED)    +l(I6,2H -I2,I16,I17,I16,I19)   +o(A6,A2,2I2,56X,I2)  +s(1H146X,19HSURVIVAL PROPORTION//)  +x(' PROBLM OR FINISH CARD EXPECTED,BUT READ ',A6)  +}(' SUBPRO CARD EXPECTED, BUT READ ',A6) +(21H0SURVIVAL TABLE INPUT//)  +(7H0FORM  A1,7H  INPUT//)+
(1H0,23X,71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.) -\A/+  +0BMD01S    x 0H     PROBLM    SUBPRO    FINISH    zx:"$.d Dg g2D+M L4d@ $ Dh+B M4d] $ Dh 5dE h KLe DK : Zh Zi h K .e4dK3:9F:h"g.Di+X N4dO $ Dh+Q O4d] $ Dh : Zh Zi h K .e4dW3:9R"$.Dh!$ &`$h ($i 
d.
 Jf.
D(+a4 Zc \c  d,!p,!p, p+: c c-|pxgA    {Pi"$. D 2D+q $ D 5dr ML DM+r $ D : Z Z  K .4dw3:9r"$.4Dz".D : Z Nh"4D N '4D 1:9z!$ &$ .D 
>+!$ &$ .D +4 Z
,\,!p, p+i 
-xB"Dsp@@u@@v:Zv:Zw:$$.v@@>1:9v3:9 ab  "nb  : Zv"$. / Fx : Zx : Zw &`$ ($x.v.  &$ 
x.
D(>1:9, x3:x9+-\7 u4D9 u	u$H Dv+: 	 Du &$v }@ @y ]@ @y "jbwyy
	vHv3:9'+E(1H0)+O(6H0TABLEI3,I5,76H-PERIODbSURVIVALRATES<ANDTHEIR@STANDARDERROR7WITHINCREASEINFCOHORTSIZE)+X(23H0> : Z< NUMBEROFI8,47H-PERIOD .STANDARDERROR >PERCENTRED.IN)+a(47HKCOHORT9 &CASES9.> $SURVIVAL\3b4OFI3,27H-PERIOD09[STD.,ERROR4OF)+j(77H2 D?+n DIAGNOSED"YbRATE,? :SURVIVAL RATE$SURVIVAL9RATE)+n(I6,1H-I6,9I7,F16.2,F17.2,F20.1)$+o(1H)+r4@Zs\t+|s@t-|peT+Y(1H6X5(F12.3,8X),F12.3/17X,5(F12.3,8X))+\(1HF12.3,1X,103A1,F12.3)+^(1H13X,103A1)+`(1H14X,101A1)+c(15X,20(5H+....),1H+)834D=@@4-\384/4/4(44454546"55 D6 4 D7"$.7$74$ 44dq "`b  44d. 5 DA : Z7 6h@ DhA1:9s "Ub : Z7 A.:1z+w : Z7 A 7.:1z+z  44dn+"$.74$4D"$.D7 $/7 D8 4 G DM 45d 4 G DO`4 @8 68) D8 58 DA : Z7 6h@ DhA1:9 "LQ"b : Z7 A.:1z+ : Z7 A 7.:1z+  45d"$.44D+ "^b : Z723:79 : Z92 : Z72 71:9" 91:	9 2 : Z72 73:89'  44d.+ "`b  45d@@3@@9 04$U : Z7 : Z7 $$.7 3 F81:292 71:90-\384-4-4)4:4:4;4;":; D<+= 04$4Dv 04$U : Z< ..  D= ;, D= =5$E@@= 5 <.. D> >5$I@@>!$
?A ";DA 2 D?+ "\b? : Z< $$.981:29?  >3:@9 $ D4+j $ D3+#4 Z+ \+  ,,!p,!p,!p, p, p,!p,!p,!p,!p+U + +\ 0/ ,Ap,Ap/ ,Ap,Ap-|p!y!!Y t`1.    +         ~PG 1X,  2X,  3X,  4X,  5X,  6X,  7X,  8X,  9X,  10X (17X      5(F1 2.3, 8X)/ 7X,       4(F1 2.3, 8X), F12. 3)   sX2a!$$!& F3J 3F3F D3K 3K3G D3K-\A43K3J @3I@3I @3L!$	  3L,@9 D3L 3K3L D3K@@3M"3B3J3K5$2u!$	 D3K 3L3B D3L:3M $/3M5$2y!$	 D3L $ D3M 3K 3M3R4D2~5d2u 3L 3M3R D3I+3 3F 3M3R D3M@3M @3L`3L @3N"3M3N D3I-\A%43I3C4`2{ 3L 3M3R D3I 3F3F3I3GD3C D3N@3N @3O 3O5$3`3O @3M"3M3N4D3>3O`3O @3H 3ID3H 3G3I3H D3H"3J3F3H5d2u 3L 3M3R D3O 3F3F3O3GD3C D3P@3P @3P 3P5$3 `3P @3Q 3P3D3Q+3 >3P`3P @3Q 3OD3Q 3G3O3Q D3R 3F3R2d3J+3* 3Q D3H 3R D3H 3O D3I 3P D3O 3G3B D3K 3D3K@ @3G 3I3B3G D3I 3H3I@ @3L 3O5$33>3L"3O.3G 3L$3G. D3L 3L D3G+3>4 Z3D \3E  3E,!p,!p,!p,!p,!p,!p,!p+2b 3D 3E\ 3I,Ap,Ap,Ap,Ap-|p 0!z8]|-10c=t} 3R 0 8 P X p t ~!!!4 3k3D3j+3a : Z3l 3j2Dh3l+3] h3l D3j+3b1:93Y 3j3D3u+3b 3l D3j+3b 3j D3j+3f4 Z3h \3i  3i,!p,!p+3W 3h 3i\ 3j,Ap-|px3k     Zp3l2    3    4    5    6    7    8    9    A    B    C    D    E    F    G    H    I    /     62D+46 :5D3} "5Lb  "5Tb  "6
b  $ D: : Z6"$.h,4D45d4 6 ?@ @6+4 6 ?@ @6+4 6 ?@ @6+4"$
46.,4$45d463?@@6+462?@ @6+46?@"@6+4"$46.,4$4 63:93~ "6b : Z6 63:94"  "6B : Z6 63:94'  : Z6 63Dh6+4.+4/ 6 6 F6 63:94+ "6
b: $ D::3Z6"$.h,4$4K4D4N+4P+6 ?@ @6+4W6 ?@@6+4W 6 ?@ @6+4W 6 ?@ @6+4W 6 ?@ @6+4W 6 ?@ @6+4W"$ 6.,4$4I4D4A"$ 6.,4$4D4D4F 6 ?@ @6 63:94> "6b : Z6 63:94Z  "6B : Z6 63:94  : Z6 63Dh6+4f+4g 6 6 F6 63:94c "6
b  $ D: : Z6"$.h,4D4{5d4~ 6 ?@ @6+5 6 ?@ @6+5"$ 6.,4D55d5 6 ?@ @6+5 6 ?@ @6+5 6 ?@ @6 63:94v "6b : Z6 63:95
b "6B:3Z6963:95D:Z6 63Dh6+5+5 6 6 F6 63:95 "6
b: $ D::3Z6"$.h,4D5*5d5,(62?@O@6+56I61?@ @6+56"$E6.,4D515d54+6(?@6@6+56A6E?@(@6+56D6O?@I@6863:95%E"6bS:SZ6163:9591 "6B+:(Z6(63:95>AC:+Z6(63Dh6+5D+5FA6I69F6G63:95BM"619HLENGTH OF TIME FROM/39X18HDIAGNOSIS TO DEATH12X17HDIAGNOSIS TO LAST/52X33HOBSERVATION FOR THOSE STILL ALIVE)+5}(1H012X16HMONTH  DAY  YEAR2(19X4HCODE)) +6
(1H012X17HDATE5OF2DIAGNOSIS16X6HSTATUS17X19HLENGTH+OF6TIMEFROM/40X15H(ALIVEORDEAD)15X17HDIAGNOSIS TO LAST/56X27HOBSERVATION:(ALIVE7ORDEAD))+6h]"Dh3:96{ : Z7 hlh Dh*!$h* Dh:3:96 : Z7!$ DhI : Z7 h: 7DI3:797 73:97@@ : Z7 hhl DhY h*hY Dhh hhD-\@4hI @hx3:97  I D
  x D	+74 Z7 \7+6z 7 7-|pk7w 4d8 "9B
9' : Z9(  :	 3:97{ 9!3D9'2F9(7+8 "9b
9' -\A/ : Z9( 9h D9)!$Hh D9)!$Hh:	 D9* 9h D9* 9*9*h &$ D} 9)9)Dh:	3:98 9$3D+8 9$2D+8" "9B
9' : Z9( "1:98 : Z9( ' 9(1:98 9#3D9'2F9(7+8" "9b
9' -\A/ "9B
9' : Z9( ,3:98$ 9"3D9'2F9(7+8, "9b
9' -\A/ $	$D "9B : Z9( 9/3:98.  "86b : Z9( 9/3:983 +8:(' VARIABLE FORMAT IS'/(1X,18A4))   4d8K : Z9( $` @h:3:98< 9$3D+8E 9%3D+8G 9%3D+8H 9&3D+8J+8K!$ D9++8K!$` D9++8K 9 D9++8K!$6 D9+ : Z9+ 9X@8N "9/Q"ZB : Z9( ?3:98O 9+ -\6 Z9 -\<?49  4d8[ : Z9( Z9,"h:	L4d8Y3:98V 9, D9,+8\ $ D9,!$ 9,Dm 9&3D+8d 9$3D+8j 9'3D+8h-\49,49+4:+8m 4d8h-\]49,49+4:	+8m-\]49,49+4:+8m 4d8b-\49,49+4:	 9+3:98K "9b  4d8s  D9-+8t $ D9- : Z9("$. D9- /9- D9. : Z9."$. D9/ &$9/ 9(.  ] 
>  ($.9( D ]3:9.98y 9(3:9-98t+9(' COHORT CARD EXPECTED,BUT READ ',A6)  +9(' STATUS CARD EXPECTED,BUT READ ',A6)  +9(' ORDER CARD EXOECTED,BUT READ ',A6)   +9(A6,33F2.0/6X,(33F2.0))  +9(A6,20F3.0)    +9(A6,24(1X,I2)) +9(18A4)    +9(1H1)+94 Z9 \9+7x 9 9-|p#SD!>3L9 COHORT    ORDER     STATUS    B    D    W    M    Y    A    C    np:( ":Yb	  ":db :	 ":qb  ":b  ";b  ";,b  /95D:9 : Z;3 hI &$.8"DH3:9:5@@;4 $ D;4 : Z;3 : Z;5 &$.;3 >@ @h	1:9:< ";b;4;4

 : Z;5 $$.;3>1:9:E ;3hx :;4:;4 ;33:9:; ";,b  ";b
  ";$b	  	!&

 F@ @;6 ";(b;6 +:d(15H1         TABLEI3,20H  COMPUTATION OF THEI3,44H-PERIOD SURVIVAL RATE AND ITS STANDARD ERROR)    +:q(120H0PERIODS     ALIVE AT     DIED     LOST TO   WITHDRAWN   EFFECTIVE NO.   PROPOR-  PROPOR-   CUMULATIVE   COL.7/   STAND.)    +:(120H  AFTER       BEG. OF    DURING    FOLLOW-   ALIVE DUR-   EXPOSED TO      TION   TION SUR-  PROPORTION   COL.6-   ERROR )    +;(111H DIAGNOSIS   INTERVAL   INTERVAL     UP    ING INTERVAL  RISK OF DYING    DYING   VIVING    SURVIVING    COL.3  )  +;(119H   (1)          (2)        (3)       (4)        (5)           (6)          (7)      (8)        (9)        (10)     (11))+;(I3,2H -I2,I12,I11,I10,I11,F15.1,F12.2,F9.2,F11.2,F12.4,F10.4)   +;$(1H0I2,24H-PERIOD SURVIVAL RATE...F7.2) +;((27H0STANDARD ERROR............F7.2)    +;,(27H0EFFECTIVE SAMPLE SIZE.....I4) +;-(1H )+;04 Z;1 \;2+:( ;1 ;2-|pyH< : Z<G@@hK1:9< 5d< <D D<H!$6 D<H+<!$H D<H <D D<H@@<I : Z<G : Z<I <G ,/h95D<# <I 9&$ D<J <H <G? <JDK+<= <I1:9< : Z<I $$ D<J"<J <G.,5D<+ <I <G  ? FK+<= <G , <I/95D<2 <I 9&$ D<J <G ? <JDK+<= <I1:9<% : Z<I <G ,/h95D<< <I 9&$ D<J <H <G? <JDK+<= <I1:9<4 <G3:9<+<B4 Z<E \<E  <F,!p+< <E <E-|p!>3L#SD|h=/ =K4$==5d=2 $ D=K =K/=K4D=7 $3D=K+=8 =KX@=6"$.=K4D=;"$.=K4D== =KX@=; =K D=K+=F "=?b -\A/+=B(25H ERROR ON TAPE ASSIGNMENT)+=F4 Z=I \=J  =J,!p,!p+=0 =I =J\ =K,Ap,Ap-|p =L4O@>4+=O4@@>4O"$ D>4 $:INX|H=R+=g 
=m6@>4 J=m 
=loJ=oZ=m+=g J=oz=m+>0
z@+=g #p &> 
3L=p+=c7@=p /&5f=\7 +=g@@ =p: =p L =p 
PL=p+=fRd.R=pd$2N+=^:=p:kN
y1kN
y CB`x=ox=pH>0Z=n0B+=g	d
:`>4+=g+=Wx>44}X>5 \? @?<?"0<0|+1\+>C,>p>4Zp>4+p@h>f@p>f@(?@0?
@x>m@>m@8?
@(>z@P?@P?@h>f@>K@ >K@>f@>fo>y[(/<0"`S<pX<0 p3@?#+>J*|>F-<?0wx>HZ`>5+>y!  @w+>G<?$ p7 p+>f,>,>,> &w p,>a,&.<7@p+>_ p,>a"?$ ?.< p`?% w,&,&5 >Q.< pd?%:." Q,& p,&>`9>\.<9>Q@@,^,^,^+>fd @@& 0b.".")B}5@>b,~m<!<P\?<?$ p[pl<0@X+>lZp.</ pQ \?+>o@@?!<P\?7@?+>r <? \?@@?!<P\?XX\? ?&7@?D<7@?A< \? <?[`x ?,x,^x ?+>5 >5Q< \?:>5  \?<?& p?|?' < \?@@?+>v@@? Q< \?<?& p?|?'+>v7?) ?* \? @?	XQ< \? ?+ \?+>v~x?	[`x ?,x+?Z \?@@?@@?<?$ \?+>v7? ?X\>5@@?@@?+>xP?~0?>x! Z @
&?+U`eB+?!@)@G 
"+?
&?/+?T6$1,>A1.@
p.46$qx?.
.4?.?SEQIN}0?(@?(SEQOUT@?)@?	
%5 Source level error at user's loc	
	`Z(X^. >S.~(3~+?4	~+?@Z. \x <x*<x .->A4ez+?;!"	b+  "?=	b+Z. h+ggM?} ??
&?B	b+?0,
?NO CORE AVAILABLE - CAN NOT PROCEED
x ?Fa.3@1,>A1O@@+?KgR~@1,>A1@@@,>,>@6 w+?W"@0B+?S!"A`X#p5@?P/#p!"X#p+?W\p+?Wa.9'1,>A1,>,>O@@+?W,>
6+ _4`?`"`Q@,> <@,,^,> <@	,
,^*b?]+?j,> <@
,,^7@@+?e,> <@
,^+?g,> <@,
,^Z5"?j,> <@,
,^,7@@,
,> <@,,^,,> <@,,^,> <@,
,^(@qd1@,,
1@#+?y0@*+?k,> <@,,^+?k,^,^,^,~(' Type G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP h@.pX`@@p p@	X`@@p @p@p @p@p p@X`@?{X~P@@p x}X@gG@1,>A17cp+@)  )@/ @( X@@%(B{4 @&B? B@,"P" @,B @,@,~B@ B@,""X+@"4B@++P?A0
@-#p+@  ,~yh@,attempt to take SQRT of negative argKc#@ p p+@<Kc#K  ,@< @,~Kc#J  ,@< @,~Kc#I  ,@< @,~Kc#H4B@`5@@@5"@J+D?A0
@?U ,~ D@_!$ @@^ B@_5"@G#`+ @\,@G!"B,~+ @J(BdB+ @J5B@E  @_,~ +7`@_+@S`d +D?A0@N+D?A0
@NU `d @6 @^+@I @_`B"`+@I/@aid +@U+D?A0@N#@^,> <@b,A,^ @`@_@,> <@b,@c,^+@PU",@G@^+ @J+@D|@_! ,~xKc1,>A1 p3"@~+@h3b@~+@j+D?A0
@gU ,~+D?A0@i  ,~ D@ FA@@@%"j"%@})/;`:XD@y5f@qaF+@q.&@(|h&f@ @{@| @| @@{D@}@ @ A,~!t0_'"S'qf!um.	.#Y% !vyO^	RXAC2|t(1,>A1 p4@A @A,> <A ,A,^A,~{e^b}AC2|p1,>A1 p5`A
4@A+P?A0A!#p3@A+A)r. !@A! n@A(|h"A A BA AAAAAA,~+D?A0
A A,~  ,~ 0_i/X3 6P'M 5( bB W
R `@8AxAATTEMPT TO TAKE LOG OF NEGATIVE ARG}A$C1,>A1#p,~S01,>A1#p+"A*,~U ,~[> 1,>A1 p&p ,~KbN@1,>A1,
,~A2Y\A3Q<X\A4*+!$hX$h@@h*% "A< BhL " BhM+xeX2GiSHYC aSiSH~A<INXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GxAJiSH+