Changeset 705 for LMDZ4/branches/IPSL-CM4_IPCC_patches/libf/phylmd/conf_phys.F90

Timestamp:

Sep 19, 2006, 4:23:21 PM (18 years ago)

Author:

Laurent Fairhead

Message:

Pour la conservation du flux d'eau OM, JLD
LF

File:

• LMDZ4/branches/IPSL-CM4_IPCC_patches/libf/phylmd/conf_phys.F90 (modified) (3 diffs)

LMDZ4/branches/IPSL-CM4_IPCC_patches/libf/phylmd/conf_phys.F90

@@ -275 +275 @@
 !! KE
 !
+!Config key  = cvl_corr
+!Config Desc = Facteur multiplication des precip convectives dans KE
+!Config Def  = 1.00
+!Config Help = 1.02 pour un moderne ou un pre-ind. A ajuster pour un glaciaire
+  cvl_corr = 1.00
+  CALL getin('cvl_corr', cvl_corr)
+
 !Config Key  = epmax
 !Config Desc = Efficacite precip
@@ -514 +521 @@
   ok_kzmin = .true.
   call getin('ok_kzmin',ok_kzmin)
+
+!Config Key = ok_lic_melt
+!Config Desc = Prise en compte de la fonte de la calotte dans le bilan d'eau
+!Config Def  = .false.
+!Config Help = mettre a .false. pour assurer la conservation en eau
+  ok_lic_melt = .false.
+  call getin('ok_lic_melt', ok_lic_melt)
 
 !
@@ -574 +588 @@
   write(numout,*)' CFC11_ppt=',CFC11_ppt,' RCFC11 =  ',RCFC11
   write(numout,*)' CFC12_ppt=',CFC12_ppt,' RCFC12 =  ',RCFC12
+  write(numout,*)' cvl_corr=', cvl_corr
+  write(numout,*)'ok_lic_melt=', ok_lic_melt
   write(numout,*)' epmax = ', epmax
   write(numout,*)' ok_adj_ema = ', ok_adj_ema