Changes between Version 85 and Version 86 of DevelopmentActivities/MergeOCN/Vuichard

Timestamp:

2014-05-06T12:06:14+02:00 (10 years ago)

Author:

nvuilsce

Comment:

--

DevelopmentActivities/MergeOCN/Vuichard

@@ -319 +319 @@
 }}}
 We replace '''ilabile''' by '''k''' in order to fill all the biomass pools and not only the labile one. 
- 
+
+ * In OCN (rev 19) this block code appears twice.
+{{{
+       total_bm_sapl(:,:)=zero
+       DO k = 1, nparts
+          WHERE(d_ind(:,j).GT.min_stomate.AND.vn(:).GT.min_stomate)
+
+             total_bm_sapl(:,icarbon) = total_bm_sapl(:,icarbon) + & 
+                  bm_sapl(j,k,icarbon) * d_ind(:,j) / vn(:)
+             total_bm_sapl(:,initrogen) = total_bm_sapl(:,initrogen) + &
+                  bm_sapl(j,k,initrogen) * d_ind(:,j)  / vn(:)
+
+          ENDWHERE   
+       ENDDO
+}}}
+ The first occurance is useless. It is the same in the trunk. In OCN, it is problematic because we limit total_bm_sapl(:,initrogen) to the soil_n_min only after the first block of initialization. And consequently, this limitation is not accounted for, in the rest of the code ... This is correct in the merge version
+
+ 
+