Changeset 7200 for branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/hydrol.f90

Timestamp:

2021-05-27T18:50:25+02:00 (3 years ago)

Author:

agnes.ducharne

Message:

Adding new keywords required for r6954, with updated names, cleaning of comments, and small bug correction (dim of njsc). Checked with 5d simulations on jean-zay: no change.

File:

• branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/hydrol.f90 (modified) (2 diffs)

branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/hydrol.f90

@@ -794 +794 @@
     ENDDO
 
-    !salma: added config key of KFACT_ROOT_TYPE
     !! KFACT_ROOT_TYPE = cons is used to impose that kfact_root = 1 in every soil layer,
     !! so that ks does not increase in the rootzone; else, kfact_root defined as usual
@@ -803 +802 @@
     !Config Help  = can have two values: 'cons' or 'var'. If var then no changes, if cons then kfact_root=un
     !Config Units = [mm/d]
+    kfact_root_type = 'var'
     CALL getin_p("KFACT_ROOT_TYPE",kfact_root_type)
 
     IF (kfact_root_type=='cons') THEN
-    kfact_root(:,:,:) = un
+       kfact_root(:,:,:) = un
     ENDIF
-    !end salma: added config key
 
     !