File |
Line number |
Procedure |
Code |
./pkg/gmredi/submeso_calc_psi.F |
146 |
SUBMESO_CALC_PSI |
& MsquareH(i,j)/(fcorLoc(i,j)*fcorLoc(i,j)) , |
./pkg/gmredi/submeso_calc_psi.F |
147 |
SUBMESO_CALC_PSI |
& NHmixLay(i,j)/fcorLoc(i,j) , |
./pkg/gmredi/submeso_calc_psi.F |
159 |
SUBMESO_CALC_PSI |
& *2. _d 0/(fcorLoc(i-1,j)+fcorLoc(i,j)) |
./pkg/gmredi/submeso_calc_psi.F |
202 |
SUBMESO_CALC_PSI |
& *2. _d 0/(fcorLoc(i,j-1)+fcorLoc(i,j)) |
./pkg/gmredi/submeso_calc_psi.F |
58 |
SUBMESO_CALC_PSI |
_RL fcorLoc (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/gmredi/submeso_calc_psi.F |
98 |
SUBMESO_CALC_PSI |
fcorLoc(i,j) = SQRT( fCori(i,j,bi,bj)*fCori(i,j,bi,bj) |