Ignore:
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]
Location:
trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis1.inc

    r226 r234  
    55
    66
    7        CALL meso_inifis(ngridmx,nlayer,nqmx,dt, &
     7       CALL inifis(ngridmx,nlayer,        &
    88               wday_ini,wdaysec,                &
    99               wappel_phys,                     &
    1010               lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
     11               nqmx,dt,                                                &
    1112               womeg,wmugaz,                                           &
    1213               wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis2.inc

    r226 r234  
    88
    99       CASE(1)
    10        CALL meso_inifis(ngridmx,nlayer,nqmx,dt, &
     10       CALL inifis(ngridmx,nlayer, &
    1111               wday_ini,wdaysec,                &
    1212               wappel_phys,                     &
    1313               lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
     14               nqmx,dt,                                                &
    1415               womeg,wmugaz,                                           &
    1516               wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
     
    2728
    2829       CASE(2)
    29        CALL d2_meso_inifis(ngridmx,nlayer,nqmx,dt, &
     30       CALL d2_inifis(ngridmx,nlayer, &
    3031               wday_ini,wdaysec,                   &
    3132               wappel_phys,                        &
    3233               lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
     34               nqmx,dt,                                                &
    3335               womeg,wmugaz,                                           &
    3436               wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis3.inc

    r226 r234  
    88
    99       CASE(1)
    10        CALL meso_inifis(ngridmx,nlayer,nqmx,dt, &
     10       CALL inifis(ngridmx,nlayer, &
    1111               wday_ini,wdaysec,                &
    1212               wappel_phys,                     &
    1313               lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
     14               nqmx,dt,                                                &
    1415               womeg,wmugaz,                                           &
    1516               wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
     
    2627
    2728       CASE(2)
    28        CALL d2_meso_inifis(ngridmx,nlayer,nqmx,dt, &
     29       CALL d2_inifis(ngridmx,nlayer, &
    2930               wday_ini,wdaysec,                   &
    3031               wappel_phys,                        &
    3132               lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
     33               nqmx,dt,                                                &
    3234               womeg,wmugaz,                                           &
    3335               wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
     
    4446
    4547       CASE(3)
    46        CALL d3_meso_inifis(ngridmx,nlayer,nqmx,dt, &
     48       CALL d3_inifis(ngridmx,nlayer, &
    4749               wday_ini,wdaysec,                   &
    4850               wappel_phys,                        &
    4951               lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp,           &
     52               nqmx,dt,                                                &
    5053               womeg,wmugaz,                                           &
    5154               wyear_day,wperiheli,waphelie,wperi_day,wobliquit,       &
  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_physiq1.inc

    r226 r234  
    55
    66
    7        CALL meso_physiq (ngrid,nlayer,nq,                              &
     7       CALL physiq (ngrid,nlayer,nq,                              &
    88               firstcall,lastcall,pday,ptime,ptimestep,                &
    99               pplev,pplay,pphi,pu, pv, pt, pq, pw,                    &
  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_physiq2.inc

    r226 r234  
    88
    99       CASE(1)
    10        CALL meso_physiq (ngrid,nlayer,nq,                              &
     10       CALL physiq (ngrid,nlayer,nq,                              &
    1111               firstcall,lastcall,pday,ptime,ptimestep,                &
    1212               pplev,pplay,pphi,pu, pv, pt, pq, pw,                    &
     
    2020
    2121       CASE(2)
    22        CALL d2_meso_physiq (ngrid,nlayer,nq,                           &
     22       CALL d2_physiq (ngrid,nlayer,nq,                           &
    2323               firstcall,lastcall,pday,ptime,ptimestep,                &
    2424               pplev,pplay,pphi,pu, pv, pt, pq, pw,                    &
  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_physiq3.inc

    r226 r234  
    88
    99       CASE(1)
    10        CALL meso_physiq (ngrid,nlayer,nq,                              &
     10       CALL physiq (ngrid,nlayer,nq,                              &
    1111               firstcall,lastcall,pday,ptime,ptimestep,                &
    1212               pplev,pplay,pphi,pu, pv, pt, pq, pw,                    &
     
    2020
    2121       CASE(2)
    22        CALL d2_meso_physiq (ngrid,nlayer,nq,                              &
     22       CALL d2_physiq (ngrid,nlayer,nq,                              &
    2323               firstcall,lastcall,pday,ptime,ptimestep,                &
    2424               pplev,pplay,pphi,pu, pv, pt, pq, pw,                    &
     
    3232
    3333       CASE(3)
    34        CALL meso_physiq (ngrid,nlayer,nq,                              &
     34       CALL d3_physiq (ngrid,nlayer,nq,                              &
    3535               firstcall,lastcall,pday,ptime,ptimestep,                &
    3636               pplev,pplay,pphi,pu, pv, pt, pq, pw,                    &
Note: See TracChangeset for help on using the changeset viewer.