Web Module: Russll's Viper |POLVER05_3
d(Cvt)/d(t) =          -Ktb*Cvt          #
d(Cvb)/d(t) =          .1*Ktb*Cvt - Kel*Cvb -krec*Cvb*Ca          #
d(Cx)/d(t) =          -r1 +.00001*Cx          #
d(Cxa)/d(t) =          r1-r2          #
d(Cf)/d(t) =   r4 -kfdp*Cf*Cfdp-nt   #
d(Cfib)/d(t) =          3 -kfib*Cxa*Cfib          #
d(fs)/d(t) =     -kdep*nt*fs     #
d(Ca)/d(t) =          -krec*Cvb*Ca -Kela*Ca          #
d(Cu)/d(t) =          .035 - .014*fs*Cu          #
d(Cfdp)/d(t) =          1.155*Cf -.001*Cfdp          #
d(nt)/d(t) =   ((No/tau)*((t/tau)^3)*((j-1)*(t/tau) +(j-1)*((t/tau)^2) -(j+1)))/(6.02*10^35) -kfdp*nt*Cfdp -kdep*nt*fs   #
r1 =                   kx* Cx*Cvb                   #
r2 =                   kixa*Cxa                   #
r4 =          .006*kfib*Cxa*Cfib - kfdp*Cfdp*Cf          #
kixa =                   4.5                   #
kx =                .002                #
Kel =              .14              #
kfdp =   .00005   #
kfib =              .18              #
kdep =   1   #
Kbt =                   .029                   #
Ktb =                .01                #
Fibrogen =                   Cfib*(10^(-9))*340000                   #
Venom =                   Cvb*105                   #
krec =              .1              #
Kela =                   .006                   #
ku =                   8750                   #
Urea =                   Cu*6                   #
Fdp =                   Cfdp*.1                   #
No =   Cf*(10^(-9))*(6.02*10^23)*1000   #
ka =      2.11*10^(-18)      #
tau =   1   #
j =   800000   #
t(0)=0
Cvt(0)=600
Cvb(0)=0
Cx(0)=170
Cxa(0)=0
Cf(0)=0
Cfib(0)=13000
fs(0)=1
Ca(0)=0
Cu(0)=2.5
Cfdp(0)=0
nt(0)=0
t(f)=600