Symbol Description Uses
useCubedSphereExchange use Cubed-Sphere topology domain. 92



File Line number Procedure Code
./pkg/exch2/w2_readparms.F 69 W2_READPARMS
      IF ( useCubedSphereExchange ) THEN
./pkg/exch2/w2_set_map_cumsum.F 244 W2_SET_MAP_CUMSUM
      IF ( useCubedSphereExchange ) THEN
./pkg/exf/exf_init.F 108 EXF_INIT
      if ( useCubedSphereExchange
./pkg/exf/exf_init.F 123 EXF_INIT
      if ( useCubedSphereExchange
./pkg/exf/exf_init.F 63 EXF_INIT
      if ( useCubedSphereExchange
./pkg/exf/exf_init.F 78 EXF_INIT
      if ( useCubedSphereExchange
./pkg/generic_advdiff/gad_advection.F 238 GAD_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_advection.F 311 GAD_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_advection.F 331 GAD_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_advection.F 790 GAD_ADVECTION
     &   .AND. useCubedSphereExchange ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 789 GAD_CALC_RHS
     &   .AND. useCubedSphereExchange ) THEN
./pkg/generic_advdiff/gad_grad_x.F 52 GAD_GRAD_X
      IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_grad_y.F 52 GAD_GRAD_Y
      IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_init_fixed.F 175 GAD_INIT_FIXED
      IF ( useCubedSphereExchange .AND. useMultiDimAdvec ) THEN
./pkg/generic_advdiff/gad_som_advect.F 213 GAD_SOM_ADVECT
      IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_som_advect.F 280 GAD_SOM_ADVECT
        IF (useCubedSphereExchange) THEN
./pkg/generic_advdiff/gad_som_advect.F 314 GAD_SOM_ADVECT
          IF ( useCubedSphereExchange .AND. .NOT.interiorOnly ) THEN
./pkg/generic_advdiff/gad_som_advect.F 361 GAD_SOM_ADVECT
          IF ( useCubedSphereExchange .AND. .NOT.interiorOnly ) THEN
./pkg/generic_advdiff/gad_som_advect.F 435 GAD_SOM_ADVECT
     &   .AND. useCubedSphereExchange ) THEN
./pkg/generic_advdiff/gad_som_fill_cs_corner.F 66 GAD_SOM_FILL_CS_CORNER
      IF (useCubedSphereExchange) THEN
./pkg/ggl90/ggl90_init_fixed.F 54 GGL90_INIT_FIXED
        IF ( useCubedSphereExchange ) THEN
./pkg/gmredi/gmredi_do_exch.F 50 GMREDI_DO_EXCH
      IF ( useCubedSphereExchange
./model/src/calc_gw.F 305 CALC_GW
          IF ( useCubedSphereExchange ) THEN
./model/src/calc_gw.F 326 CALC_GW
          IF ( useCubedSphereExchange ) THEN
./pkg/mnc/mnc_cw_cvars.F 71 MNC_CW_WRITE_CVAR
      IF ( .NOT. useCubedSphereExchange ) THEN
./pkg/mom_common/mom_calc_hfacz.F 238 MOM_CALC_HFACZ
      IF ( useCubedSphereExchange .AND. hZoption.GE.1 ) THEN
./pkg/mom_common/mom_calc_relvort3.F 83 MOM_CALC_RELVORT3
      IF (useCubedSphereExchange) THEN
./pkg/mom_common/mom_calc_strain.F 79 MOM_CALC_STRAIN
      IF (useCubedSphereExchange) THEN
./pkg/mom_common/mom_calc_visc.F 258 MOM_CALC_VISC
         IF (useCubedSphereExchange) THEN
./pkg/mom_common/mom_calc_visc.F 270 MOM_CALC_VISC
         IF (useCubedSphereExchange) THEN
./pkg/mom_vecinv/mom_vecinv.F 709 MOM_VECINV
     &   .AND. useCubedSphereExchange ) THEN
./pkg/mom_vecinv/mom_vi_del2uv.F 108 MOM_VI_DEL2UV
      IF (useCubedSphereExchange) THEN
./pkg/mom_vecinv/mom_vi_del2uv.F 83 MOM_VI_DEL2UV
      IF (useCubedSphereExchange) THEN
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 75 MOM_VI_U_CORIOLIS_C4
      IF ( useCubedSphereExchange.AND.highOrderVorticity ) THEN
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 75 MOM_VI_V_CORIOLIS_C4
      IF ( useCubedSphereExchange.AND.highOrderVorticity ) THEN
./pkg/monitor/mon_vort3.F 146 MON_VORT3
         IF (useCubedSphereExchange) THEN
./model/src/config_summary.F 871 CONFIG_SUMMARY
      IF ( useCubedSphereExchange ) THEN
./pkg/ptracers/ptracers_init_fixed.F 116 PTRACERS_INIT_FIXED
      IF ( useCubedSphereExchange .AND. useMultiDimAdvec ) THEN
./pkg/seaice/lsr.F 481 LSR
        IF ( useCubedSphereExchange ) THEN
./pkg/seaice/seaice_advection.F 202 SEAICE_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/seaice/seaice_advection.F 275 SEAICE_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/seaice/seaice_advection.F 298 SEAICE_ADVECTION
       IF (useCubedSphereExchange) THEN
./pkg/seaice/seaice_advection.F 349 SEAICE_ADVECTION
         IF ( useCubedSphereExchange .AND.
./pkg/seaice/seaice_advection.F 551 SEAICE_ADVECTION
         IF ( useCubedSphereExchange .AND.
./pkg/seaice/seaice_advection.F 757 SEAICE_ADVECTION
     &     .AND. useCubedSphereExchange ) THEN
./pkg/seaice/seaice_check.F 794 SEAICE_CHECK
      IF ( SEAICEuseDYNAMICS.AND.useCubedSphereExchange ) THEN
./pkg/seaice/seaice_lsr.F 597 SEAICE_LSR
        IF ( useCubedSphereExchange ) THEN
./model/src/grad_sigma.F 65 GRAD_SIGMA
      IF ( useCubedSphereExchange ) THEN
./model/src/grad_sigma.F 80 GRAD_SIGMA
      IF ( useCubedSphereExchange ) THEN
./pkg/shap_filt/shap_filt_computvort.F 82 SHAP_FILT_COMPUTVORT
      IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_readparms.F 215 SHAP_FILT_READPARMS
      IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_relvort3.F 89 SHAP_FILT_RELVORT3
      IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_tracer_s2.F 114 SHAP_FILT_TRACER_S2
     &          .AND. useCubedSphereExchange ) THEN
./pkg/shap_filt/shap_filt_tracer_s2.F 145 SHAP_FILT_TRACER_S2
     &          .AND. useCubedSphereExchange ) THEN
./pkg/shap_filt/shap_filt_uv_s1.F 187 SHAP_FILT_UV_S1
           IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_uv_s1.F 229 SHAP_FILT_UV_S1
           IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_uv_s2.F 202 SHAP_FILT_UV_S2
     &          .AND. useCubedSphereExchange ) THEN
