Changeset 2938 for LMDZ5/branches/LMDZ_tree_FC/libf/phylmd/phyetat0.F90

Timestamp:

Jul 7, 2017, 1:27:28 PM (7 years ago)

Author:

fcheruy

Message:

ifl_pbltree > 1 changed in igl_pbltree >0 in phyetat0

File:

• LMDZ5/branches/LMDZ_tree_FC/libf/phylmd/phyetat0.F90 (modified) (1 diff)

LMDZ5/branches/LMDZ_tree_FC/libf/phylmd/phyetat0.F90

@@ -321 +321 @@
   ENDIF
 !FC
-     IF (ifl_pbltree>1) then
+     IF (ifl_pbltree>0) then
   found=phyetat0_srf(1,treedrg,"treedrg","drag from vegetation" , 0.)
   !lecture du profile de freinage des arbres