Changeset 2179 for LMDZ5/trunk/libf

Timestamp:

Jan 10, 2015, 1:58:32 AM (10 years ago)

Author:

fhourdin

Message:

Désactivation des ondes de gravité non orographique en mode uni colonne.XX
Desactivation of non orographic gravity waves in SCM configurations.

File:

• LMDZ5/trunk/libf/phylmd/conf_phys_m.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/conf_phys_m.F90

@@ -27 +27 @@
     USE phys_cal_mod
     USE carbon_cycle_mod, ONLY : carbon_cycle_tr, carbon_cycle_cpl
-    use control_mod
+    USE control_mod
+    USE mod_grid_phy_lmdz, only: klon_glo
+
+
 
     include "conema3.h"
@@ -1728 +1731 @@
 
     ok_gwd_rando_omp = .FALSE.
-    CALL getin('ok_gwd_rando', ok_gwd_rando_omp)
+    IF ( klon_glo == 1 ) THEN
+       print*,'La parametrisation des ondes de gravites non orographiques'
+       print*,'ne fonctionne pas en 1D'
+    ELSE
+       CALL getin('ok_gwd_rando', ok_gwd_rando_omp)
+    ENDIF
 
     GWD_RANDO_RUWMAX_omp = 0.01