Bogue mineur

src/extras/bio/bio_fasham.F90

@@ -296,11 +296,8 @@
       cc(z,i)=z_initial
       cc(b,i)=b_initial
       cc(d,i)=d_initial
-!      cc(n,i)=n_initial
-!      cc(n,i)=nit(i)					!CHG3
       cc(n,i)=nprof(i)                                  !CHG3
-      cc(n,i)=aprof(i)                                  !CHG5
-!      cc(a,i)=a_initial                                !CHG5
+      cc(a,i)=aprof(i)                                  !CHG5
       cc(l,i)=l_initial
    end do