source: trunk/LMDZ.MARS/libf/phymars/surfdat.h @ 259

Last change on this file since 259 was 226, checked in by aslmd, 14 years ago

MESOSCALE/LMDZ.MARS.new
--> modified to impact last changes

MESOSCALE/LMD_MM_MARS/makemeso
MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_physiq?.inc
MESOSCALE/LMD_MM_MARS/SRC/WRFV2/call_meso_inifis?.inc
MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F
--> modified to get rid of ecri_phys

and make changes related to meso_physiq and meso_inifis

LMDZ.MARS/libf/phymars
--> see LMDZ.MARS/README

15/07/2011 == AS

  • Modified the mesoscale part so that the previous change by EM does not imply an error in the mesoscale case. More development is needed though to get the "varying z0" capability in the mesoscale model.
  • Worked on versions of meso_physiq and meso_inifis as close as possible to physiq and inifis for more continuity in the process of impacting changes (and even possibly to reach a common version of physiq and inifis).

    The main point is to make the mesoscale significant specific parts

    coded into include files in meso_inc so that meso_physiq and meso_inifis looks very close to physiq and inifis.

    This is completely transparent for GCM users who does not need the

    contents of meso_inc.
  • Slight cosmetic changes to physiq.f and inifis.F --- some of them e.g. to prepare convergence between meso_physiq and physiq
File size: 1.2 KB
RevLine 
[38]1      COMMON/surfdat/albedodat(ngridmx),                                &
2     &   phisfi(ngridmx),albedice(2),emisice(2),emissiv,                &
3     &   TESice_Ncoef,TESice_Scoef,                                     &
4     &   iceradius(2) , dtemisice(2),                                   &
5     &   zmea(ngridmx),zstd(ngridmx),                                   &
[224]6     &   zsig(ngridmx),zgam(ngridmx),zthe(ngridmx),                     &
7     &   z0(ngridmx),z0_default
[38]8
9      COMMON/surfdatl/TESicealbedo
10
11      real albedodat ! albedo of bare ground
12      real phisfi ! geopotential at ground level
13      real albedice ! default albedo for ice (1: North H. 2: South H.)
14      real emisice ! ice emissivity; 1:Northern hemisphere 2:Southern hemisphere
15      real emissiv ! emissivity of bare ground
16      logical TESicealbedo ! use TES ice cap albedoes (if set to .true.)
17      real TESice_Ncoef ! coefficient for TES ice albedo in Northern hemisphere
18      real TESice_Scoef ! coefficient for TES ice albedo in Southern hemisphere
19      real iceradius , dtemisice
20      real zmea,zstd,zsig,zgam,zthe
[226]21      real z0 ! surface roughness length (m)
[224]22      real z0_default ! default (constant over planet) surface roughness (m)
Note: See TracBrowser for help on using the repository browser.