| File |
Line number |
Procedure |
Code |
|
./model/src/ini_masks_etc.F |
253 |
INI_MASKS_ETC |
IF (DYG(I,J,bi,bj).EQ.0.) hFacW(I,J,K,bi,bj)=0. |
|
./model/src/write_grid.F |
86 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYG',' ',DYG,-1,myThid) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F |
239 |
INI_MASKS_ETC |
IF (DYG(I,J,bi,bj).EQ.0.) hFacW(I,J,K,bi,bj)=0. |
|
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F |
230 |
INI_MASKS_ETC |
IF (DYG(I,J,bi,bj).EQ.0.) hFacW(I,J,K,bi,bj)=0. |
|
./model/src/update_masks_etc.F |
220 |
UPDATE_MASKS_ETC |
IF (DYG(I,J,bi,bj).EQ.0.) THEN |
|
./model/src/ini_grid.F |
114 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,DYG,'DYG',myThid) |
|
./model/src/ini_curvilinear_grid.F |
139 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyG',DYG, 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 |
309 |
INI_CURVILINEAR_GRID |
CALL MDSREADFIELD('DYG.bin',readBinaryPrec,'RS',1,DYG, 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 |
417 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,16,DYG,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 |
519 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRL( DYG , 'Current DYG ' , |
|
./model/src/ini_curvilinear_grid.F |
88 |
INI_CURVILINEAR_GRID |
DYG(i,j,bi,bj)=0. |