Changes between Version 14 and Version 15 of DevelopmentActivities/ORCHIDEE-MICT-IMBALANCE-P


Ignore:
Timestamp:
12/15/15 10:48:00 (5 years ago)
Author:
ajornet
Comment:

--

Legend:

Unmodified
Added
Removed
Modified
  • DevelopmentActivities/ORCHIDEE-MICT-IMBALANCE-P

    v14 v15  
    1616    * ... 
    1717 
     185. The use of WHERE statement with min_stomate is a bad practice which leads to potential bugs. What if the value is negative? (value not allowed) In this case it would be ignored. 
    1819 
    19  
     20{{{ 
     21     !calculate mass weighted surface-area-to-volume ratio by fuel types. 
     22     WHERE (dead_fuel(:).gt.min_stomate) 
     23       sigma(:)=(fuel_1hr_total(:) * sigma_1hr + & 
     24            fuel_10hr_total(:) * sigma_10hr + & 
     25            fuel_100hr_total(:) * sigma_100hr) / dead_fuel(:) 
     26     ELSEWHERE 
     27       sigma(:)=0.00001 -> 10000 
     28     ENDWHERE 
     29}}} 
    2030 
    2131== Code Updates ==