Ignore:
Timestamp:
Feb 12, 2025, 12:03:26 PM (3 days ago)
Author:
jbclement
Message:

PEM:
Few small adjustments in the code.
JBC

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.COMMON/libf/evolution/recomp_tend_mod.F90

    r3610 r3620  
    8989real, parameter :: zcdv = 0.0325     ! Drag coefficient
    9090
    91 write(*,*) "> Updating the H2O tendency due to lag layer"
    92 
    9391! Higher resistance due to growing lag layer (higher depth)
    9492Rz_old = icetable_depth_old*zcdv/coef_diff ! Old resistance from PCM
Note: See TracChangeset for help on using the changeset viewer.