Correction de plusieurs erreurs dans les termes impliquant les preferences de...

Correction de plusieurs erreurs dans les termes impliquant les preferences de broutage par les dexu classes de zooplancton (z1 et z2).

src/extras/bio/bio_ismer.F90

@@ -675,9 +675,9 @@
       dd(p1,d,ci) =amr1*mu11*(cc(p1,ci)+p0)/(k5+cc(p1,ci)+p0)*cc(p1,ci)  &
                    +(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)*cc(p2,ci)**2*(hmr1*g1max*r11*fac1+hmr2*g2max*r21*fac2)
+                   +(1.-beta)*cc(p2,ci)**2*(hmr1*g1max*r12*fac1+hmr2*g2max*r22*fac2)
 
-      dd(b,d,ci)  =(1.-beta)*g1max*r12*cc(b,ci)**2*fac1
+      dd(b,d,ci)  =(1.-beta)*g1max*r13*cc(b,ci)**2*fac1
 
       dd(p1,z1,ci)=hmr1*beta*g1max*r11*cc(p1,ci)**2*fac1
       dd(p2,z1,ci)=hmr1*beta*g1max*r12*cc(p2,ci)**2*fac1
@@ -693,7 +693,8 @@
       dd(d,l,ci)  =mu4*cc(d,ci)
       dd(a,n,ci)  =mu5*cc(a,ci)
 
-      dd(z1,d,ci) =hmr1*(1.-epsi-delta)*mu21*(cc(z1,ci)+z0)/(k6+cc(z1,ci)+z0)*cc(z1,ci)
+      dd(z1,d,ci) =(1.-beta)*hmr2*g2max*r24*cc(z1,ci)**2*fac2            &
+                   +hmr1*(1.-epsi-delta)*mu21*(cc(z1,ci)+z0)/(k6+cc(z1,ci)+z0)*cc(z1,ci)
       dd(z1,a,ci) =hmr1*epsi*mu21*(cc(z1,ci)+z0)/(k6+cc(z1,ci)+z0)*cc(z1,ci)
       dd(z1,l,ci) =hmr1*delta*mu21*(cc(z1,ci)+z0)/(k6+cc(z1,ci)+z0)*cc(z1,ci)