Changeset 5927 for LMDZ6/trunk/libf/dyn3dmem
- Timestamp:
- Dec 12, 2025, 5:26:10 PM (5 weeks ago)
- File:
-
- 1 edited
-
LMDZ6/trunk/libf/dyn3dmem/dynetat0_loc.f90 (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/dyn3dmem/dynetat0_loc.f90
r5748 r5927 27 27 28 28 USE dimensions_mod, ONLY: iim, jjm, llm, ndm 29 USE paramet_mod_h 30 IMPLICIT NONE 31 32 33 !=============================================================================== 29 USE paramet_mod_h 30 31 IMPLICIT NONE 32 33 34 !=============================================================================== 34 35 ! Arguments: 35 36 CHARACTER(LEN=*), INTENT(IN) :: fichnom !--- FILE NAME … … 188 189 tnat = 1.0 189 190 alpha_ideal = 1.0 190 CALL msg(' !!! Beware: alpha_ideal put to 1 !!!', modname)191 CALL msg(' !!! Beware: tnat and alpha_ideal put to 1 !!!', modname) 191 192 ELSE 192 193 SELECT CASE(isoName(iName))
Note: See TracChangeset
for help on using the changeset viewer.
