| File |
Line number |
Procedure |
Code |
|
./model/src/ini_cori.F |
106 |
INI_CORI |
CALL READ_REC_XY_RS( 'fCorCs.bin', fCoriCos,1, 0, myThid ) |
|
./model/src/ini_cori.F |
131 |
INI_CORI |
_EXCH_XY_R4(fCoriCos,myThid) |
|
./model/src/ini_cori.F |
166 |
INI_CORI |
CALL MON_PRINTSTATS_RS(1,fCoriCos,'fCoriCos',myThid) |
|
./model/src/ini_cori.F |
50 |
INI_CORI |
fCoriCos(i,j,bi,bj)=0. _d 0 |
|
./model/src/ini_cori.F |
66 |
INI_CORI |
fCoriCos(i,j,bi,bj)=0. _d 0 |
|
./model/src/ini_cori.F |
82 |
INI_CORI |
fCoriCos(i,j,bi,bj)= |
|
./model/src/ini_cori.F |
99 |
INI_CORI |
fCoriCos(i,j,bi,bj)=0. _d 0 |
|
./pkg/mom_common/mom_v_coriolis_nh.F |
57 |
MOM_V_CORIOLIS_NH |
& -0.5*( fCoriCos( i ,j,bi,bj)*angleSinC(i, j ,bi,bj) |
|
./pkg/mom_common/mom_v_coriolis_nh.F |
59 |
MOM_V_CORIOLIS_NH |
& + fCoriCos(i,j-1,bi,bj)*angleSinC(i,j-1,bi,bj) |
|
./pkg/mom_common/mom_u_coriolis_nh.F |
57 |
MOM_U_CORIOLIS_NH |
& 0.5*( fCoriCos( i ,j,bi,bj)*angleCosC( i ,j,bi,bj) |
|
./pkg/mom_common/mom_u_coriolis_nh.F |
59 |
MOM_U_CORIOLIS_NH |
& + fCoriCos(i-1,j,bi,bj)*angleCosC(i-1,j,bi,bj) |
|
./pkg/mom_common/mom_quasihydrostatic.F |
63 |
MOM_QUASIHYDROSTATIC |
& fCoriCos(i,j,bi,bj)* |
|
./pkg/mom_common/mom_w_coriolis_nh.F |
56 |
MOM_W_CORIOLIS_NH |
& -gravitySign*fCoriCos(i,j,bi,bj)* |
|
./model/inc/GRID.h |
398 |
NO PROCEDURE |
& fCori, fCoriG, fCoriCos |
|
./model/inc/GRID.h |
465 |
NO PROCEDURE |
_RS fCoriCos(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |