Changeset 3980 for trunk/LMDZ.COMMON/libf/evolution/stopping_crit_mod.F90
- Timestamp:
- Nov 28, 2025, 5:38:44 PM (2 days ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.COMMON/libf/evolution/stopping_crit_mod.F90
r3977 r3980 247 247 integer :: i, islope ! Loop 248 248 !======================================================================= 249 ! Checks to escape the subroutine 249 ! Checks to escape the subroutine (adjusment not relevant in 1D or if the PEM should stop already) 250 250 if (ngrid == 1 .or. stopCrit%stop_code() > 0) then 251 251 S_atm_2_h2o = 1.
Note: See TracChangeset
for help on using the changeset viewer.
