| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/GMREDI.h |
201 |
NO PROCEDURE |
_RS GM_isoFac2d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/gmredi/GMREDI.h |
206 |
NO PROCEDURE |
& GM_isoFac2d, GM_bolFac2d, GM_isoFac1d, GM_bolFac1d |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1028 |
GMREDI_CALC_TENSOR |
& *op5*(GM_isoFac2d(i,j-1,bi,bj)+GM_isoFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
543 |
GMREDI_CALC_TENSOR |
Kgm_tmp = isopycK*GM_isoFac2d(i,j,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
571 |
GMREDI_CALC_TENSOR |
Kwz(i,j,k,bi,bj)= ( isopycK*GM_isoFac2d(i,j,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
729 |
GMREDI_CALC_TENSOR |
& *op5*(GM_isoFac2d(i-1,j,bi,bj)+GM_isoFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
771 |
GMREDI_CALC_TENSOR |
& *op5*(GM_isoFac2d(i-1,j,bi,bj)+GM_isoFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
810 |
GMREDI_CALC_TENSOR |
& *op5*(GM_isoFac2d(i-1,j,bi,bj)+GM_isoFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
947 |
GMREDI_CALC_TENSOR |
& *op5*(GM_isoFac2d(i,j-1,bi,bj)+GM_isoFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
989 |
GMREDI_CALC_TENSOR |
& *op5*(GM_isoFac2d(i,j-1,bi,bj)+GM_isoFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_init_fixed.F |
50 |
GMREDI_INIT_FIXED |
GM_isoFac2d(i,j,bi,bj) = 1. _d 0 |
|
./pkg/gmredi/gmredi_init_fixed.F |
59 |
GMREDI_INIT_FIXED |
CALL READ_FLD_XY_RS( GM_iso2dFile, ' ', GM_isoFac2d, 0, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
60 |
GMREDI_INIT_FIXED |
CALL EXCH_XY_RS( GM_isoFac2d, myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
102 |
GMREDI_INIT_VARIA |
CALL WRITE_FLD_XY_RS( 'GM_isoFac2d',' ',GM_isoFac2d,-1,myThid ) |
|
./model/src/ini_mixing.F |
67 |
INI_MIXING |
& GM_isoFac2d(i,j,bi,bj)*GM_isoFac1d(k) |