Changeset 1635 for trunk/LMDZ.MARS/libf/phymars
- Timestamp:
- Nov 29, 2016, 8:19:05 AM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/physiq_mod.F
r1629 r1635 2220 2220 !state real RICE ikj misc 1 - h "RICE" "ICE RADIUS" "m" 2221 2221 comm_RICE(1:ngrid,1:nlayer) = rice(1:ngrid,1:nlayer) 2222 2222 if (co2clouds) then 2223 comm_RICE(1:ngrid,1:nlayer) = riceco2(1:ngrid,1:nlayer) 2224 endif 2223 2225 2224 2226 !! calculate sensible heat flux in W/m2 for outputs
Note: See TracChangeset
for help on using the changeset viewer.