A SAAM31            AIDS.S  
C  REF: ANDERSON RM AND MAY RM. PHIL. TRANS. R. SOC. LOND. 314: 533-570, 1986.  
C 1986  
C DEMONSTRATION OF AIDS SPREAD WITH TIME
C   
H PAR   
C P(1)=B=13333.3 YR**-1 
C P(2)=V=0.2 YR**-1 
C P(3)=U=.034 YR**-1
C P(4)=D=1.0 YR**-1 
C P(5)=P=.3 
C P(6)=C=4 PARTNERS 
C P(7)=R=0.88 YR**-1
C P(8)=BETA=.26 
C   
C A0=0  
C Z0=0  
C X0+Y0=N0=100000   
C   
C X=SUSCEPTIBLES
C Y=INFECTIOUS MALES
C A=AIDS PATIENTS   
C Z=SERO-POSITIVE NON INFECTIOUS
C   
C COMP 1 = X
C COMP 2 = Y
C COMP 3 = A
C COMP 4 = Z
C   
   P(1)     13333.3 
   P(2)     .2  
   P(3)     .034
   P(4)     1   
   P(5)     .3  
   P(6)     4   
   P(7)     .88 
   P(8)     .26 
C   
   IC(1)    50000   
   IC(2)    50000   
   IC(3)    0   
   IC(4)    0   
H DAT   
X G(1)=P(8)*F(2)/G(2)   
X G(2)=F(1)+F(2)+F(3)+F(4)  
X UF(1)=P(1)-P(3)*F(1)-G(1)*P(6)*F(1)   
X UF(2)=G(1)*P(6)*F(1)-(P(2)+P(3))*F(2) 
X UF(3)=P(5)*P(2)*F(2)-(P(3)+P(4))*F(3) 
X UF(4)=(1-P(5))*P(2)*F(2)-P(3)*F(4)
103 
            0   
2           .5                           60 
104 
            0   
2           .5                           60