Changeset 51

Timestamp:

Jan 29, 2011, 4:43:11 AM (14 years ago)

Author:

aslmd

Message:

LMD_MM_MARS avec nouvelle physique entierement interfacee avec LMDZ.MARS

---

M mars/libf/phymars/dimradmars.h
M mars/libf/phymars/callradite.F

simples changements pour faire tourner un cas test

• dust conrath
• un seul traceur

un petit domaine splitting de plus

A mesoscale/TESTS/LMD_MM_MARS_FASTCASEnewphys.tar.gz

cas test du mesochelle avec la nouvelle physique
essai concluant !

M mesoscale/NOTES.txt
M mesoscale/LMD_MM_MARS/prepare_ini
M chantiers/commit_importants.log

MAJ notes

M mesoscale/LMD_MM_MARS/SRC/WRFV2/dyn_em/module_initialize_real.F

correctif pour le cas ou on tourne avec d'anciens diagfi avec 10 niveaux
dans le sol seulement. si tsoil < 20 K (disons) dans un niveau donne, alors
tsoil est regle a la temperature du niveau superieur.

D mesoscale/COMMON_GCM/gr_fi_dyn.F
D mesoscale/COMMON_GCM/diff_oldgcm_oldmeso_checked
D mesoscale/COMMON_GCM/meso_dustlift.txt
D mesoscale/COMMON_GCM/dimradmars.txt
D mesoscale/COMMON_GCM/nocompile.txt
D mesoscale/COMMON_GCM/meso_callkeys.txt
D mesoscale/COMMON_GCM/dimradmars.h

menage

Location:

trunk

Files:

• chantiers/commit_importants.log (modified) (1 diff)
• mars/libf/phymars/callradite.F (modified) (1 diff)
• mars/libf/phymars/dimradmars.h (modified) (3 diffs)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/dyn_em/module_initialize_real.F (modified) (1 diff)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm (moved) (moved from trunk/mesoscale/COMMON_GCM)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/diff_oldgcm_oldmeso_checked (deleted)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/dimradmars.h (deleted)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/dimradmars.txt (deleted)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/gr_fi_dyn.F (deleted)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/meso_callkeys.txt (deleted)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/meso_dustlift.txt (deleted)
• mesoscale/LMD_MM_MARS/SRC/WRFV2/mars_lmd_new/tools_compgcm/nocompile.txt (deleted)
• mesoscale/LMD_MM_MARS/prepare_ini (modified) (1 diff)
• mesoscale/NOTES.txt (modified) (1 diff)
• mesoscale/TESTS/LMD_MM_MARS_FASTCASEnewphys.tar.gz (added)

trunk/chantiers/commit_importants.log

@@ -301 +301 @@
 - Avec ces modifs, la compilation marche sans physque, avec ou sans ioipsl
   et avec la physique terrestre phylmd.
- 
+
+********************************************
+**** commit_v51 (et quelques autres...) ****
+********************************************
+
+29/01/2011 --- A. SPIGA
+
+Nouveautes LMD_MM_MARS - LMD_LES_MARS - LMDZ.MARS [dossier mars]
+
+Ce commit fait le bilan des chantiers d'uniformisation des diverses sources du mesochelle
+[tous les commits par "spiga" depuis le debut sont relatifs a ces chantiers]
+
+Chantiers acheves avec compilation et execution testees:
+
+1. le meme coeur dynamique peut maintenant etre compile avec ancienne ou nouvelle physique; option -p sur makemeso.
+
+2. la meme interface module_lmd_driver est partagee par LMD_MM_MARS et LMD_LES_MARS
+
+3. le meme libf est partage entre modele mesoechelle et gcm
+   les quelques routines qui different sont notees meso_ et integrees aux sources du gcm
+
+=====> De 4 version du modele + 1 version de la nouvelle physique, on passe a une seule version du modele
+meso-echelle dont la physique est automatiquement indexee sur les modifications effectuees dans le GCM 
+[quelques routines mesoechelle mises a part]
+
+* Reste a tester LMD_LES_MARS avec la nouvelle physique. Modifications mineures attendues suite au point 2. 
+* Reste a tester le nesting qui devrait induire des modifications dues a des lignes trop longues... ce sera transparent du point de vue GCM.
+
+

