Symbol Description Uses
surfaceForcingS 79



File Line number Procedure Code
./pkg/kpp/kpp_calc.F 428 KPP_CALC
     I     surfaceForcingT, surfaceForcingS, surfaceForcingTice,
./pkg/kpp/kpp_transport_s.F 115 KPP_TRANSPORT_S
     &        *( surfaceForcingS(i,j,bi,bj)
./pkg/kpp/kpp_transport_s.F 99 KPP_TRANSPORT_S
     &        *( surfaceForcingS(i,j,bi,bj)
./model/src/apply_forcing.F 907 APPLY_FORCING_S
     &      +surfaceForcingS(i,j,bi,bj)
./model/src/apply_forcing.F 916 APPLY_FORCING_S
     &      +surfaceForcingS(i,j,bi,bj)
./pkg/offline/offline_fields_load.F 426 OFFLINE_FIELDS_LOAD
           surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj)
./pkg/offline/offline_fields_load.F 428 OFFLINE_FIELDS_LOAD
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./pkg/offline/offline_get_surfforcing.F 66 OFFLINE_GET_SURFFORCING
          surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj)
./pkg/offline/offline_get_surfforcing.F 68 OFFLINE_GET_SURFFORCING
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/diags_oceanic_surf_flux.F 110 DIAGS_OCEANIC_SURF_FLUX
       CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingS,tmpFac,1,
./model/src/diags_oceanic_surf_flux.F 158 DIAGS_OCEANIC_SURF_FLUX
     &      surfaceForcingS(i,j,bi,bj)*rUnit2mass
./pkg/salt_plume/salt_plume_forcing_surf.F 67 SALT_PLUME_FORCING_SURF
        surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./pkg/salt_plume/salt_plume_forcing_surf.F 72 SALT_PLUME_FORCING_SURF
        surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing.F 742 EXTERNAL_FORCING_S
     &      +surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing.F 751 EXTERNAL_FORCING_S
     &      +surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 141 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = 0. _d 0
./model/src/external_forcing_surf.F 166 EXTERNAL_FORCING_SURF
     I        surfaceForcingS(1-OLx,1-OLy,bi,bj),
./model/src/external_forcing_surf.F 218 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 268 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 303 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 329 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/forcing_surf_relax.F 104 FORCING_SURF_RELAX
          surfaceForcingS(i,j,bi,bj) =
./model/src/forcing_surf_relax.F 125 FORCING_SURF_RELAX
            surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/forcing_surf_relax.F 139 FORCING_SURF_RELAX
            surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/forcing_surf_relax.F 153 FORCING_SURF_RELAX
            surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/forcing_surf_relax.F 213 FORCING_SURF_RELAX
     &                      + surfaceForcingS(i,j,bi,bj)
./model/src/forcing_surf_relax.F 226 FORCING_SURF_RELAX
             surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/forcing_surf_relax.F 254 FORCING_SURF_RELAX
        CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingS, tmpFac, 1,
./model/src/forcing_surf_relax.F 88 FORCING_SURF_RELAX
          surfaceForcingS(i,j,bi,bj) =
./pkg/shelfice/shelfice_forcing_surf.F 66 SHELFICE_FORCING_SURF
            surfaceForcingS(i,j,bi,bj) = shelficeForcingS(i,j,bi,bj)
./model/src/ini_forcing.F 63 INI_FORCING
          surfaceForcingS (i,j,bi,bj) = 0. _d 0
./pkg/timeave/timeave_surf_flux.F 93 TIMEAVE_SURF_FLUX
     &    surfaceForcingS(i,j,bi,bj)*rUnit2mass
./verification/rotating_tank/code/apply_forcing.F 969 APPLY_FORCING_S
     &      +surfaceForcingS(i,j,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 978 APPLY_FORCING_S
     &      +surfaceForcingS(i,j,bi,bj)
./verification/tidal_basin_2d/code/external_forcing.F 351 EXTERNAL_FORCING_S
     &     +surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h 211 NO PROCEDURE
     &                         surfaceForcingS,
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h 216 NO PROCEDURE
      _RL  surfaceForcingS   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 138 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = 0. _d 0
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 163 EXTERNAL_FORCING_SURF
     I        surfaceForcingS(1-OLx,1-OLy,bi,bj),
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 218 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 263 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 298 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 324 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F 59 INI_FORCING
          surfaceForcingS(i,j,bi,bj) = 0. _d 0
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h 211 NO PROCEDURE
     &                         surfaceForcingS,
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h 216 NO PROCEDURE
      _RL  surfaceForcingS   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 138 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = 0. _d 0
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 163 EXTERNAL_FORCING_SURF
     I        surfaceForcingS(1-OLx,1-OLy,bi,bj),
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 218 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 263 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 298 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 324 EXTERNAL_FORCING_SURF
           surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F 59 INI_FORCING
          surfaceForcingS(i,j,bi,bj) = 0. _d 0
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 69 PTRACERS_FORCING_SURF
     &               surfaceForcingS(i,j,bi,bj)
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 69 PTRACERS_FORCING_SURF
     &               surfaceForcingS(i,j,bi,bj)
./pkg/dic/alk_surfforcing.F 61 ALK_SURFFORCING
              GALK(i,j)=gsm_ALK*surfaceForcingS(i,j,bi,bj)*
./pkg/dic/dic_surfforcing.F 238 DIC_SURFFORCING
              VirtualFlux(i,j)=gsm_DIC*surfaceForcingS(i,j,bi,bj)/gsm_s
./model/inc/FFIELDS.h 228 NO PROCEDURE
     &                         surfaceForcingS,
./model/inc/FFIELDS.h 233 NO PROCEDURE
      _RL  surfaceForcingS   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)