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

Timestamp:

May 9, 2006, 11:46:14 AM (18 years ago)

Author:

Laurent Fairhead

Message:

En fait le bug sur l'ozone n'en etait pas un! on revient a la situation precedente MPL/JLD
LF

File:

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

LMDZ4/trunk/libf/phylmd/conf_phys.F90

@@ -666 +666 @@
   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)
 !
 !
@@ -744 +735 @@
   write(numout,*)' ecrit_ hf, day, mth, reg',&
  & ecrit_hf, ecrit_day, ecrit_mth, ecrit_reg
-  write(numout,*)' bug_ozone = ', bug_ozone
   return