File |
Line number |
Procedure |
Code |
./pkg/mom_vecinv/mom_vecinv.F |
140 |
MOM_VECINV |
uCf(i,j) = 0. |
./pkg/mom_vecinv/mom_vecinv.F |
381 |
MOM_VECINV |
& uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
386 |
MOM_VECINV |
& uCf,vCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
390 |
MOM_VECINV |
gU(i,j,k,bi,bj) = uCf(i,j) - phxFac*dPhiHydX(i,j) |
./pkg/mom_vecinv/mom_vecinv.F |
396 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('fV','I10',1,uCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
401 |
MOM_VECINV |
CALL MNC_CW_RL_W_OFFSET('D','mom_vi',bi,bj, 'fV', uCf, |
./pkg/mom_vecinv/mom_vecinv.F |
421 |
MOM_VECINV |
& uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
424 |
MOM_VECINV |
& uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
427 |
MOM_VECINV |
& uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
430 |
MOM_VECINV |
& uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
434 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
./pkg/mom_vecinv/mom_vecinv.F |
458 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('zV','I10',1,uCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
463 |
MOM_VECINV |
CALL MNC_CW_RL_W_OFFSET('D','mom_vi',bi,bj, 'zV', uCf, |
./pkg/mom_vecinv/mom_vecinv.F |
476 |
MOM_VECINV |
CALL TIMEAVE_CUMUL_1K1T(vZetatave,uCf,deltaTClock, |
./pkg/mom_vecinv/mom_vecinv.F |
484 |
MOM_VECINV |
CALL MOM_VI_U_VERTSHEAR(bi,bj,K,uVel,wVel,uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
487 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
./pkg/mom_vecinv/mom_vecinv.F |
499 |
MOM_VECINV |
CALL MOM_VI_U_GRAD_KE(bi,bj,K,KE,uCf,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
502 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
./pkg/mom_vecinv/mom_vecinv.F |
513 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('KEx','I10',1,uCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
518 |
MOM_VECINV |
CALL MNC_CW_RL_W_OFFSET('D','mom_vi',bi,bj, 'KEx', uCf, |
./pkg/mom_vecinv/mom_vecinv.F |
75 |
MOM_VECINV |
_RL uCf (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |