File |
Line number |
Procedure |
Code |
./pkg/ggl90/ggl90_calc.F |
111 |
GGL90_CALC |
_RL recip_hFacI(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/ggl90/ggl90_calc.F |
158 |
GGL90_CALC |
recip_hFacI(I,J,K)=0. _d 0 |
./pkg/ggl90/ggl90_calc.F |
160 |
GGL90_CALC |
& recip_hFacI(I,J,K)=1. _d 0/hFac |
./pkg/ggl90/ggl90_calc.F |
209 |
GGL90_CALC |
& bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_calc.F |
412 |
GGL90_CALC |
& *recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
470 |
GGL90_CALC |
& * recip_hFacI(i,j,k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
596 |
GGL90_CALC |
a3d(i,j,k) = a3d(i,j,k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
597 |
GGL90_CALC |
c3d(i,j,k) = c3d(i,j,k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
10 |
GGL90_IDEMIX |
I bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_idemix.F |
230 |
GGL90_IDEMIX |
& *recip_hFacI(i,j,kbottom) |
./pkg/ggl90/ggl90_idemix.F |
279 |
GGL90_IDEMIX |
& *recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
332 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
345 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
374 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
378 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
394 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
402 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
414 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
419 |
GGL90_IDEMIX |
& *recip_drC(k)*recip_hFacI(i,j,k) |
./pkg/ggl90/ggl90_idemix.F |
50 |
GGL90_IDEMIX |
_RL recip_hFacI(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |