Changeset 2069 for LMDZ5/trunk/libf/phylmd/physiq.F90
- Timestamp:
- Jun 20, 2014, 12:27:40 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/physiq.F90
r2068 r2069 1121 1121 endif 1122 1122 1123 do i = 1,klon1124 Ale_bl(i)=0.1125 Alp_bl(i)=0.1126 enddo1123 ! do i = 1,klon 1124 ! Ale_bl(i)=0. 1125 ! Alp_bl(i)=0. 1126 ! enddo 1127 1127 1128 1128 !================================================================================ … … 1986 1986 enddo 1987 1987 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 1988 1988 1989 1989 1990 endif
Note: See TracChangeset
for help on using the changeset viewer.