Changeset 1669 for LMDZ5/branches/testing/libf/phylmd/cv3p_mixing.F
- Timestamp:
- Oct 16, 2012, 2:41:50 PM (12 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 1629-1633,1635,1637-1659,1666-1668
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/phylmd/cv3p_mixing.F
r1664 r1669 118 118 elij(i,k,j)=0.0 119 119 hent(i,k,j)=0.0 120 ment(i,k,j)=0.0121 sij(i,k,j)=0.0120 !AC! ment(i,k,j)=0.0 121 !AC! sij(i,k,j)=0.0 122 122 385 continue 123 123 390 continue 124 124 400 continue 125 126 !AC! 127 ment(1:ncum,1:nd,1:nd)=0.0 128 sij(1:ncum,1:nd,1:nd)=0.0 129 !AC! 125 130 126 131 do k=1,ntra
Note: See TracChangeset
for help on using the changeset viewer.