trunk/mars/libf/phymars/callradite.F

@@ -263 +263 @@
 c        PLEASE MAKE SURE that you set up the right number of
 c          scatterers in dimradmars.h (naerkind);
-c        name_iaer(1) = "dust_conrath"
-         name_iaer(1) = "dust_doubleq"
-c        name_iaer(2) = "dust_submicron"
-         name_iaer(2) = "h2o_ice"
+         name_iaer(1) = "dust_conrath"
+c        name_iaer(1) = "dust_doubleq"
+cc        name_iaer(2) = "dust_submicron"
+c         name_iaer(2) = "h2o_ice"
 c        ----------------------------------------------------------
 

trunk/mars/libf/phymars/dimradmars.h

@@ -15 +15 @@
       INTEGER  NFLEV,NDLON,NDLO2,ndomainsz
 
-      parameter (ndomainsz=ngridmx)
-!     parameter (ndomainsz=(ngridmx-1)/20 + 1)
-!     parameter (ndomainsz=(ngridmx-1)/5 + 1) 
+!      parameter (ndomainsz=ngridmx)
+      parameter (ndomainsz=(ngridmx-1)/20 + 1)
+!      parameter (ndomainsz=(ngridmx-1)/5 + 1) 
 
       parameter (NFLEV=nlayermx,NDLON=ndomainsz) ! avec decoupage
@@ -27 +27 @@
 ! (ex: naerkind=2 if you use one dust mode and active ice ...)
       integer naerkind
-      parameter (naerkind=2)
+      parameter (naerkind=1)
+!      parameter (naerkind=2)
 
 ! Reference wavelengths used to compute reference optical depth (m)
@@ -76 +77 @@
 
       INTEGER, PARAMETER :: nsizemax = 60
-!     INTEGER, PARAMETER :: nsizemax = 1
+!      INTEGER, PARAMETER :: nsizemax = 1
 
 ! Various initialisation for LW radiative code

trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/dyn_em/module_initialize_real.F

@@ -330 +330 @@
                                        !! grid%mars_isoil(i,k+1,j) is defined to large-scale value grid%em_isoil_gc   
                    ENDIF        
+                ENDIF
+                IF (grid%mars_tsoil(i,k,j) .lt. 20.) THEN  !!! une securite pour les anciens diagfi qui n'ont que 10 niveaux
+                   IF (k .ne. 1) grid%mars_tsoil(i,k,j) = grid%mars_tsoil(i,k-1,j)
                 ENDIF
                 !!!!!!!!!!!!!!!!! DONE in soil_setting.F

trunk/mesoscale/LMD_MM_MARS/prepare_ini

@@ -6 +6 @@
 # Author: Aymeric Spiga - November 2008 #
 #---------------------------------------#
+
+
+echo "If you use new physics, few modifications will be needed"
 
 

trunk/mesoscale/NOTES.txt

@@ -3 +3 @@
 - passer aux nouveaux makegcm [en commun avec Ehouarn si on veut le nouveau
   readtesassim qui est en F90]
-- lier gr_fi_dyn qui est dans dyn3d
-- regler le pb du nouveau readtesassim (ou alors le lier tout simplement ou
-  l'appeler meso_readtesassim)
-- regler le pb meso_dustlift (le lier dans makemeso comme point precedent)
 - il faut tester le nest pour verifier les lignes trop longues
 
+(ok) lier gr_fi_dyn qui est dans dyn3d
+(ok) regler le pb du nouveau readtesassim (ou alors le lier tout simplement ou
+  l'appeler meso_readtesassim)
+(ok) regler le pb meso_dustlift (le lier dans makemeso comme point precedent)
+     (car le souci c que dustlift est appele dans vdifc)
 
 RESTE a ADAPTER le LES a la NOUVELLE PHYSIQUE