File |
Line number |
Procedure |
Code |
./model/inc/FFIELDS.h |
109 |
NO PROCEDURE |
_RS SST (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./model/inc/FFIELDS.h |
95 |
NO PROCEDURE |
COMMON /FFIELDS_SST/ SST |
./pkg/exf/exf_mapfields.F |
310 |
EXF_MAPFIELDS |
SST(i,j,bi,bj) = exf_outscal_sst*climsst(i,j,bi,bj) |
./pkg/exf/exf_mapfields.F |
371 |
EXF_MAPFIELDS |
_EXCH_XY_RS( SST, myThid ) |
./model/src/external_fields_load.F |
245 |
EXTERNAL_FIELDS_LOAD |
SST(i,j,bi,bj) = bWght*SST0(i,j,bi,bj) |
./model/src/external_fields_load.F |
332 |
EXTERNAL_FIELDS_LOAD |
& SST(1,sNy,1,1), SSS(1,sNy,1,1), |
./model/src/forcing_surf_relax.F |
101 |
FORCING_SURF_RELAX |
& *(theta(i,j,ks,bi,bj)-SST(i,j,bi,bj)) |
./model/src/forcing_surf_relax.F |
85 |
FORCING_SURF_RELAX |
& *(theta(i,j,ks,bi,bj)-SST(i,j,bi,bj)) |
./model/src/ini_ffields.F |
54 |
INI_FFIELDS |
SST (i,j,bi,bj) = 0. _d 0 |
./model/src/ini_forcing.F |
100 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
./model/src/ini_forcing.F |
157 |
INI_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
109 |
NO PROCEDURE |
_RS SST (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
95 |
NO PROCEDURE |
COMMON /FFIELDS_SST/ SST |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
151 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
192 |
INI_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
54 |
INI_FORCING |
SST (i,j,bi,bj) = 0. _d 0 |
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
109 |
NO PROCEDURE |
_RS SST (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
95 |
NO PROCEDURE |
COMMON /FFIELDS_SST/ SST |
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
151 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
192 |
INI_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
54 |
INI_FORCING |
SST (i,j,bi,bj) = 0. _d 0 |
./pkg/autodiff/addummy_in_stepping.F |
724 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( SSTd, dumRL, var2Du, 1, 11, myThid ) |
./pkg/ctrl/ctrl_map_forcing.F |
284 |
CTRL_MAP_FORCING |
_EXCH_XY_RS(SST, myThid ) |
./pkg/ctrl/ctrl_map_forcing.F |
347 |
CTRL_MAP_FORCING |
if (xx_gentim2d_file(iarr)(1:6).EQ.'xx_sst') SST |
./pkg/ctrl/ctrl_map_forcing.F |
348 |
CTRL_MAP_FORCING |
& (i,j,bi,bj)=SST(i,j,bi,bj)+xx_gentim2d(i,j,bi,bj,iarr) |
./pkg/ctrl/ctrl_map_forcing.F |
368 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
./pkg/ebm/ebm_load_climatology.F |
87 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS( SST, 'Theta Climatology' , 1, myThid ) |
./pkg/ebm/ebm_zonalmean.F |
103 |
EBM_ZONALMEAN |
SST(i,j,bi,bj) = ZonalMeanSST(j,bj) |