Changeset 21 for trunk/mesoscale/LMD_LES_MARS

Timestamp:

Jan 24, 2011, 7:23:53 PM (14 years ago)

Author:

aslmd

Message:

spiga:fichiers def LES (test depuis ciclad)

Location:

trunk/mesoscale/LMD_LES_MARS/modif_mars

Files:

• DEF (added)
• DEF/A_START10.tar.gz (added)
• DEF/A_START10_REAL.tar.gz (added)
• DEF/A_START8_REAL.tar.gz (added)
• DEF/A_START8_REAL_highres.tar.gz (added)
• DEF/B_START8.tar.gz (added)
• DEF/B_START8_REAL.tar.gz (added)
• DEF/B_START8_REAL_highres.tar.gz (added)
• DEF/C_START10_REAL.tar.gz (added)
• DEF/C_START8.tar.gz (added)
• DEF/C_START8_REAL.tar.gz (added)
• DEF/C_START8_REAL_145-145-101.gz (added)
• DEF/C_START8_REAL_20kmtop.tar.gz (added)
• DEF/C_START8_REAL_highres.tar.gz (added)
• DEF/C_START8_REAL_low_ck.tar.gz (added)
• DEF/C_START8_hightop.tar.gz (added)
• DEF/GUSEV.tar.gz (added)
• DEF/I_START10.tar.gz (added)
• DEF/I_START8.tar.gz (added)
• DEF/I_START8_145-145-101.tar.gz (added)
• DEF/I_START8_REAL.tar.gz (added)
• DEF/I_START8_REAL_highres.tar.gz (added)
• DEF/I_START8_WINDS.tar.gz (added)
• DEF/MERIDIANI.tar.gz (added)
• DEF/MERIDIANI_DUST.tar.gz (added)
• DEF/REAL_100m_101_101_151_15km_case_C.tar.gz (added)
• DEF/REAL_100m_101_101_201_15km_case_C.tar.gz (added)
• DEF/REAL_100m_181_181_201_15km_case_A.tar.gz (added)
• DEF/REAL_100m_181_181_201_15km_case_C.tar.gz (added)
• DEF/REAL_100m_241_241_151_15km_case_C.tar.gz (added)
• DEF/REAL_100m_73_73_151_15km_case_C.tar.gz (added)
• DEF/REAL_100m_73_73_201_15km_case_C.tar.gz (added)
• DEF/REAL_50m_145_145_201_12km_case_C.tar.gz (added)
• DEF/REAL_50m_145_145_251_10km_case_C.tar.gz (added)
• DEF/REAL_50m_181_181_201_12km_case_C.tar.gz (added)
• dimphys.h (modified) (1 diff)
• module_lmd_driver_output1.inc (modified) (1 diff)
• module_lmd_driver_output2.inc (modified) (1 diff)
• module_lmd_driver_output3.inc (modified) (1 diff)
• module_lmd_driver_output4.inc (modified) (1 diff)
• wrf_output_2d.h (modified) (1 diff)

trunk/mesoscale/LMD_LES_MARS/modif_mars/dimphys.h

@@ -3 +3 @@
 
 
-         INTEGER, parameter :: wiim=72
-         INTEGER, parameter :: wjjm=72
-         INTEGER, PARAMETER :: ngridmx=5184
+         INTEGER, parameter :: wiim=36
+         INTEGER, parameter :: wjjm=36
+         INTEGER, PARAMETER :: ngridmx=1296
          INTEGER, parameter :: nlayermx=200
          INTEGER, PARAMETER :: nsoilmx=10

trunk/mesoscale/LMD_LES_MARS/modif_mars/module_lmd_driver_output1.inc

@@ -1 +1 @@
        TSURF,&
-       TAU_DUST,&
-       SWDOWNZ,&
-       LWDOWNZ,&
-       USTM,&
-       HFX,&

trunk/mesoscale/LMD_LES_MARS/modif_mars/module_lmd_driver_output2.inc

@@ -1 +1 @@
 REAL, DIMENSION( ims:ime, jms:jme ), INTENT(INOUT)  :: &
        TSURF,&
-       TAU_DUST,&
-       SWDOWNZ,&
-       LWDOWNZ,&
-       USTM,&
-       HFX,&
    PSFC,TSK
 REAL, DIMENSION( ims:ime, kms:kme, jms:jme ), INTENT(OUT)  :: &

trunk/mesoscale/LMD_LES_MARS/modif_mars/module_lmd_driver_output3.inc

@@ -1 +1 @@
 TSURF(i,j) = output_tab2d(subs,ind_TSURF)
-TAU_DUST(i,j) = output_tab2d(subs,ind_TAU_DUST)
-SWDOWNZ(i,j) = output_tab2d(subs,ind_SWDOWNZ)
-LWDOWNZ(i,j) = output_tab2d(subs,ind_LWDOWNZ)
-USTM(i,j) = output_tab2d(subs,ind_USTM)
-HFX(i,j) = output_tab2d(subs,ind_HFX)

trunk/mesoscale/LMD_LES_MARS/modif_mars/module_lmd_driver_output4.inc

@@ -1 +1 @@
   &    ,TSURF=grid%TSURF   &
-  &    ,TAU_DUST=grid%TAU_DUST   &
-  &    ,SWDOWNZ=grid%SWDOWNZ   &
-  &    ,LWDOWNZ=grid%LWDOWNZ   &
-  &    ,USTM=grid%USTM   &
-  &    ,HFX=grid%HFX   &

trunk/mesoscale/LMD_LES_MARS/modif_mars/wrf_output_2d.h

@@ -3 +3 @@
 !-------------------
       INTEGER, PARAMETER :: ind_TSURF = 1
-      INTEGER, PARAMETER :: ind_TAU_DUST = 2
-      INTEGER, PARAMETER :: ind_SWDOWNZ = 3
-      INTEGER, PARAMETER :: ind_LWDOWNZ = 4
-      INTEGER, PARAMETER :: ind_USTM = 5
-      INTEGER, PARAMETER :: ind_HFX = 6
-      INTEGER, PARAMETER :: n2d = 6
+      INTEGER, PARAMETER :: n2d = 1