Parent Directory | Revision Log | Revision Graph | Patch
revision 1.5 by jmc, Mon Jun 19 14:40:43 2006 UTC | revision 1.6 by jmc, Tue Dec 5 22:21:50 2006 UTC | |
---|---|---|
# | Line 63 CEOP | Line 63 CEOP |
63 | DO i=1-Olx+1,sNx+Olx | DO i=1-Olx+1,sNx+Olx |
64 | ||
65 | uLoc = uFld(i,j) | uLoc = uFld(i,j) |
66 | c uLoc = uTrans(i,j)*recip_dyG(i,j,bi,bj) | uCFL = ABS( uLoc*deltaTloc |
67 | c & *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) | & *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
uCFL = ABS(uLoc*deltaTloc*recip_dxC(i,j,bi,bj)) | ||
68 | ||
69 | c uT(i,j) = | c uT(i,j) = |
70 | c & uTrans(i,j)*(tracer(i-1,j)+tracer(i,j))*0.5 _d 0 | c & uTrans(i,j)*(tracer(i-1,j)+tracer(i,j))*0.5 _d 0 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |