Changeset 3163


Ignore:
Timestamp:
Dec 19, 2023, 5:17:31 PM (12 months ago)
Author:
csegonne
Message:

MARS PCM
Little bug fix with missing arguments for vdifcd that were added in r3153

Location:
trunk/LMDZ.MARS
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.MARS/changelog.txt

    r3162 r3163  
    44144414* A new call to vdifcd is done with updated winds (after inversion of wind u and wind v and before inversion of the potential temperature h) and zcdv / zcdh are also updated. It matches with what is done in the generic model.
    44154415* Old commented lines with a call to vdifcd at the begining of the tracers part of vdifc_mod have been removed.
     4416
     4417== 19/12/2023 == CS
     4418Little bug fix with missing arguments for vdifcd that were added in r3153
  • trunk/LMDZ.MARS/libf/phymars/vdifc_mod.F

    r3162 r3163  
    601601c -------------------------------------------
    602602
    603       CALL vdif_cd(ngrid,nlay,pz0,g,pzlay,zu,zv,wstar,ptsrf_tmp
    604      &          ,zh,zcdv_true,zcdh_true)
     603      CALL vdif_cd(ngrid,nlay,pz0,g,pzlay,pplay,pu,pv,wstar,ptsrf_tmp,
     604     &          ph,virtual,mmean(:,1),zq(:,:,igcm_h2o_vap),
     605     &          pqsurf(:,igcm_h2o_ice,major_slope(:)),
     606     &          zcdv_true,zcdh_true)
    605607
    606608      zu2(:)=zu(:,1)*zu(:,1)+zv(:,1)*zv(:,1)         
Note: See TracChangeset for help on using the changeset viewer.