Changeset 3903 for LMDZ6/trunk/libf


Ignore:
Timestamp:
May 18, 2021, 9:50:49 AM (3 years ago)
Author:
evignon
Message:

suppression du repertoire sisvat et nettoyage, deuxieme essai apres modifs
de JYG et plantage lie au bld.cfg

Location:
LMDZ6/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/pbl_surface_mod.F90

    r3901 r3903  
    12491249       DO i = 1, klon
    12501250          sollw(i,nsrf) = sollw_m(i) + 4.0*RSIGMA*ztsol(i)**3 * (ztsol(i)-ts(i,nsrf))
    1251 
    1252 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    1253 !         ! Martin
    1254 ! Apparently introduced for sisvat but not used
    1255 !         sollwd(i,nsrf)= sollwd_m(i)
    1256 !         ! Martin
    1257 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    1258 
    12591251!--OB this line is not satisfactory because alb is the direct albedo not total albedo
    12601252          solsw(i,nsrf) = solsw_m(i) * (1.-alb(i,nsrf)) / (1.-alb_m(i))

  • LMDZ6/trunk/libf/phylmd/surf_landice_mod.F90

    r3901 r3903  
    360360!****************************************************************************************
    361361! Send run-off on land-ice to coupler if coupled ocean.
    362 ! run_off_lic has been calculated in fonte_neige or surf_sisvat
     362! run_off_lic has been calculated in fonte_neige or surf_inlandsis
    363363!
    364364!****************************************************************************************
Note: See TracChangeset for help on using the changeset viewer.