File |
Line number |
Procedure |
Code |
./pkg/flt/flt_runga2.F |
214 |
FLT_RUNGA2 |
#ifdef ALLOW_OBCS |
./pkg/flt/flt_runga4.F |
321 |
FLT_RUNGA4 |
#ifdef ALLOW_OBCS |
./pkg/generic_advdiff/gad_advection.F |
462 |
GAD_ADVECTION |
#ifdef ALLOW_OBCS |
./pkg/generic_advdiff/gad_advection.F |
631 |
GAD_ADVECTION |
#ifdef ALLOW_OBCS |
./pkg/generic_advdiff/gad_som_advect.F |
348 |
GAD_SOM_ADVECT |
#ifdef ALLOW_OBCS |
./pkg/generic_advdiff/gad_som_advect.F |
412 |
GAD_SOM_ADVECT |
#ifdef ALLOW_OBCS |
./pkg/grdchk/grdchk_loc.F |
50 |
GRDCHK_LOC |
#ifdef ALLOW_OBCS |
./pkg/grdchk/grdchk_loc.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/OBCS.h |
4 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/OBCS_OPTIONS.h |
15 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/OBCS_PTRACERS.h |
4 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_ad_check_lev1_dir.h |
4 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_ad_check_lev2_dir.h |
4 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_ad_check_lev3_dir.h |
4 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_ad_check_lev4_dir.h |
4 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_eta.F |
26 |
OBCS_APPLY_ETA |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_ptracer.F |
49 |
OBCS_APPLY_PTRACER |
#if ( defined ALLOW_OBCS defined ALLOW_PTRACERS ) |
./pkg/obcs/obcs_apply_r_star.F |
29 |
OBCS_APPLY_R_STAR |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_seaice.F |
37 |
OBCS_APPLY_SEAICE |
#if (defined (ALLOW_OBCS) defined (ALLOW_SEAICE)) |
./pkg/obcs/obcs_apply_sloc.F |
25 |
OBCS_APPLY_SLOC |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_surf_dr.F |
28 |
OBCS_APPLY_SURF_DR |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_tloc.F |
25 |
OBCS_APPLY_TLOC |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_ts.F |
44 |
OBCS_APPLY_TS |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_uv.F |
43 |
OBCS_APPLY_UV |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_apply_uvice.F |
25 |
OBCS_APPLY_UVICE |
#if (defined (ALLOW_OBCS) defined (ALLOW_SEAICE)) |
./pkg/obcs/obcs_apply_w.F |
25 |
OBCS_APPLY_W |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_calc.F |
44 |
OBCS_CALC |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_check.F |
31 |
OBCS_CHECK |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_check_depths.F |
27 |
OBCS_CHECK_DEPTHS |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_copy_tracer.F |
49 |
OBCS_COPY_TRACER |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_external_fields_load.F |
77 |
OBCS_EXTERNAL_FIELDS_LOAD |
#if (defined ALLOW_OBCS defined ALLOW_OBCS_PRESCRIBE ) |
./pkg/obcs/obcs_init_fixed.F |
28 |
OBCS_INIT_FIXED |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_init_variables.F |
39 |
OBCS_INIT_VARIABLES |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_output.F |
36 |
OBCS_OUTPUT |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_prescribe_exchanges.F |
32 |
OBCS_PRESCRIBE_EXCHANGES |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_prescribe_read.F |
305 |
OBCS_PRESCRIBE_EXF_XZ |
#if defined ALLOW_OBCS defined ALLOW_OBCS_PRESCRIBE |
./pkg/obcs/obcs_prescribe_read.F |
41 |
OBCS_PRESCRIBE_READ |
#if (defined (ALLOW_OBCS) defined (ALLOW_OBCS_PRESCRIBE)) |
./pkg/obcs/obcs_prescribe_read.F |
539 |
OBCS_PRESCRIBE_EXF_YZ |
#if defined ALLOW_OBCS defined ALLOW_OBCS_PRESCRIBE |
./pkg/obcs/obcs_readparms.F |
42 |
OBCS_READPARMS |
#ifdef ALLOW_OBCS |
./pkg/obcs/obcs_sponge.F |
231 |
OBCS_SPONGE_V |
#if (defined (ALLOW_OBCS) defined (ALLOW_OBCS_SPONGE)) |
./pkg/obcs/obcs_sponge.F |
420 |
OBCS_SPONGE_T |
#if (defined (ALLOW_OBCS) defined (ALLOW_OBCS_SPONGE)) |
./pkg/obcs/obcs_sponge.F |
47 |
OBCS_SPONGE_U |
#if (defined (ALLOW_OBCS) defined (ALLOW_OBCS_SPONGE)) |
./pkg/obcs/obcs_sponge.F |
651 |
OBCS_SPONGE_S |
#if (defined (ALLOW_OBCS) defined (ALLOW_OBCS_SPONGE)) |
./pkg/ptracers/ptracers_fields_blocking_exchanges.F |
39 |
PTRACERS_FIELDS_BLOCKING_EXCH |
#ifdef ALLOW_OBCS |
./pkg/ptracers/ptracers_fields_blocking_exchanges.F |
57 |
PTRACERS_FIELDS_BLOCKING_EXCH |
#ifdef ALLOW_OBCS |
./pkg/ptracers/ptracers_implicit.F |
135 |
PTRACERS_IMPLICIT |
#ifdef ALLOW_OBCS |
./model/src/do_fields_blocking_exchanges.F |
48 |
DO_FIELDS_BLOCKING_EXCHANGES |
#ifdef ALLOW_OBCS |
./model/src/do_fields_blocking_exchanges.F |
66 |
DO_FIELDS_BLOCKING_EXCHANGES |
#ifdef ALLOW_OBCS |
./model/src/do_oceanic_phys.F |
150 |
DO_OCEANIC_PHYS |
#ifdef ALLOW_OBCS |
./model/src/do_the_model_io.F |
99 |
DO_THE_MODEL_IO |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_init_varia.F |
193 |
SEAICE_INIT_VARIA |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_init_varia.F |
29 |
SEAICE_INIT_VARIA |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_init_varia.F |
420 |
SEAICE_INIT_VARIA |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_init_varia.F |
49 |
SEAICE_INIT_VARIA |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_model.F |
172 |
SEAICE_MODEL |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_model.F |
225 |
SEAICE_MODEL |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_model.F |
257 |
SEAICE_MODEL |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_obcs_output.F |
28 |
SEAICE_OBCS_OUTPUT |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_obcs_output.F |
42 |
SEAICE_OBCS_OUTPUT |
#ifdef ALLOW_OBCS |
./pkg/seaice/seaice_obcs_output.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/dynamics.F |
559 |
DYNAMICS |
#ifdef ALLOW_OBCS |
./model/src/dynamics.F |
603 |
DYNAMICS |
#ifdef ALLOW_OBCS |
./model/src/dynamics.F |
661 |
DYNAMICS |
#ifdef ALLOW_OBCS |
./model/src/dynamics.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/dynamics.F |
98 |
DYNAMICS |
# ifdef ALLOW_OBCS |
./model/src/external_forcing.F |
197 |
EXTERNAL_FORCING_V |
#ifdef ALLOW_OBCS |
./model/src/external_forcing.F |
387 |
EXTERNAL_FORCING_T |
#ifdef ALLOW_OBCS |
./model/src/external_forcing.F |
552 |
EXTERNAL_FORCING_S |
#ifdef ALLOW_OBCS |
./model/src/external_forcing.F |
93 |
EXTERNAL_FORCING_U |
#ifdef ALLOW_OBCS |
./model/src/forward_step.F |
107 |
FORWARD_STEP |
# ifdef ALLOW_OBCS |
./model/src/forward_step.F |
10 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/forward_step.F |
350 |
FORWARD_STEP |
# ifdef ALLOW_OBCS |
./model/src/ini_cg2d.F |
115 |
INI_CG2D |
#ifdef ALLOW_OBCS |
./model/src/ini_cg2d.F |
31 |
INI_CG2D |
#ifdef ALLOW_OBCS |
./model/src/ini_cg3d.F |
160 |
INI_CG3D |
#ifdef ALLOW_OBCS |
./model/src/ini_cg3d.F |
31 |
INI_CG3D |
#ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/openad_dumpAdjoint.F |
48 |
OPENAD_DUMPADJOINT |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/openad_dumpAdjoint.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_first_level_loop.F |
52 |
THE_FIRST_LEVEL_LOOP |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_first_level_loop.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
159 |
THE_FOURTH_LEVEL_PLAIN |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
54 |
THE_FOURTH_LEVEL_LOOP |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
164 |
THE_SECOND_LEVEL_PLAIN |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
54 |
THE_SECOND_LEVEL_LOOP |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
159 |
THE_THIRD_LEVEL_PLAIN |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
54 |
THE_THIRD_LEVEL_LOOP |
# ifdef ALLOW_OBCS |
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/ini_depths.F |
286 |
INI_DEPTHS |
#ifdef ALLOW_OBCS |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
286 |
INI_DEPTHS |
#ifdef ALLOW_OBCS |
./verification/dome/code/obcs_calc.F |
36 |
OBCS_CALC |
#ifdef ALLOW_OBCS |
./verification/exp4/code/OBCS_OPTIONS.h |
15 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/internal_wave/code/obcs_calc.F |
35 |
OBCS_CALC |
#ifdef ALLOW_OBCS |
./verification/lab_sea/code_ad_seaice_ocean/OBCS_OPTIONS.h |
15 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/integr_continuity.F |
196 |
INTEGR_CONTINUITY |
#ifdef ALLOW_OBCS |
./model/src/integr_continuity.F |
248 |
INTEGR_CONTINUITY |
#ifdef ALLOW_OBCS |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
103 |
THE_MAIN_LOOP |
# ifdef ALLOW_OBCS |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
7 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
74 |
THE_MAIN_LOOP |
# ifdef ALLOW_OBCS |
./model/src/momentum_correction_step.F |
107 |
MOMENTUM_CORRECTION_STEP |
#ifdef ALLOW_OBCS |
./model/src/momentum_correction_step.F |
116 |
MOMENTUM_CORRECTION_STEP |
#ifdef ALLOW_OBCS |
./verification/rotating_tank/code/external_forcing.F |
191 |
EXTERNAL_FORCING_V |
#ifdef ALLOW_OBCS |
./verification/rotating_tank/code/external_forcing.F |
424 |
EXTERNAL_FORCING_T |
#ifdef ALLOW_OBCS |
./verification/rotating_tank/code/external_forcing.F |
515 |
EXTERNAL_FORCING_S |
#ifdef ALLOW_OBCS |
./verification/rotating_tank/code/external_forcing.F |
93 |
EXTERNAL_FORCING_U |
#ifdef ALLOW_OBCS |
./verification/seaice_obcs/code/OBCS_OPTIONS.h |
15 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./verification/tidal_basin_2d/code/external_forcing.F |
124 |
EXTERNAL_FORCING_U |
#ifdef ALLOW_OBCS |
./verification/tidal_basin_2d/code/external_forcing.F |
222 |
EXTERNAL_FORCING_V |
#ifdef ALLOW_OBCS |
./verification/tidal_basin_2d/code/external_forcing.F |
345 |
EXTERNAL_FORCING_T |
#ifdef ALLOW_OBCS |
./verification/tidal_basin_2d/code/external_forcing.F |
436 |
EXTERNAL_FORCING_S |
#ifdef ALLOW_OBCS |
./model/src/packages_check.F |
169 |
PACKAGES_CHECK |
#ifdef ALLOW_OBCS |
./model/src/packages_init_fixed.F |
192 |
PACKAGES_INIT_FIXED |
#ifdef ALLOW_OBCS |
./model/src/packages_init_variables.F |
445 |
PACKAGES_INIT_VARIABLES |
#ifdef ALLOW_OBCS |
./model/src/packages_readparms.F |
217 |
PACKAGES_READPARMS |
#ifdef ALLOW_OBCS |
./model/src/packages_write_pickup.F |
73 |
PACKAGES_WRITE_PICKUP |
#ifdef ALLOW_OBCS |
./verification/tutorial_plume_on_slope/code/OBCS_OPTIONS.h |
15 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/pre_cg3d.F |
178 |
PRE_CG3D |
#ifdef ALLOW_OBCS |
./model/src/pre_cg3d.F |
240 |
PRE_CG3D |
#ifdef ALLOW_OBCS |
./model/src/pre_cg3d.F |
33 |
PRE_CG3D |
#ifdef ALLOW_OBCS |
./model/src/solve_for_pressure.F |
231 |
SOLVE_FOR_PRESSURE |
#ifdef ALLOW_OBCS |
./model/src/solve_for_pressure.F |
38 |
SOLVE_FOR_PRESSURE |
#ifdef ALLOW_OBCS |
./model/src/the_main_loop.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./model/src/the_main_loop.F |
88 |
THE_MAIN_LOOP |
# ifdef ALLOW_OBCS |
./model/src/thermodynamics.F |
903 |
THERMODYNAMICS |
#ifdef ALLOW_OBCS |
./model/src/timestep_wvel.F |
108 |
TIMESTEP_WVEL |
#ifdef ALLOW_OBCS |
./model/src/update_cg2d.F |
32 |
UPDATE_CG2D |
#ifdef ALLOW_OBCS |
./model/src/update_cg2d.F |
94 |
UPDATE_CG2D |
#ifdef ALLOW_OBCS |
./model/src/update_etah.F |
81 |
UPDATE_ETAH |
#ifdef ALLOW_OBCS |
./model/src/update_r_star.F |
67 |
UPDATE_R_STAR |
#ifdef ALLOW_OBCS |
./model/src/update_surf_dr.F |
68 |
UPDATE_SURF_DR |
#ifdef ALLOW_OBCS |
./pkg/autodiff/autodiff_restore.F |
305 |
AUTODIFF_RESTORE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/autodiff_restore.F |
50 |
AUTODIFF_RESTORE |
# ifdef ALLOW_OBCS |
./pkg/autodiff/autodiff_restore.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/autodiff_store.F |
372 |
AUTODIFF_STORE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/autodiff_store.F |
50 |
AUTODIFF_STORE |
# ifdef ALLOW_OBCS |
./pkg/autodiff/autodiff_store.F |
6 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/checkpoint_lev1_directives.h |
159 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/checkpoint_lev2_directives.h |
134 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/checkpoint_lev3_directives.h |
134 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/autodiff/checkpoint_lev4_directives.h |
134 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_getobcse.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_getobcsn.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_getobcss.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_getobcsw.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_obcsbal.F |
40 |
CTRL_OBCSBAL |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_obcsbal.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_obcsvol.F |
36 |
CTRL_OBCSVOL |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_obcsvol.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_volflux.F |
40 |
CTRL_VOLFLUX |
#ifdef ALLOW_OBCS |
./pkg/ctrl/ctrl_volflux.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_averagesfields.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcs_ageos.F |
35 |
COST_OBCS_AGEOS |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcs_ageos.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcse.F |
34 |
COST_OBCSE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcse.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcsn.F |
34 |
COST_OBCSN |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcsn.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcss.F |
34 |
COST_OBCSS |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcss.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcsvol.F |
36 |
COST_OBCSVOL |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcsvol.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcsw.F |
34 |
COST_OBCSW |
#ifdef ALLOW_OBCS |
./pkg/ecco/cost_obcsw.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/ecco/the_main_loop.F |
133 |
THE_MAIN_LOOP |
# ifdef ALLOW_OBCS |
./pkg/ecco/the_main_loop.F |
568 |
THE_MAIN_LOOP |
# ifdef ALLOW_OBCS |
./pkg/ecco/the_main_loop.F |
7 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/exch2/exch2_check_depths.F |
31 |
EXCH2_CHECK_DEPTHS |
#ifdef ALLOW_OBCS |
./pkg/exch2/exch2_check_depths.F |
53 |
EXCH2_CHECK_DEPTHS |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_init_fixed.F |
35 |
EXF_INIT_FIXED |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_init_fixed.F |
406 |
EXF_INIT_FIXED |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_init_fixed.F |
5 |
NO PROCEDURE |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_readparms.F |
805 |
EXF_READPARMS |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_set_obcs.F |
165 |
EXF_SET_OBCS_YZ |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_set_obcs.F |
268 |
EXF_SET_OBCS_X |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_set_obcs.F |
367 |
EXF_SET_OBCS_Y |
#ifdef ALLOW_OBCS |
./pkg/exf/exf_set_obcs.F |
62 |
EXF_SET_OBCS_XZ |
#ifdef ALLOW_OBCS |