Changeset 1068 for LMDZ4/trunk/libf
- Timestamp:
- Dec 17, 2008, 2:31:57 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/phylmd/physiq.F
r1067 r1068 1827 1827 CALL zenang(zlongi,gmtime,zdtime,rlat,rlon,rmu0,fract) 1828 1828 ELSE 1829 rmu0 = -999.9991829 CALL angle(zlongi, rlat, fract, rmu0) 1830 1830 ENDIF 1831 1831 … … 2979 2979 cool=0. 2980 2980 endif 2981 2982 2981 2983 2982 c
Note: See TracChangeset
for help on using the changeset viewer.