Changeset 24 for LMDZ.3.3/trunk


Ignore:
Timestamp:
Jan 19, 2000, 9:56:51 AM (24 years ago)
Author:
lmdz
Message:

Le relief etait transforme en geopotentiel au mauvais endroit. G Krinner

Location:
LMDZ.3.3/trunk/libf/dyn3d
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ.3.3/trunk/libf/dyn3d/etat0_netcdf.F

    r11 r24  
    175175      phis(:,:) = 0.0
    176176      CALL startget(varname, iip1, jjp1, rlonv, rlatu, phis, 0.0)
    177       phis = phis * 9.81
    178177      !
    179178      varname = 'u'

  • LMDZ.3.3/trunk/libf/dyn3d/startvar.F

    r19 r24  
    316316     . iml-1, jml, lon_in, lat_in,
    317317     . phis, relief, zstd, zsig, zgam, zthe, zpic, zval, tmp_int)
     318      phis = phis * 9.81
    318319    !
    319320      masque(:,:) = FLOAT(tmp_int(:,:))
Note: See TracChangeset for help on using the changeset viewer.