Changeset 4027 for LMDZ6/trunk/libf


Ignore:
Timestamp:
Nov 29, 2021, 8:28:27 AM (3 years ago)
Author:
Ehouarn Millour
Message:

Fix (temporary?) for isotopes, set threshold on qperemin to zero.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/libf/dyn3d_common/infotrac.F90

    r4005 r4027  
    4545  INTEGER, ALLOCATABLE, DIMENSION(:), SAVE    :: iqpere
    4646  REAL :: qperemin,masseqmin,ratiomin ! MVals et CRisi
    47   PARAMETER (qperemin=1e-16,masseqmin=1e-16,ratiomin=1e-16) ! MVals
     47  PARAMETER (qperemin=0.0,masseqmin=1e-16,ratiomin=1e-16) ! MVals
    4848
    4949! conv_flg(it)=0 : convection desactivated for tracer number it
Note: See TracChangeset for help on using the changeset viewer.