./pkg/shap_filt/shap_filt_uv_s2.F 218 SHAP_FILT_UV_S2
     &          .AND. useCubedSphereExchange ) THEN
./pkg/shap_filt/shap_filt_uv_s2.F 76 SHAP_FILT_UV_S2
        IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_uv_s2c.F 111 SHAP_FILT_UV_S2C
           IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_uv_s2c.F 155 SHAP_FILT_UV_S2C
           IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_uv_s4.F 184 SHAP_FILT_UV_S4
           IF (useCubedSphereExchange) THEN
./pkg/shap_filt/shap_filt_uv_s4.F 228 SHAP_FILT_UV_S4
           IF (useCubedSphereExchange) THEN
./model/src/ini_cori.F 126 INI_CORI
        IF ( .NOT.useCubedSphereExchange ) THEN
./model/src/ini_curvilinear_grid.F 132 INI_CURVILINEAR_GRID
      IF ( useCubedSphereExchange ) THEN
./model/src/ini_curvilinear_grid.F 153 INI_CURVILINEAR_GRID
      IF (useCubedSphereExchange) THEN
./model/src/ini_curvilinear_grid.F 97 INI_CURVILINEAR_GRID
      IF (useCubedSphereExchange) THEN
./model/src/ini_global_domain.F 124 INI_GLOBAL_DOMAIN
      IF ( useCubedSphereExchange ) THEN
