Changeset 3435
- Timestamp:
- Sep 23, 2024, 4:08:03 PM (2 months ago)
- Location:
- trunk/LMDZ.GENERIC
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.GENERIC/changelog.txt
r3429 r3435 1977 1977 Minor fix following last updates, only fetch slab ocean variables to put 1978 1978 in the restart file if using the slab ocean. 1979 1980 == 23/09/2024 == ALS 1981 Bug fix in the Thermal Plume Model for generic tracers. 1982 Error in computation of potential temperature. -
trunk/LMDZ.GENERIC/libf/phystd/thermcell_env.F90
r3342 r3435 133 133 134 134 RV_generic = (8.314511*1000.)/(epsi_generic*mugaz) 135 RETV_generic = RV_generic/ (r-1.)135 RETV_generic = RV_generic/r-1. 136 136 RLvCp_generic = RLVTT_generic/cpp 137 137 -
trunk/LMDZ.GENERIC/libf/phystd/thermcell_plume.F90
r3342 r3435 145 145 ELSEIF (generic_condensation .AND. .NOT. water ) THEN 146 146 RV_generic = (8.314511*1000.)/(epsi_generic*mugaz) 147 RETV_comp = RV_generic/ (r-1.)147 RETV_comp = RV_generic/r-1. 148 148 RLvCp_comp = RLVTT_generic/cpp 149 149 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.