| File |
Line number |
Procedure |
Code |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
155 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RL_W('D',bfname(nf:nl),0,0,'fCoriG',fCoriG,myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
38 |
INI_VEL |
psi(i,j,bi,bj)=fac*fCoriG(i,j,bi,bj) |
|
./model/src/ini_cori.F |
105 |
INI_CORI |
CALL READ_REC_XY_RS( 'fCoriG.bin', fCoriG, 1, 0, myThid ) |
|
./model/src/ini_cori.F |
114 |
INI_CORI |
fCoriG(sNx+1,1,bi,bj) = fCoriG(1,1,bi,bj) |
|
./model/src/ini_cori.F |
116 |
INI_CORI |
fCoriG(sNx+1,1,bi,bj) = -fCoriG(1,1,bi,bj) |
|
./model/src/ini_cori.F |
119 |
INI_CORI |
fCoriG(1,sNy+1,bi,bj) = fCoriG(1,1,bi,bj) |
|
./model/src/ini_cori.F |
120 |
INI_CORI |
fCoriG(sNx+1,sNy+1,bi,bj) = fCoriG(sNx+1,1,bi,bj) |
|
./model/src/ini_cori.F |
122 |
INI_CORI |
fCoriG(1,sNy+1,bi,bj) = -fCoriG(1,1,bi,bj) |
|
./model/src/ini_cori.F |
123 |
INI_CORI |
fCoriG(sNx+1,sNy+1,bi,bj) = -fCoriG(sNx+1,1,bi,bj) |
|
./model/src/ini_cori.F |
130 |
INI_CORI |
CALL EXCH_Z_XY_RS(fCoriG,myThid) |
|
./model/src/ini_cori.F |
165 |
INI_CORI |
CALL MON_PRINTSTATS_RS(1,fCoriG,'fCoriG',myThid) |
|
./model/src/ini_cori.F |
49 |
INI_CORI |
fCoriG(i,j,bi,bj) = f0 |
|
./model/src/ini_cori.F |
65 |
INI_CORI |
fCoriG(i,j,bi,bj) = f0+beta* yG(i,j,bi,bj)*facGrid |
|
./model/src/ini_cori.F |
80 |
INI_CORI |
fCoriG(i,j,bi,bj) = |
|
./model/src/ini_cori.F |
98 |
INI_CORI |
fCoriG(i,j,bi,bj) = 0. _d 0 |
|
./model/src/write_grid.F |
158 |
WRITE_GRID |
CALL MNC_CW_RL_W('D',bfname,0,0,'fCoriG',fCoriG,myThid) |
|
./verification/advect_cs/code/ini_vel.F |
28 |
INI_VEL |
psi(i,j,bi,bj)=fac*fCoriG(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_absvort3.F |
47 |
MOM_CALC_ABSVORT3 |
& fCoriG(i,j,bi,bj)*useCoriolisFac |
|
./pkg/monitor/mon_vort3.F |
292 |
MON_VORT3 |
tmpVal = tmpVal + fCoriG(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
264 |
CTRL_MAP_INI_ECCO |
& fCoriG(i,j,bi,bj)*tmpfld3d(i,j,k,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini.F |
386 |
CTRL_MAP_INI |
& fCoriG(i,j,bi,bj)*tmpfld3d(i,j,k,bi,bj) |
|
./model/inc/GRID.h |
398 |
NO PROCEDURE |
& fCori, fCoriG, fCoriCos |
|
./model/inc/GRID.h |
464 |
NO PROCEDURE |
_RS fCoriG(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
51 |
MOM_VI_CORIOLIS |
& +0.5*( fCoriG(i,j,bi,bj)+fCoriG(i,j+1,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
66 |
MOM_VI_CORIOLIS |
& +0.5*( fCoriG(i,j,bi,bj)+fCoriG(i,j+1,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
84 |
MOM_VI_CORIOLIS |
& -0.5*( fCoriG(i,j,bi,bj)+fCoriG(i+1,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
99 |
MOM_VI_CORIOLIS |
& -0.5*( fCoriG(i,j,bi,bj)+fCoriG(i+1,j,bi,bj) |