| File |
Line number |
Procedure |
Code |
|
./pkg/dic/insol.F |
59 |
INSOL |
lat=YC(1,j,1,bj)/180.d0*3.1416 |
|
./verification/advect_xy/code/ini_salt.F |
49 |
INI_SALT |
& +(YC(i,j,bi,bj)-40.E3)**2 |
|
./verification/advect_xy/code/ini_theta.F |
66 |
INI_THETA |
& +(YC(i,j,bi,bj)-40.E3)**2 |
|
./model/src/write_grid.F |
78 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'YC',' ',YC,-1,myThid) |
|
./model/src/ini_grid.F |
110 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,YC,'YC',myThid) |
|
./model/src/ini_curvilinear_grid.F |
132 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'YC', YC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
153 |
INI_CURVILINEAR_GRID |
CALL EXCH_XY_RS(YC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
177 |
INI_CURVILINEAR_GRID |
CALL MDSREADFIELD('LATC.bin',readBinaryPrec,'RS',1,YC, 1,myThid) |
|
./model/src/ini_curvilinear_grid.F |
179 |
INI_CURVILINEAR_GRID |
_EXCH_XY_R4(YC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
375 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,2,YC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
443 |
INI_CURVILINEAR_GRID |
CALL EXCH_XY_RS(YC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
489 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRL( YC , 'Current YC ' , |
|
./model/src/ini_curvilinear_grid.F |
82 |
INI_CURVILINEAR_GRID |
YC(i,j,bi,bj)=0. |