Changeset 2208
- Timestamp:
- Feb 13, 2015, 1:42:13 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/cv3_routines.F90
r2205 r2208 3844 3844 3845 3845 ! qtc(il, i) = siga(il,i)*qnk(il)+(1.-siga(il,i))*qtment(il,i) ! cld 3846 3846 ! print*,'BIGAUSSIAN CONV',siga(il,i),sigment(il,i),qtc(il,i) 3847 3847 3848 3848 ELSE IF (iflag_clw==1) THEN ! cld
Note: See TracChangeset
for help on using the changeset viewer.