Changeset 2242 for trunk/LMDZ.TITAN/libf/muphytitan
- Timestamp:
- Feb 17, 2020, 5:44:12 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.TITAN/libf/muphytitan/mm_globals.f90
r1897 r2242 1066 1066 ! il faudrait peut etre revoir la gestion des zeros ici et la 1067 1067 ! remplacer par une valeur seuil des moments. 1068 ! 1069 !-> JVO 19 : Done. Zero threshold set at espilon from dynamics on the 1070 ! input moments in calmufi (safer than here). Might still be some unphysical 1071 ! values after the dynamics near the threshold. Could be a could idea to add 1072 ! a sanity check filtering too high values of radii. 1073 ! 1074 ! TBD : Add a sanity check for high radii ???? 1068 1075 WHERE(mm_m3aer_s > 0._mm_wp .AND. mm_m0aer_s > 0._mm_wp) 1069 1076 mm_rcs = mm_get_rcs(mm_m0aer_s,mm_m3aer_s)
Note: See TracChangeset
for help on using the changeset viewer.