Changeset 1706 for LMDZ5/trunk/libf
- Timestamp:
- Jan 9, 2013, 3:25:58 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phy1d/lmdz1d.F
r1649 r1706 711 711 !--------------------------------------------------------------------- 712 712 713 fcoriolis=2.*sin(rpi* rlat(1)/180.)*romega713 fcoriolis=2.*sin(rpi*xlat/180.)*romega 714 714 715 715 if (forcing_radconv) then
Note: See TracChangeset
for help on using the changeset viewer.