Parent Directory | Revision Log | Revision Graph | Patch
revision 1.8 by jmc, Tue Oct 18 16:03:55 2005 UTC | revision 1.9 by heimbach, Wed Jun 7 01:55:14 2006 UTC | |
---|---|---|
# | Line 52 C vFld :: velocity [m/s], meridio | Line 52 C vFld :: velocity [m/s], meridio |
52 | ||
53 | c vFld = vVel(i,j,k,bi,bj) | c vFld = vVel(i,j,k,bi,bj) |
54 | vFld = vTrans(i,j)*recip_dxG(i,j,bi,bj) | vFld = vTrans(i,j)*recip_dxG(i,j,bi,bj) |
55 | & *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) | & *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
56 | cfl=abs(vFld*deltaTloc*recip_dyC(i,j,bi,bj)) | cfl=abs(vFld*deltaTloc*recip_dyC(i,j,bi,bj)) |
57 | d0=(2. _d 0 -cfl)*(1. _d 0 -cfl)*oneSixth | d0=(2. _d 0 -cfl)*(1. _d 0 -cfl)*oneSixth |
58 | d1=(1. _d 0 -cfl*cfl)*oneSixth | d1=(1. _d 0 -cfl*cfl)*oneSixth |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |