File |
Line number |
Procedure |
Code |
./verification/1D_ocean_ice_column/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/1D_ocean_ice_column/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/1D_ocean_ice_column/code_ad/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/1D_ocean_ice_column/code_ad/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/MLAdjust/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/MLAdjust/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/adjustment.cs-32x32x1/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/adjustment.cs-32x32x1/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/advect_cs/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/advect_cs/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/advect_xz/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/advect_xz/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/aim.5l_cs/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/aim.5l_cs/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 10 , sizRegMsk = 3 , nStats = 4 ) |
./verification/cfc_example/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/cfc_example/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/cheapAML_box/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/cheapAML_box/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/cpl_aim+ocn/code_ocn/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/cpl_aim+ocn/code_ocn/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/deep_anelastic/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/deep_anelastic/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/dome/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/dome/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/fizhi-cs-aqualev20/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/fizhi-cs-aqualev20/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/fizhi-gridalt-hs/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/fizhi-gridalt-hs/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/front_relax/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/front_relax/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/global_ocean.90x40x15/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/global_ocean.90x40x15/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/global_ocean.cs32x15/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/global_ocean.cs32x15/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 10 , sizRegMsk = 3 , nStats = 4 ) |
./verification/global_ocean.cs32x15/code_ad/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/global_ocean.cs32x15/code_ad/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 10 , sizRegMsk = 3 , nStats = 4 ) |
./verification/global_with_exf/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/global_with_exf/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/global_with_exf/code_ad/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/global_with_exf/code_ad/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/halfpipe_streamice/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/halfpipe_streamice/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/halfpipe_streamice/code_ad/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/halfpipe_streamice/code_ad/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/halfpipe_streamice/code_oad/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/halfpipe_streamice/code_oad/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/hs94.cs-32x32x5/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/hs94.cs-32x32x5/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/ideal_2D_oce/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/ideal_2D_oce/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/inverted_barometer/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/inverted_barometer/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/isomip/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/isomip/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/isomip/code_ad/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/isomip/code_ad/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/lab_sea/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/lab_sea/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/lab_sea/code_ad/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/lab_sea/code_ad/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/natl_box/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/natl_box/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/offline_exf_seaice/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/offline_exf_seaice/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/offline_exf_seaice/code_ad/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/offline_exf_seaice/code_ad/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/rotating_tank/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/rotating_tank/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/seaice_itd/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/seaice_itd/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/short_surf_wave/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/short_surf_wave/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/so_box_biogeo/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/so_box_biogeo/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/solid-body.cs-32x32x1/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/solid-body.cs-32x32x1/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/tutorial_advection_in_gyre/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/tutorial_advection_in_gyre/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/tutorial_deep_convection/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/tutorial_deep_convection/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./verification/tutorial_global_oce_biogeo/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/tutorial_global_oce_biogeo/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 9 , sizRegMsk = 1 , nStats = 4 ) |
./verification/tutorial_held_suarez_cs/code/DIAGNOSTICS_SIZE.h |
20 |
NO PROCEDURE |
INTEGER nRegions, nStats |
./verification/tutorial_held_suarez_cs/code/DIAGNOSTICS_SIZE.h |
25 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , nStats = 4 ) |
./verification/vermix/code/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./verification/vermix/code/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./pkg/diagnostics/DIAGNOSTICS.h |
187 |
NO PROCEDURE |
INTEGER diagSt_region(0:nRegions,numLists) |
./pkg/diagnostics/DIAGNOSTICS.h |
77 |
NO PROCEDURE |
_RL qSdiag(0:nStats,0:nRegions,diagSt_size,nSx,nSy) |
./pkg/diagnostics/DIAGNOSTICS_SIZE.h |
21 |
NO PROCEDURE |
INTEGER nRegions, sizRegMsk, nStats |
./pkg/diagnostics/DIAGNOSTICS_SIZE.h |
26 |
NO PROCEDURE |
PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 ) |
./pkg/diagnostics/DIAGSTATS_REGIONS.h |
32 |
NO PROCEDURE |
_RS diagSt_vRegMsk(0:nRegions) |
./pkg/diagnostics/DIAGSTATS_REGIONS.h |
33 |
NO PROCEDURE |
INTEGER diagSt_kRegMsk(0:nRegions) |
./pkg/diagnostics/diag_vegtile_fill.F |
196 |
DIAG_VEGTILE_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diag_vegtile_fill.F |
204 |
DIAG_VEGTILE_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diag_vegtile_fill.F |
67 |
DIAG_VEGTILE_FILL |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagnostics_fill.F |
125 |
DIAGNOSTICS_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_fill.F |
133 |
DIAGNOSTICS_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_fill.F |
67 |
DIAGNOSTICS_FILL |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagnostics_fill_rs.F |
125 |
DIAGNOSTICS_FILL_RS |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_fill_rs.F |
133 |
DIAGNOSTICS_FILL_RS |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_fill_rs.F |
67 |
DIAGNOSTICS_FILL_RS |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagnostics_fract_fill.F |
169 |
DIAGNOSTICS_FRACT_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_fract_fill.F |
177 |
DIAGNOSTICS_FRACT_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_fract_fill.F |
81 |
DIAGNOSTICS_FRACT_FILL |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagnostics_init_varia.F |
63 |
DIAGNOSTICS_INIT_VARIA |
DO j = 0,nRegions |
./pkg/diagnostics/diagnostics_readparms.F |
387 |
DIAGNOSTICS_READPARMS |
DO j = 0,nRegions |
./pkg/diagnostics/diagnostics_readparms.F |
402 |
DIAGNOSTICS_READPARMS |
DO j = 0,nRegions |
./pkg/diagnostics/diagnostics_readparms.F |
420 |
DIAGNOSTICS_READPARMS |
IF ( j.LE.nRegions ) THEN |
./pkg/diagnostics/diagnostics_readparms.F |
426 |
DIAGNOSTICS_READPARMS |
IF ( j.GT.nRegions ) THEN |
./pkg/diagnostics/diagnostics_readparms.F |
451 |
DIAGNOSTICS_READPARMS |
IF ( j.NE.UNSET_I .AND. j.GE.0 .AND. j.LE.nRegions ) THEN |
./pkg/diagnostics/diagnostics_readparms.F |
474 |
DIAGNOSTICS_READPARMS |
& '(=',nRegions,' )' |
./pkg/diagnostics/diagnostics_readparms.F |
621 |
DIAGNOSTICS_READPARMS |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_readparms.F |
67 |
DIAGNOSTICS_READPARMS |
PARAMETER ( rdimLoc = nRegions+21 ) |
./pkg/diagnostics/diagnostics_scale_fill.F |
127 |
DIAGNOSTICS_SCALE_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_scale_fill.F |
135 |
DIAGNOSTICS_SCALE_FILL |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_scale_fill.F |
71 |
DIAGNOSTICS_SCALE_FILL |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
127 |
DIAGNOSTICS_SCALE_FILL_RS |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
135 |
DIAGNOSTICS_SCALE_FILL_RS |
DO j=0,nRegions |
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
71 |
DIAGNOSTICS_SCALE_FILL_RS |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagnostics_summary.F |
188 |
DIAGNOSTICS_SUMMARY |
DO j=0,nRegions |
./pkg/diagnostics/diagstats_ascii_out.F |
34 |
DIAGSTATS_ASCII_OUT |
_RL statGlob(0:nStats,0:nLev,0:nRegions) |
./pkg/diagnostics/diagstats_ascii_out.F |
57 |
DIAGSTATS_ASCII_OUT |
DO j=0,nRegions |
./pkg/diagnostics/diagstats_clear.F |
79 |
DIAGSTATS_CLRDIAG |
DO j = 0,nRegions |
./pkg/diagnostics/diagstats_fill.F |
94 |
DIAGSTATS_FILL |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagstats_ini_io.F |
78 |
DIAGSTATS_INI_IO |
DO j=0,nRegions |
./pkg/diagnostics/diagstats_local.F |
108 |
DIAGSTATS_LOCAL |
DO n=0,nRegions |
./pkg/diagnostics/diagstats_local.F |
62 |
DIAGSTATS_LOCAL |
_RL statFld(0:nStats,0:nRegions) |
./pkg/diagnostics/diagstats_local.F |
72 |
DIAGSTATS_LOCAL |
INTEGER region2fill(0:nRegions) |
./pkg/diagnostics/diagstats_mnc_out.F |
209 |
DIAGSTATS_MNC_OUT |
dim(2) = nRegions + 1 |
./pkg/diagnostics/diagstats_mnc_out.F |
212 |
DIAGSTATS_MNC_OUT |
ie(2) = nRegions + 1 |
./pkg/diagnostics/diagstats_mnc_out.F |
258 |
DIAGSTATS_MNC_OUT |
DO j = 0,nRegions |
./pkg/diagnostics/diagstats_mnc_out.F |
300 |
DIAGSTATS_MNC_OUT |
DO j = 0,nRegions |
./pkg/diagnostics/diagstats_mnc_out.F |
45 |
DIAGSTATS_MNC_OUT |
_RL statGlob(0:nStats,0:nLev,0:nRegions) |
./pkg/diagnostics/diagstats_mnc_out.F |
74 |
DIAGSTATS_MNC_OUT |
_RL stmp(Nr+Nrphys+1,nRegions+1) |
./pkg/diagnostics/diagstats_output.F |
51 |
DIAGSTATS_OUTPUT |
_RL statGlob(0:nStats,0:nLev,0:nRegions) |
./pkg/diagnostics/diagstats_output.F |
80 |
DIAGSTATS_OUTPUT |
DO j=0,nRegions |
./pkg/diagnostics/diagstats_set_pointers.F |
152 |
DIAGSTATS_SET_POINTERS |
DO j=1,nRegions |
./pkg/diagnostics/diagstats_set_pointers.F |
93 |
DIAGSTATS_SET_POINTERS |
DO j=0,nRegions |
./pkg/diagnostics/diagstats_set_regions.F |
131 |
DIAGSTATS_SET_REGIONS |
DO j=1,nRegions |
./pkg/diagnostics/diagstats_set_regions.F |
172 |
DIAGSTATS_SET_REGIONS |
DO j=1,nRegions |
./pkg/diagnostics/diagstats_set_regions.F |
207 |
DIAGSTATS_SET_REGIONS |
DO j=1,nRegions |