./pkg/thsice/thsice_advection.F 184 THSICE_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/thsice/thsice_advection.F 249 THSICE_ADVECTION
      IF (useCubedSphereExchange) THEN
./pkg/thsice/thsice_advection.F 275 THSICE_ADVECTION
       IF (useCubedSphereExchange) THEN
./pkg/thsice/thsice_advection.F 765 THSICE_ADVECTION
     &     .AND. useCubedSphereExchange ) THEN
./verification/OpenAD/code_ad_singlelayer/cost_test.F 45 COST_TEST
      if ( useCubedSphereExchange) then
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 61 MOM_VI_HFACZ_DISS
      IF (useCubedSphereExchange) THEN
./verification/global_ocean.cs32x15/code_ad/cost_test.F 44 COST_TEST
      if ( useCubedSphereExchange) then
./eesupp/src/cumulsum_z_tile.F 192 CUMULSUM_Z_TILE_RL
      ELSEIF (useCubedSphereExchange) THEN
./eesupp/src/cumulsum_z_tile.F 194 CUMULSUM_Z_TILE_RL
      IF     (useCubedSphereExchange) THEN
./verification/isomip/code_ad/cost_test.F 44 COST_TEST
      if ( useCubedSphereExchange) then
./verification/isomip/code_oad/cost_test.F 44 COST_TEST
      if ( useCubedSphereExchange) then
./model/src/solve_uv_tridiago.F 190 SOLVE_UV_TRIDIAGO
        IF ( nPx*nPy.GT.1 .OR. useCubedSphereExchange ) THEN
./model/src/solve_uv_tridiago.F 377 SOLVE_UV_TRIDIAGO
        IF ( nPx*nPy.GT.1 .OR. useCubedSphereExchange ) THEN
./eesupp/src/eeset_parms.F 104 EESET_PARMS
      useCubedSphereExchange     = .FALSE.
./eesupp/src/eeset_parms.F 67 EESET_PARMS
     & useCubedSphereExchange,
./eesupp/src/fill_cs_corner_ag_rl.F 74 FILL_CS_CORNER_AG_RL
      IF (useCubedSphereExchange) THEN
./eesupp/src/fill_cs_corner_tr_rl.F 74 FILL_CS_CORNER_TR_RL
      IF (useCubedSphereExchange) THEN
./eesupp/src/fill_cs_corner_uv_rs.F 68 FILL_CS_CORNER_UV_RS
      IF (useCubedSphereExchange) THEN
./eesupp/src/ini_threading_environment.F 287 INI_THREADING_ENVIRONMENT
      IF ( usingMPI .AND. useCubedSphereExchange ) THEN
./eesupp/src/ini_threading_environment.F 295 INI_THREADING_ENVIRONMENT
      IF ( nThreads.GT.1 .AND. useCubedSphereExchange ) THEN
./pkg/cost/cost_test.F 43 COST_TEST
      if ( useCubedSphereExchange) then
./pkg/diagnostics/diagnostics_calc_phivel.F 262 DIAGNOSTICS_CALC_PHIVEL
        IF ( useCubedSphereExchange .AND.
./eesupp/inc/EEPARAMS.h 184 NO PROCEDURE
     &  useCubedSphereExchange, useCoupler,
./eesupp/inc/EEPARAMS.h 194 NO PROCEDURE
      LOGICAL useCubedSphereExchange