A SAAM31  LITHIUM TURNOVER IN RATS (m65)
C DIET #7 POTASSIUM SUPPLEMENTED
C RATES FROM LITURATURE 
C NONLINEAR 
H PAR   
C   
C COMP.1 IS DIET
C COMP.2 IS BLOOD   
C COMP.3 IS TISSUE  
C COMP.4 IS URINE   
C COMP.7 IS KIDNEY  
C COMP.8 IS SIMULATED TISSUES (NOT MEASURED)
C   
C            VALUE         MIN            MAX          FUNCTION 
   L(2,1)    3.536705E+00  1.000000E+00   1.830000E+02  
   L(0,1)= L(2,1)/20
   L(3,2)    8.400000E+01  8.000000E+00   9.100000E+01  
   L(2,3)    8.5           1              77           *G 2 
   L(4,7)    6.000000E+01  3.000000E+00   6.500000E+01  
   L(7,2)    4.000000E+01  1.000000E+00   1.100000E+02  
   L(2,7)    1.600000E+01  1.000000E+00   1.100000E+02  
   L(8,2)    9.100000E+01  1.800000E+01   1.500000E+02  
   L(2,8)    6.000000E-01  9.999998E-04   7.700000E+01 *G 2 
   IC(2)=0.00000
   IC(3)=0.7416 
   IC(7)=0.0129 
   P(5)      4.000000E-01   
   P(6)      1.000000E-01   
   P(7)     .5  
H DAT   
X G(2)=P(7)+P(5)*EXP(-P(6)*(T-13)**2)   
C THE FOLLOWING IS FOR QOING THE DIET   
X UF(1)=F(21)   
X UF(22)=F(21)  
121QO                     *0.32812  
C DATA DIET#7 MEAN FOOD INTAKE IN GRAMS 
C MULTIPLYED BY ANALYZED LI IN DIET #7 TO   
C   CONVERT IT TO MG OF LITHIUM INGESTED
C           TIME          VALUE          STANDARD DEVIATION 
            0             10.8           0.45   
            1             11.2           2.28   
            2             11.6           1.67   
            3             6.2            0.84   
            4             12.6           0.55   
            5             12.6           0.89   
            6             8.4            1.14   
            7             8.0            0  
            8             9.6            0.89   
            9             6.4            1.82   
            10            11.8            2.77  
            11            12.4            2.70  
            12            7.6            1.95   
            13            13.6            2.07  
            14            11.4            1.95  
            15            11.8            1.30  
            16            13.0            2.92  
102 
C PLASMA IN MG  
C data day 17 from DIET#7 (MEAN)
C data day 0 mean from DIET#3 (CONTROLS)
            0             0 
            17            0.08873         0.01006   
103 
C TISSUE in MG  
C DATA DAY 17 IS MEAN OF DIET#7 
C DATA DAY 0 IS MEAN FROM DIET#3 (CONTROLS) 
            0             0.7416         0.06787
            17            1.4322         0.3630 
107 
C KIDNEY IN MG  
C DATA DAY 17 FROM DIET#7 (MEANS)   
C DATA DAY 0 FROM DIET#3 (CONTROLS) 
            0             0.0129         0.0063 
            17            0.0456         0.00718
104 
C CUMULATIVE TOTAL URINE LITHIUM IN MG  
            0             0 
            1             1.064          0.380  
            2             2.377          0.392  
            3             3.157          0.692  
            4             3.921          0.777  
            5             4.904          1.112  
            6             6.491          1.604  
            7             8.732          2.385  
            8             10.583          2.936 
            9             13.170          3.321 
            10            14.799          3.255 
            11            16.950          3.872 
            12            19.051          4.594 
            13            22.253          4.954 
            14            25.553          5.751 
            15            29.218          7.515 
            16            32.611          7.819 
            17            35.880          8.268 
105 UF(1)   
            0   
2           .1                           200
101 F( 1)   
            0   
2           .1                           200
108 
C SIMULATED TISSUES 
            0   
2           .1                           200
110 L(2,8)  
C STORAGE FOR CALCULATED L(2,8) 
            1   
            2   
            3   
            4   
            5   
            6   
            7   
            8   
            9   
            10  
            11  
            12  
            13  
            14  
            15  
            16  
            17  
112 L(2,3)  
C STORAGE FOR CALCULATED L(2,3) 
            1   
            2   
            3   
            4   
            5   
            6   
            7   
            8   
            9   
            10  
            11  
            12  
            13  
            14  
            15  
            16  
            17  
Y