Symbol Description Uses
surfaceForcingS 35



File Line number Procedure Code
./pkg/dic/dic_surfforcing.F 175 DIC_SURFFORCING
              VirtualFlux(i,j)=gsm_DIC*surfaceForcingS(i,j,bi,bj)/gsm_s
./pkg/dic/alk_surfforcing.F 59 ALK_SURFFORCING
              GALK(i,j)=gsm_ALK*surfaceForcingS(i,j,bi,bj)*
./pkg/ebm/ebm_forcing_surf.F 82 EBM_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = 
./pkg/timeave/timeave_surf_flux.F 101 TIMEAVE_SURF_FLUX
     &    surfaceForcingS(i,j,bi,bj)*
./verification/tidal_basin_2d/code/external_forcing.F 430 EXTERNAL_FORCING_S
     &     +surfaceForcingS(i,j,bi,bj)
./verification/rotating_tank/code/external_forcing.F 510 EXTERNAL_FORCING_S
     &     +surfaceForcingS(i,j,bi,bj)
./verification/carbon/code_ad/ptracers_forcing_surf.F 52 PTRACERS_FORCING_SURF
     &               surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 109 EXTERNAL_FORCING_SURF
            surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 119 EXTERNAL_FORCING_SURF
            surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 140 EXTERNAL_FORCING_SURF
     &           surfaceForcingS(1-Olx,1-Oly,bi,bj),tmpFac,1,
./model/src/external_forcing_surf.F 152 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = 0. _d 0
./model/src/external_forcing_surf.F 180 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 222 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 243 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 252 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)
./model/src/external_forcing_surf.F 80 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) =
./model/src/external_forcing_surf.F 91 EXTERNAL_FORCING_SURF
          surfaceForcingS(i,j,bi,bj) =
./verification/global_ocean.90x40x15/code/ptracers_forcing_surf.F 52 PTRACERS_FORCING_SURF
     &               surfaceForcingS(i,j,bi,bj)
./model/src/ini_forcing.F 62 INI_FORCING
          surfaceForcingS(i,j,bi,bj) = 0. _d 0
./model/inc/FFIELDS.h 205 NO PROCEDURE
     &                         surfaceForcingS, 
./model/inc/FFIELDS.h 210 NO PROCEDURE
      _RL  surfaceForcingS   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/kpp/kpp_calc.F 384 KPP_CALC
     &       vddiff(I,J,1,2) * surfaceForcingS(i,j,bi,bj) )
./pkg/kpp/kpp_transport_s.F 65 KPP_TRANSPORT_S
     &        *surfaceForcingS(i,j,bi,bj)
./pkg/kpp/kpp_transport_s.F 76 KPP_TRANSPORT_S
     &        *surfaceForcingS(i,j,bi,bj)
./pkg/offline/offline_fields_load.F 371 OFFLINE_FIELDS_LOAD
          surfaceForcingS(i,j,bi,bj) =  bWght*sflx0(i,j,bi,bj)
./pkg/offline/offline_fields_load.F 373 OFFLINE_FIELDS_LOAD
          surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj)/
./model/src/diags_oceanic_surf_flux.F 110 DIAGS_OCEANIC_SURF_FLUX
     &      surfaceForcingS(i,j,bi,bj)*
./model/src/external_forcing.F 399 EXTERNAL_FORCING_S
     &     +surfaceForcingS(i,j,bi,bj)