Changeset 652 for LMDZ4/trunk/libf/phylmd/conf_phys.F90

Timestamp:

Jun 6, 2005, 3:16:33 PM (19 years ago)

Author:

Laurent Fairhead

Message:

Correction du bug sur l'ozone (unite, calcul). On peut retrouver le
bug, qui est présent dans les simulations IPCC 2005, en positionnant
le flag bug_ozone à true dans physiq.def.
MPL/LF

File:

• LMDZ4/trunk/libf/phylmd/conf_phys.F90 (modified) (2 diffs)

LMDZ4/trunk/libf/phylmd/conf_phys.F90

@@ -704 +704 @@
   call getin('ecrit_reg',ecrit_reg)
 !
+!
+!
+!Config Key  = bug_ozone
+!Config Desc = Pour retrouver le bug de l'ozone (IPCC), mettre a true
+!Config Def  = false
+!Config Help =
+!
+  bug_ozone = .false.
+  call getin('bug_ozone',bug_ozone)
 
 
@@ -765 +774 @@
   write(numout,*)' ecrit_ ins, hf, hf2mth, day, mth, reg, tra',&
  & ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day, ecrit_mth, ecrit_reg, ecrit_tra
+  write(numout,*)' bug_ozone = ', bug_ozone
   return