| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/GMREDI.h |
202 |
NO PROCEDURE |
_RS GM_bolFac2d(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_psi_b.F |
157 |
GMREDI_CALC_PSI_B |
& *(GM_bolFac2d(i-1,j,bi,bj)+GM_bolFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
180 |
GMREDI_CALC_PSI_B |
& *(GM_bolFac2d(i,j-1,bi,bj)+GM_bolFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
126 |
GMREDI_CALC_PSI_BVP |
& *(GM_bolFac2d(i-1,j,bi,bj)+GM_bolFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
205 |
GMREDI_CALC_PSI_BVP |
& *(GM_bolFac2d(i,j-1,bi,bj)+GM_bolFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
552 |
GMREDI_CALC_TENSOR |
& + GM_skewflx*bolus_K*GM_bolFac2d(i,j,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
781 |
GMREDI_CALC_TENSOR |
& *op5*(GM_bolFac2d(i-1,j,bi,bj)+GM_bolFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
999 |
GMREDI_CALC_TENSOR |
& *op5*(GM_bolFac2d(i,j-1,bi,bj)+GM_bolFac2d(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_init_fixed.F |
51 |
GMREDI_INIT_FIXED |
GM_bolFac2d(i,j,bi,bj) = 1. _d 0 |
|
./pkg/gmredi/gmredi_init_fixed.F |
63 |
GMREDI_INIT_FIXED |
CALL READ_FLD_XY_RS( GM_bol2dFile, ' ', GM_bolFac2d, 0, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
64 |
GMREDI_INIT_FIXED |
CALL EXCH_XY_RS( GM_bolFac2d, myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
105 |
GMREDI_INIT_VARIA |
CALL WRITE_FLD_XY_RS( 'GM_bolFac2d',' ',GM_bolFac2d,-1,myThid ) |
|
./model/src/ini_mixing.F |
63 |
INI_MIXING |
& GM_bolFac2d(i,j,bi,bj)*GM_bolFac1d(k) |