Changeset 234 for trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis3.inc

Timestamp:

Jul 19, 2011, 5:25:58 PM (13 years ago)

Author:

aslmd

Message:

LMDZ.MARS
+ MESOSCALE

• An important change to merge physiq.F and inifis.F for GCM and mesoscale
• This is mostly transparent to GCM users and developers (use of MESOSCALE precompiler flags)
• Makes it easy (and mostly automatic!) for changes in GCM physics to be impacted in mesoscale physics
• A few minor changes have followed in the GCM (slope scheme, one-point diagnostic).

• Compilation + run is OK on both sides (GCM and mesoscale).
• On the mesoscale side, call_meso_physiq?.inc and call_meso_inifis?.inc have been changed accordingly.

Here is the excerpt from README file:

19/07/2011 == AS

• Finished converging meso_physiq.F and meso_inifis.F towards physiq.F and inifis.F --> see previous point 15/07/2011 --> meso_ routines no longer exist (everything is in meso_inc and transparent to GCM users) --> GCM routines include mesoscale parts within MESOSCALE precompiler commands --> MESOSCALE parts are as hidden as possible not to mess up with GCM users/developers
• Cleaned inelegant or useless #ifdef [or] #ifndef MESOSCALE in physiq and inifis so that a minimum amount of such precompiler commands is now reached [mainly related to I/O]
• Added the SF08 slope insolation model in the general physics parameterizations. Added a callslope keyword in inifis.F and callkeys.h --> This keyword is False by default / True if you use -DMESOSCALE
• Removed the obsolete call to Viking Lander 1 diagnostic Replaced it with a diagnostic for opacity at the domain center [valid for GCM and mesoscale]

File:

• trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis3.inc (modified) (3 diffs)

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis3.inc

@@ -8 +8 @@
 
        CASE(1)
-       CALL meso_inifis(ngridmx,nlayer,nqmx,dt, &
+       CALL inifis(ngridmx,nlayer, &
                wday_ini,wdaysec,                &
                wappel_phys,                     &
                lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
+               nqmx,dt,                                                &
                womeg,wmugaz,                                           &
                wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
@@ -26 +27 @@
 
        CASE(2)
-       CALL d2_meso_inifis(ngridmx,nlayer,nqmx,dt, &
+       CALL d2_inifis(ngridmx,nlayer, &
                wday_ini,wdaysec,                   &
                wappel_phys,                        &
                lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
+               nqmx,dt,                                                &
                womeg,wmugaz,                                           &
                wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
@@ -44 +46 @@
 
        CASE(3)
-       CALL d3_meso_inifis(ngridmx,nlayer,nqmx,dt, &
+       CALL d3_inifis(ngridmx,nlayer, &
                wday_ini,wdaysec,                   &
                wappel_phys,                        &
                lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
+               nqmx,dt,                                                &
                womeg,wmugaz,                                           &
                wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &