File |
Line number |
Procedure |
Code |
./model/inc/GRID.h |
430 |
NO PROCEDURE |
& angleCosC, angleSinC, u2zonDir, v2zonDir, |
./model/inc/GRID.h |
497 |
NO PROCEDURE |
_RS u2zonDir (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./model/src/calc_grid_angles.F |
102 |
CALC_GRID_ANGLES |
u2zonDir(i,j,bi,bj) = rSphere |
./model/src/calc_grid_angles.F |
108 |
CALC_GRID_ANGLES |
u2zonDir(i,j,bi,bj) = 1. |
./model/src/calc_grid_angles.F |
63 |
CALC_GRID_ANGLES |
u2zonDir(i,j,bi,bj) = rSphere*uPseudo(i,j) |
./pkg/monitor/mon_ke.F |
211 |
MON_KE |
tmpFld(i,j) = tmpFld(i,j)*u2zonDir(i,j,bi,bj) |
./model/src/ini_grid.F |
105 |
INI_GRID |
u2zonDir(i,j,bi,bj) = 1. |
./model/src/write_grid.F |
99 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'U2zonDir',' ',u2zonDir,-1,myThid) |