Changeset 1157 for trunk


Ignore:
Timestamp:
Jan 11, 2014, 10:04:06 AM (11 years ago)
Author:
aslmd
Message:

LMDZ.GENERIC. came back on the fact that tsurf is not updated if nosurf is true. left to be decided in the team.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/phystd/physiq.F90

    r1152 r1157  
    13491349!-----------------------------------------------------------------------
    13501350
    1351       if (.not.nosurf) then
    1352 
    13531351!     Increment surface temperature
    13541352      tsurf(1:ngrid)=tsurf(1:ngrid)+ptimestep*zdtsurf(1:ngrid)
    … …  
    13591357                ptimestep,tsurf,tsoil,capcal,fluxgrd)
    13601358      endif
    1361 
    1362       endif ! if (.not.nosurf)
    13631359
    13641360!-------------------------
Note: See TracChangeset for help on using the changeset viewer.