Commit 580c08ac authored by dumoda01's avatar dumoda01

Correction d'un bog avec les termes lies a la mte (mte=.true.) dans les...

Correction d'un bog avec les termes lies a la mte (mte=.true.) dans les equations de reaction. Le probleme faisait en sorte que le modele n'etait pas conservatif.
parent bb20eea6
......@@ -673,9 +673,9 @@
dd(p2,l,ci) =amr2*gamma*ff2*(qn2+qa2)*cc(p2,ci)
dd(p1,d,ci) =amr1*mu11*(cc(p1,ci)+p0)/(k5+cc(p1,ci)+p0)*cc(p1,ci) &
+(1.-beta)*cc(p1,ci)**2*(g1max*r11*fac1+g2max*r21*fac2)
+(1.-beta)*cc(p1,ci)**2*(hmr1*g1max*r11*fac1+hmr2*g2max*r21*fac2)
dd(p2,d,ci) =amr2*mu12*(cc(p2,ci)+p0)/(k5+cc(p2,ci)+p0)*cc(p2,ci) &
+(1.-beta)*g2max*r21*cc(p2,ci)**2*fac2
+(1.-beta)*cc(p2,ci)**2*(hmr1*g1max*r11*fac1+hmr2*g2max*r21*fac2)
dd(b,d,ci) =(1.-beta)*g1max*r12*cc(b,ci)**2*fac1
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment