Parent Directory | Revision Log | Revision Graph | Patch
revision 1.12 by adcroft, Mon Jun 1 22:27:14 1998 UTC | revision 1.13 by adcroft, Mon Jun 8 18:45:28 1998 UTC | |
---|---|---|
# | Line 261 C-- Calculate iso-neutral slopes for | Line 261 C-- Calculate iso-neutral slopes for |
261 | I myThid ) | I myThid ) |
262 | C-- Calculate static stability and mix where convectively unstable | C-- Calculate static stability and mix where convectively unstable |
263 | CALL CONVECT( | CALL CONVECT( |
264 | I bi,bj,iMin,iMax,jMin,jMax,K,rhoKm1,rhoKp1, | I bi,bj,iMin,iMax,jMin,jMax,K,rhotmp,rhoKp1, |
265 | I myTime,myIter,myThid) | I myTime,myIter,myThid) |
266 | C-- Density of K-1 level (above W(K)) reference to K-1 level | C-- Density of K-1 level (above W(K)) reference to K-1 level |
267 | CALL FIND_RHO( | CALL FIND_RHO( |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |