Changeset 933 for LMDZ4/trunk/libf/phylmd

Timestamp:

Mar 25, 2008, 3:07:18 PM (17 years ago)

Author:

lmdzadmin

Message:

Bug ecrit_hf2mth interpolation niveaux standard de pression, cas guide
IM

File:

• LMDZ4/trunk/libf/phylmd/physiq.F (modified) (3 diffs)

LMDZ4/trunk/libf/phylmd/physiq.F

@@ -53 +53 @@
 #define histday
 #define histmth
+c#define histmthNMC
 c#define histins
-c#define histmthNMC
 c#define histISCCP
 c======================================================================
@@ -1822 +1822 @@
 cIM : ne pas modifier ecrit_hf2mth
 c
-         ecrit_hf2mth = 30*1/ecrit_hf 
+cIM 250308bad guide        ecrit_hf2mth = 30*1/ecrit_hf 
+         ecrit_hf2mth = ecrit_mth/ecrit_hf 
 c ecrit_ins en secondes, chaque pas de temps de la physique
          ecrit_ins = dtime
@@ -1837 +1838 @@
          ecrit_ISCCP = ecrit_ISCCP * un_jour
 c
-         PRINT*,'physiq ecrit_ hf day mth reg tra ISCCP',ecrit_hf,
-     .   ecrit_day,ecrit_mth,ecrit_reg,ecrit_tra,ecrit_ISCCP
+         PRINT*,'physiq ecrit_ hf day mth reg tra ISCCP hf2mth',
+     .   ecrit_hf,ecrit_day,ecrit_mth,ecrit_reg,ecrit_tra,ecrit_ISCCP,
+     .   ecrit_hf2mth
 cIM 030306 END