| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_weights.F |
1902 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./pkg/ecco/ecco_cost_weights.F |
219 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk.h |
109 |
NO PROCEDURE |
_RL grdchk_maskxz(1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/grdchk/grdchk.h |
110 |
NO PROCEDURE |
_RL grdchk_maskyz(1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/grdchk/grdchk.h |
92 |
NO PROCEDURE |
integer nwettile( nsx,nsy,nr,nobcs ) |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
106 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
129 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
152 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
83 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_position.F |
120 |
GRDCHK_GET_POSITION |
nobcsmax = nobcs |
|
./pkg/grdchk/grdchk_init.F |
126 |
GRDCHK_INIT |
do iobcs = 1, nobcs |
|
./pkg/grdchk/grdchk_init.F |
170 |
GRDCHK_INIT |
do iobcs = 1, nobcs |
|
./pkg/grdchk/grdchk_init.F |
71 |
GRDCHK_INIT |
do iobcs = 1, nobcs |
|
./pkg/grdchk/grdchk_loc.F |
143 |
GRDCHK_LOC |
nobcsmax = nobcs |
|
./verification/1D_ocean_ice_column/code/SIZE.h |
67 |
NO PROCEDURE |
integer nobcs |
|
./verification/1D_ocean_ice_column/code/SIZE.h |
68 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/1D_ocean_ice_column/code_ad/SIZE.h |
67 |
NO PROCEDURE |
integer nobcs |
|
./verification/1D_ocean_ice_column/code_ad/SIZE.h |
68 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/OpenAD/code_ad/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/OpenAD/code_ad/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/OpenAD/code_ad_singlelayer/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/OpenAD/code_ad_singlelayer/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/OpenAD/code_oad/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/OpenAD/code_oad/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/bottom_ctrl_5x5/code_ad/SIZE.h |
59 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/bottom_ctrl_5x5/code_ad/SIZE.h |
60 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/cfc_example/code/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/cfc_example/code/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/front_relax/code_ad/SIZE.h |
59 |
NO PROCEDURE |
integer nobcs |
|
./verification/front_relax/code_ad/SIZE.h |
60 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global_ocean.90x40x15/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/global_ocean.90x40x15/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/global_ocean.90x40x15/code_oad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/global_ocean.90x40x15/code_oad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/global_ocean.cs32x15/code_ad/SIZE.h |
72 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/global_ocean.cs32x15/code_ad/SIZE.h |
73 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/global_ocean_ebm/code_ad/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global_ocean_ebm/code_ad/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global_with_exf/code_ad/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global_with_exf/code_ad/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/halfpipe_streamice/code/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/halfpipe_streamice/code/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/halfpipe_streamice/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/halfpipe_streamice/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/halfpipe_streamice/code_oad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/halfpipe_streamice/code_oad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/hs94.1x64x5/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/hs94.1x64x5/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/hs94.1x64x5/code_oad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/hs94.1x64x5/code_oad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/isomip/code_ad/SIZE.h |
66 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/isomip/code_ad/SIZE.h |
67 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/isomip/code_oad/SIZE.h |
66 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/isomip/code_oad/SIZE.h |
67 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/lab_sea/code_ad/SIZE.h |
67 |
NO PROCEDURE |
integer nobcs |
|
./verification/lab_sea/code_ad/SIZE.h |
68 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/obcs_ctrl/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/obcs_ctrl/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/offline_exf_seaice/code/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/offline_exf_seaice/code/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/offline_exf_seaice/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/offline_exf_seaice/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/seaice_itd/code/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/seaice_itd/code/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/so_box_biogeo/code/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/so_box_biogeo/code/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/tutorial_cfc_offline/code/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_cfc_offline/code/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/tutorial_dic_adjoffline/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/tutorial_dic_adjoffline/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/tutorial_global_oce_biogeo/code/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_global_oce_biogeo/code/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/tutorial_global_oce_biogeo/code_ad/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_global_oce_biogeo/code_ad/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_global_oce_biogeo/code_oad/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/tutorial_global_oce_optim/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/tutorial_global_oce_optim/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/tutorial_global_oce_optim/code_oad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/tutorial_global_oce_optim/code_oad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/tutorial_offline/code/SIZE.h |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_offline/code/SIZE.h |
69 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/tutorial_tracer_adjsens/code_ad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/tutorial_tracer_adjsens/code_ad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./verification/tutorial_tracer_adjsens/code_oad/SIZE.h |
67 |
NO PROCEDURE |
INTEGER nobcs |
|
./verification/tutorial_tracer_adjsens/code_oad/SIZE.h |
68 |
NO PROCEDURE |
PARAMETER ( nobcs = 4 ) |
|
./optim/optim_readdata.F |
168 |
OPTIM_READDATA |
read( funit ) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
171 |
OPTIM_READDATA |
read( funit ) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
174 |
OPTIM_READDATA |
read( funit ) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
177 |
OPTIM_READDATA |
read( funit ) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
213 |
OPTIM_READDATA |
do iobcs=1,nobcs |
|
./optim/optim_readdata.F |
219 |
OPTIM_READDATA |
do iobcs=1,nobcs |
|
./optim/optim_readdata.F |
225 |
OPTIM_READDATA |
do iobcs=1,nobcs |
|
./optim/optim_readdata.F |
231 |
OPTIM_READDATA |
do iobcs=1,nobcs |
|
./optim/optim_readdata.F |
315 |
OPTIM_READDATA |
gg = (icvrec-1)/nobcs |
|
./optim/optim_readdata.F |
317 |
OPTIM_READDATA |
iobcs= icvrec - igg*nobcs |
|
./optim/optim_writedata.F |
165 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
168 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
171 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
174 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
213 |
OPTIM_WRITEDATA |
gg = (icvrec-1)/nobcs |
|
./optim/optim_writedata.F |
215 |
OPTIM_WRITEDATA |
iobcs= icvrec - igg*nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
233 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
237 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
241 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
245 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
280 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
292 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
304 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
316 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
89 |
ADMTLM_DSVD2MODEL |
integer filenWetobcsnGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
92 |
ADMTLM_DSVD2MODEL |
integer filenWetobcssGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
95 |
ADMTLM_DSVD2MODEL |
integer filenWetobcswGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
98 |
ADMTLM_DSVD2MODEL |
integer filenWetobcseGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
224 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
227 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
230 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
233 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
102 |
NO PROCEDURE |
integer nwetobcsw ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
103 |
NO PROCEDURE |
integer nwetobcswglo ( nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
107 |
NO PROCEDURE |
integer nwetobcse ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
108 |
NO PROCEDURE |
integer nwetobcseglo ( nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
113 |
NO PROCEDURE |
_RL wobcsn ( nr,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
114 |
NO PROCEDURE |
_RL wobcsnLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
118 |
NO PROCEDURE |
_RL xx_obcsn0 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
119 |
NO PROCEDURE |
_RL xx_obcsn1 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
125 |
NO PROCEDURE |
_RL wobcss ( nr,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
126 |
NO PROCEDURE |
_RL wobcssLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
130 |
NO PROCEDURE |
_RL xx_obcss0 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
131 |
NO PROCEDURE |
_RL xx_obcss1 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
137 |
NO PROCEDURE |
_RL wobcsw ( nr,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
138 |
NO PROCEDURE |
_RL wobcswLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
142 |
NO PROCEDURE |
_RL xx_obcsw0 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
143 |
NO PROCEDURE |
_RL xx_obcsw1 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
149 |
NO PROCEDURE |
_RL wobcse ( nr,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
150 |
NO PROCEDURE |
_RL wobcseLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
154 |
NO PROCEDURE |
_RL xx_obcse0 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
155 |
NO PROCEDURE |
_RL xx_obcse1 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/CTRL_OBCS.h |
92 |
NO PROCEDURE |
integer nwetobcsn ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
93 |
NO PROCEDURE |
integer nwetobcsnglo ( nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
97 |
NO PROCEDURE |
integer nwetobcss ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/CTRL_OBCS.h |
98 |
NO PROCEDURE |
integer nwetobcssglo ( nr,nobcs ) |
|
./pkg/ctrl/ctrl_getobcse.F |
120 |
CTRL_GETOBCSE |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcse.F |
124 |
CTRL_GETOBCSE |
& (obcsecount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcse.F |
193 |
CTRL_GETOBCSE |
& (obcsecount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsn.F |
126 |
CTRL_GETOBCSN |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcsn.F |
129 |
CTRL_GETOBCSN |
& (obcsncount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsn.F |
198 |
CTRL_GETOBCSN |
& (obcsncount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcss.F |
122 |
CTRL_GETOBCSS |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcss.F |
125 |
CTRL_GETOBCSS |
& (obcsscount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcss.F |
194 |
CTRL_GETOBCSS |
& (obcsscount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsw.F |
121 |
CTRL_GETOBCSW |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcsw.F |
124 |
CTRL_GETOBCSW |
& (obcswcount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsw.F |
193 |
CTRL_GETOBCSW |
& (obcswcount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
106 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
61 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
76 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
91 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
209 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
215 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
221 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
227 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
233 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
418 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
434 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
450 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
466 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
490 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
502 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
50 |
CTRL_INIT_WET |
integer ntmpob(nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
514 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
526 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
91 |
CTRL_INIT_WET |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
128 |
CTRL_MASK_SET_XZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
35 |
CTRL_MASK_SET_XZ |
integer nwetobcs (nsx,nsy,nr,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
58 |
CTRL_MASK_SET_XZ |
_RL maskxz (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
83 |
CTRL_MASK_SET_XZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
95 |
CTRL_MASK_SET_XZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
129 |
CTRL_MASK_SET_YZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
35 |
CTRL_MASK_SET_YZ |
integer nwetobcs (nsx,nsy,nr,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
58 |
CTRL_MASK_SET_YZ |
_RL maskyz (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
84 |
CTRL_MASK_SET_YZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
96 |
CTRL_MASK_SET_YZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_pack.F |
251 |
CTRL_PACK |
write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
254 |
CTRL_PACK |
write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
257 |
CTRL_PACK |
write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
260 |
CTRL_PACK |
write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
107 |
CTRL_SET_PACK_XZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
164 |
CTRL_SET_PACK_XZ |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
189 |
CTRL_SET_PACK_XZ |
iobcs= mod((irec-1)*sny+j-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
195 |
CTRL_SET_PACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
261 |
CTRL_SET_PACK_XZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
270 |
CTRL_SET_PACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
47 |
CTRL_SET_PACK_XZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
74 |
CTRL_SET_PACK_XZ |
_RL globmskxz ( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
78 |
CTRL_SET_PACK_XZ |
_RL weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
107 |
CTRL_SET_PACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
164 |
CTRL_SET_PACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
192 |
CTRL_SET_PACK_YZ |
iobcs= mod((irec-1)*snx+i-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
198 |
CTRL_SET_PACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
265 |
CTRL_SET_PACK_YZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
274 |
CTRL_SET_PACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
47 |
CTRL_SET_PACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
74 |
CTRL_SET_PACK_YZ |
_RL globmskyz ( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
78 |
CTRL_SET_PACK_YZ |
_RL weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
112 |
CTRL_SET_UNPACK_XZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
169 |
CTRL_SET_UNPACK_XZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
193 |
CTRL_SET_UNPACK_XZ |
iobcs= mod((irec-1)*sny+j-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
205 |
CTRL_SET_UNPACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
280 |
CTRL_SET_UNPACK_XZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
292 |
CTRL_SET_UNPACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
46 |
CTRL_SET_UNPACK_XZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
47 |
CTRL_SET_UNPACK_XZ |
integer nwetglobal(nr,nobcs) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
72 |
CTRL_SET_UNPACK_XZ |
_RL globmskxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
81 |
CTRL_SET_UNPACK_XZ |
_RL weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
112 |
CTRL_SET_UNPACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
169 |
CTRL_SET_UNPACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
193 |
CTRL_SET_UNPACK_YZ |
iobcs= mod((irec-1)*snx+i-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
205 |
CTRL_SET_UNPACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
280 |
CTRL_SET_UNPACK_YZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
292 |
CTRL_SET_UNPACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
46 |
CTRL_SET_UNPACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
47 |
CTRL_SET_UNPACK_YZ |
integer nwetglobal(nr,nobcs) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
72 |
CTRL_SET_UNPACK_YZ |
_RL globmskyz( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
81 |
CTRL_SET_UNPACK_YZ |
_RL weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_unpack.F |
112 |
CTRL_UNPACK |
integer filenWetobcsnGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
115 |
CTRL_UNPACK |
integer filenWetobcssGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
118 |
CTRL_UNPACK |
integer filenWetobcswGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
121 |
CTRL_UNPACK |
integer filenWetobcseGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
253 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
257 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
261 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
265 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
310 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
321 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
332 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
343 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ecco/cost_obcse.F |
162 |
COST_OBCSE |
gg = (irec-1)/nobcs |
|
./pkg/ecco/cost_obcse.F |
164 |
COST_OBCSE |
iobcs = irec - igg*nobcs |
|
./pkg/ecco/cost_obcsn.F |
160 |
COST_OBCSN |
gg = (irec-1)/nobcs |
|
./pkg/ecco/cost_obcsn.F |
162 |
COST_OBCSN |
iobcs = irec - igg*nobcs |
|
./pkg/ecco/cost_obcss.F |
160 |
COST_OBCSS |
gg = (irec-1)/nobcs |
|
./pkg/ecco/cost_obcss.F |
162 |
COST_OBCSS |
iobcs = irec - igg*nobcs |
|
./pkg/ecco/cost_obcsvol.F |
188 |
COST_OBCSVOL |
gg = (irec-1)/nobcs |
|
./pkg/ecco/cost_obcsvol.F |
190 |
COST_OBCSVOL |
iobcs = irec - igg*nobcs |
|
./pkg/ecco/cost_obcsw.F |
160 |
COST_OBCSW |
gg = (irec-1)/nobcs |
|
./pkg/ecco/cost_obcsw.F |
162 |
COST_OBCSW |
iobcs = irec - igg*nobcs |