Changeset 1800
- Timestamp:
- Oct 19, 2017, 11:25:29 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.GENERIC/libf/phystd/phyredem.F90
r1621 r1800 95 95 tab_cntrl(29) = 0. 96 96 tab_cntrl(30) = 0. 97 98 97 ! Soil properties: 99 98 tab_cntrl(35) = volcapa ! soil volumetric heat capacity … … 203 202 endif!(ok_slab_ocean) 204 203 205 206 204 ! tracers 207 205 if (nq>0) then … … 210 208 enddo 211 209 endif ! of if (nq>0) 212 213 210 ! close file 214 211 CALL close_restartphy
Note: See TracChangeset
for help on using the changeset viewer.