| File |
Line number |
Procedure |
Code |
|
./model/src/ini_masks_etc.F |
254 |
INI_MASKS_ETC |
IF (DXG(I,J,bi,bj).EQ.0.) hFacS(I,J,K,bi,bj)=0. |
|
./model/src/write_grid.F |
85 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXG',' ',DXG,-1,myThid) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F |
240 |
INI_MASKS_ETC |
IF (DXG(I,J,bi,bj).EQ.0.) hFacS(I,J,K,bi,bj)=0. |
|
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F |
231 |
INI_MASKS_ETC |
IF (DXG(I,J,bi,bj).EQ.0.) hFacS(I,J,K,bi,bj)=0. |
|
./model/src/update_masks_etc.F |
234 |
UPDATE_MASKS_ETC |
IF (DXG(I,J,bi,bj).EQ.0.) THEN |
|
./model/src/ini_grid.F |
108 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,DXG,'DXG',myThid) |
|
./model/src/ini_curvilinear_grid.F |
138 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dxG',DXG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
164 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(DYG,DXG,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
308 |
INI_CURVILINEAR_GRID |
CALL MDSREADFIELD('DXG.bin',readBinaryPrec,'RS',1,DXG, 1,myThid) |
|
./model/src/ini_curvilinear_grid.F |
322 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(DYG,DXG,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
414 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,15,DXG,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
458 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(DYG,DXG,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
517 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRL( DXG , 'Current DXG ' , |
|
./model/src/ini_curvilinear_grid.F |
87 |
INI_CURVILINEAR_GRID |
DXG(i,j,bi,bj)=0. |