Changeset 2187 for LMDZ5/branches/testing/libf/phylmd/thermcell_plume.F90
- Timestamp:
- Jan 30, 2015, 2:57:13 PM (9 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 2159,2162,2166-2167,2169-2171,2177-2186
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/phylmd/thermcell_plume.F90
r2168 r2187 1160 1160 linter(ig)=(l*(f_star(ig,l+1)-f_star(ig,l)) & 1161 1161 & -f_star(ig,l))/(f_star(ig,l+1)-f_star(ig,l)) 1162 !print*,"linter plume", linter(ig) 1162 1163 ! print*,"linter plume", linter(ig) 1163 1164 zw2(ig,l+1)=0. 1164 1165 endif
Note: See TracChangeset
for help on using the changeset viewer.