| File |
Line number |
Procedure |
Code |
|
./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 |
119 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
142 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
73 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_obcs_mask.F |
96 |
GRDCHK_GET_OBCS_MASK |
do iobcs = 1,nobcs |
|
./pkg/grdchk/grdchk_get_position.F |
110 |
GRDCHK_GET_POSITION |
nobcsmax = nobcs |
|
./pkg/grdchk/grdchk_init.F |
113 |
GRDCHK_INIT |
do iobcs = 1, nobcs |
|
./pkg/grdchk/grdchk_init.F |
157 |
GRDCHK_INIT |
do iobcs = 1, nobcs |
|
./pkg/grdchk/grdchk_init.F |
68 |
GRDCHK_INIT |
do iobcs = 1, nobcs |
|
./pkg/grdchk/grdchk_loc.F |
140 |
GRDCHK_LOC |
nobcsmax = nobcs |
|
./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/OpenAD/code_oad_all/ctrl_pack.F |
204 |
CTRL_PACK |
write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
207 |
CTRL_PACK |
write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
210 |
CTRL_PACK |
write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
213 |
CTRL_PACK |
write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./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/global1x1_tot/code/SIZE.h |
62 |
NO PROCEDURE |
integer nobcs |
|
./verification/global1x1_tot/code/SIZE.h |
63 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1141 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
161 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./verification/global1x1_tot/code_bulk_adj/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global1x1_tot/code_bulk_adj/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global1x1_tot/code_seaice_adj/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global1x1_tot/code_seaice_adj/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global1x1_tot/code_taueddy/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global1x1_tot/code_taueddy/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1134 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
159 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./verification/global2x2_tot/code/SIZE.h |
62 |
NO PROCEDURE |
integer nobcs |
|
./verification/global2x2_tot/code/SIZE.h |
63 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global2x2_tot/code_forw/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global2x2_tot/code_forw/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global_ocean.90x40x15/code_ad/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global_ocean.90x40x15/code_ad/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global_ocean.90x40x15/code_ad_nlfs/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global_ocean.90x40x15/code_ad_nlfs/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/global_ocean.90x40x15/code_ad_vecinv/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/global_ocean.90x40x15/code_ad_vecinv/SIZE.h |
61 |
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/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/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/lab_sea/code_ad_seaice_ocean/SIZE.h |
65 |
NO PROCEDURE |
integer nobcs |
|
./verification/lab_sea/code_ad_seaice_ocean/SIZE.h |
66 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/lab_sea/code_ad_seaice_only/SIZE.h |
65 |
NO PROCEDURE |
integer nobcs |
|
./verification/lab_sea/code_ad_seaice_only/SIZE.h |
66 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/natl_box_adjoint/code/SIZE.h |
60 |
NO PROCEDURE |
integer nobcs |
|
./verification/natl_box_adjoint/code/SIZE.h |
61 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/natl_box_adjoint/code_bulk/SIZE.h |
58 |
NO PROCEDURE |
integer nobcs |
|
./verification/natl_box_adjoint/code_bulk/SIZE.h |
59 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/natl_box_adjoint/code_pack/SIZE.h |
58 |
NO PROCEDURE |
integer nobcs |
|
./verification/natl_box_adjoint/code_pack/SIZE.h |
59 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./verification/natl_box_adjoint/code_seaice/SIZE.h |
58 |
NO PROCEDURE |
integer nobcs |
|
./verification/natl_box_adjoint/code_seaice/SIZE.h |
59 |
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/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 |
68 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_dic_adjoffline/code_ad/SIZE.h |
69 |
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_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_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 |
59 |
NO PROCEDURE |
integer nobcs |
|
./verification/tutorial_tracer_adjsens/code_ad/SIZE.h |
60 |
NO PROCEDURE |
parameter ( nobcs = 4 ) |
|
./optim/optim_readdata.F |
160 |
OPTIM_READDATA |
read( funit ) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
163 |
OPTIM_READDATA |
read( funit ) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
166 |
OPTIM_READDATA |
read( funit ) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
169 |
OPTIM_READDATA |
read( funit ) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_readdata.F |
275 |
OPTIM_READDATA |
gg = (icvrec-1)/nobcs |
|
./optim/optim_readdata.F |
277 |
OPTIM_READDATA |
iobcs= icvrec - igg*nobcs |
|
./optim/optim_writedata.F |
157 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
160 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
163 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
166 |
OPTIM_WRITEDATA |
write(funit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./optim/optim_writedata.F |
202 |
OPTIM_WRITEDATA |
gg = (icvrec-1)/nobcs |
|
./optim/optim_writedata.F |
204 |
OPTIM_WRITEDATA |
iobcs= icvrec - igg*nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
232 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
236 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
240 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
244 |
ADMTLM_DSVD2MODEL |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
279 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
291 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
303 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
315 |
ADMTLM_DSVD2MODEL |
do iobcs = 1, nobcs |
|
./pkg/admtlm/admtlm_dsvd2model.F |
88 |
ADMTLM_DSVD2MODEL |
integer filenWetobcsnGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
91 |
ADMTLM_DSVD2MODEL |
integer filenWetobcssGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
94 |
ADMTLM_DSVD2MODEL |
integer filenWetobcswGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
97 |
ADMTLM_DSVD2MODEL |
integer filenWetobcseGlo(nr,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
222 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
225 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
228 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
231 |
ADMTLM_MODEL2DSVD |
write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl.h |
128 |
NO PROCEDURE |
integer nwetobcsn ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
129 |
NO PROCEDURE |
integer nwetobcsnglo ( nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
135 |
NO PROCEDURE |
integer nwetobcss ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
136 |
NO PROCEDURE |
integer nwetobcssglo ( nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
142 |
NO PROCEDURE |
integer nwetobcsw ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
143 |
NO PROCEDURE |
integer nwetobcswglo ( nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
149 |
NO PROCEDURE |
integer nwetobcse ( nsx,nsy,nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
150 |
NO PROCEDURE |
integer nwetobcseglo ( nr,nobcs ) |
|
./pkg/ctrl/ctrl.h |
544 |
NO PROCEDURE |
_RL xx_obcsn0 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
545 |
NO PROCEDURE |
_RL xx_obcsn1 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
548 |
NO PROCEDURE |
_RL xx_obcss0 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
549 |
NO PROCEDURE |
_RL xx_obcss1 (1-Olx:sNx+Olx,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
552 |
NO PROCEDURE |
_RL xx_obcsw0 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
553 |
NO PROCEDURE |
_RL xx_obcsw1 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
556 |
NO PROCEDURE |
_RL xx_obcse0 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl.h |
557 |
NO PROCEDURE |
_RL xx_obcse1 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
|
./pkg/ctrl/ctrl_getobcse.F |
122 |
CTRL_GETOBCSE |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcse.F |
126 |
CTRL_GETOBCSE |
& (obcsecount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcse.F |
244 |
CTRL_GETOBCSE |
& (obcsecount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsn.F |
127 |
CTRL_GETOBCSN |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcsn.F |
130 |
CTRL_GETOBCSN |
& (obcsncount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsn.F |
260 |
CTRL_GETOBCSN |
& (obcsncount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcss.F |
124 |
CTRL_GETOBCSS |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcss.F |
127 |
CTRL_GETOBCSS |
& (obcsscount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcss.F |
246 |
CTRL_GETOBCSS |
& (obcsscount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsw.F |
123 |
CTRL_GETOBCSW |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_getobcsw.F |
126 |
CTRL_GETOBCSW |
& (obcswcount0-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_getobcsw.F |
247 |
CTRL_GETOBCSW |
& (obcswcount1-1)*nobcs+iobcs, |
|
./pkg/ctrl/ctrl_init.F |
471 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
473 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
497 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
499 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
523 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
525 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
549 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
551 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
109 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
64 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
79 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
94 |
CTRL_INIT_OBCS_VARIABLES |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
184 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
190 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
196 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
202 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
208 |
CTRL_INIT_WET |
& (ncvarrecs(i)/nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
393 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
409 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
425 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
441 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
45 |
CTRL_INIT_WET |
integer ntmpob(nobcs) |
|
./pkg/ctrl/ctrl_init_wet.F |
465 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
477 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
489 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
501 |
CTRL_INIT_WET |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_init_wet.F |
82 |
CTRL_INIT_WET |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
130 |
CTRL_MASK_SET_XZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
38 |
CTRL_MASK_SET_XZ |
integer nwetobcs (nsx,nsy,nr,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
61 |
CTRL_MASK_SET_XZ |
_RL maskxz (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
86 |
CTRL_MASK_SET_XZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
98 |
CTRL_MASK_SET_XZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
131 |
CTRL_MASK_SET_YZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
38 |
CTRL_MASK_SET_YZ |
integer nwetobcs (nsx,nsy,nr,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
61 |
CTRL_MASK_SET_YZ |
_RL maskyz (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
87 |
CTRL_MASK_SET_YZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
99 |
CTRL_MASK_SET_YZ |
do iobcs = 1,nobcs |
|
./pkg/ctrl/ctrl_obcsvol.F |
171 |
CTRL_OBCSVOL |
& (obcsncount0-1)*nobcs+4, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
207 |
CTRL_OBCSVOL |
& (obcsncount0-1)*nobcs+4, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
242 |
CTRL_OBCSVOL |
& (obcsncount0-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
278 |
CTRL_OBCSVOL |
(obcsncount0-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
330 |
CTRL_OBCSVOL |
& (obcsncount1-1)*nobcs+4, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
365 |
CTRL_OBCSVOL |
& (obcsncount1-1)*nobcs+4, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
400 |
CTRL_OBCSVOL |
& (obcsncount1-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_obcsvol.F |
436 |
CTRL_OBCSVOL |
(obcsncount1-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_pack.F |
207 |
CTRL_PACK |
write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
210 |
CTRL_PACK |
write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
213 |
CTRL_PACK |
write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
216 |
CTRL_PACK |
write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
111 |
CTRL_SET_PACK_XZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
168 |
CTRL_SET_PACK_XZ |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
209 |
CTRL_SET_PACK_XZ |
iobcs= mod((irec-1)*sny+j-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
237 |
CTRL_SET_PACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
304 |
CTRL_SET_PACK_XZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
335 |
CTRL_SET_PACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
46 |
CTRL_SET_PACK_XZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
80 |
CTRL_SET_PACK_XZ |
_RL globmskxz ( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
82 |
CTRL_SET_PACK_XZ |
_RL weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
109 |
CTRL_SET_PACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
166 |
CTRL_SET_PACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
211 |
CTRL_SET_PACK_YZ |
iobcs= mod((irec-1)*snx+i-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
239 |
CTRL_SET_PACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
309 |
CTRL_SET_PACK_YZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
340 |
CTRL_SET_PACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
46 |
CTRL_SET_PACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
78 |
CTRL_SET_PACK_YZ |
_RL globmskyz ( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
80 |
CTRL_SET_PACK_YZ |
_RL weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
114 |
CTRL_SET_UNPACK_XZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
171 |
CTRL_SET_UNPACK_XZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
212 |
CTRL_SET_UNPACK_XZ |
iobcs= mod((irec-1)*sny+j-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
224 |
CTRL_SET_UNPACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
302 |
CTRL_SET_UNPACK_XZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
314 |
CTRL_SET_UNPACK_XZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
45 |
CTRL_SET_UNPACK_XZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
46 |
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 |
74 |
CTRL_SET_UNPACK_XZ |
_RL weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
114 |
CTRL_SET_UNPACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
171 |
CTRL_SET_UNPACK_YZ |
do iobcs=1,nobcs |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
212 |
CTRL_SET_UNPACK_YZ |
iobcs= mod((irec-1)*snx+i-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
224 |
CTRL_SET_UNPACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
300 |
CTRL_SET_UNPACK_YZ |
iobcs= mod(irec-1,nobcs)+1 |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
312 |
CTRL_SET_UNPACK_YZ |
irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
45 |
CTRL_SET_UNPACK_YZ |
_RL weightfld( nr,nobcs ) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
46 |
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 |
74 |
CTRL_SET_UNPACK_YZ |
_RL weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs ) |
|
./pkg/ctrl/ctrl_unpack.F |
218 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
222 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
226 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
230 |
CTRL_UNPACK |
& k=1,nr), iobcs= 1,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
265 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
277 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
289 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
301 |
CTRL_UNPACK |
do iobcs = 1, nobcs |
|
./pkg/ctrl/ctrl_unpack.F |
86 |
CTRL_UNPACK |
integer filenWetobcsnGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
89 |
CTRL_UNPACK |
integer filenWetobcssGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
92 |
CTRL_UNPACK |
integer filenWetobcswGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_unpack.F |
95 |
CTRL_UNPACK |
integer filenWetobcseGlo(nr,nobcs) |
|
./pkg/ctrl/ctrl_volflux.F |
171 |
CTRL_VOLFLUX |
& (obcsncount-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_volflux.F |
219 |
CTRL_VOLFLUX |
& (obcsncount-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_volflux.F |
270 |
CTRL_VOLFLUX |
& (obcsncount-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_volflux.F |
328 |
CTRL_VOLFLUX |
(obcsncount-1)*nobcs+3, doglobalread, |
|
./pkg/ctrl/ctrl_weights.h |
24 |
NO PROCEDURE |
_RL wobcsn ( nr,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
25 |
NO PROCEDURE |
_RL wobcsnLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
30 |
NO PROCEDURE |
_RL wobcss ( nr,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
31 |
NO PROCEDURE |
_RL wobcssLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
36 |
NO PROCEDURE |
_RL wobcsw ( nr,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
37 |
NO PROCEDURE |
_RL wobcswLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
42 |
NO PROCEDURE |
_RL wobcse ( nr,nobcs) |
|
./pkg/ctrl/ctrl_weights.h |
43 |
NO PROCEDURE |
_RL wobcseLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ecco/cost_obcsvol.F |
175 |
COST_OBCSVOL |
gg = (irec-1)/nobcs |
|
./pkg/ecco/cost_obcsvol.F |
177 |
COST_OBCSVOL |
iobcs = irec - igg*nobcs |
|
./pkg/ecco/ecco_cost.h |
1160 |
NO PROCEDURE |
_RL wobcsn ( nr,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1161 |
NO PROCEDURE |
_RL wobcsnLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1167 |
NO PROCEDURE |
_RL wobcss ( nr,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1168 |
NO PROCEDURE |
_RL wobcssLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1174 |
NO PROCEDURE |
_RL wobcsw ( nr,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1175 |
NO PROCEDURE |
_RL wobcswLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1181 |
NO PROCEDURE |
_RL wobcse ( nr,nobcs) |
|
./pkg/ecco/ecco_cost.h |
1182 |
NO PROCEDURE |
_RL wobcseLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1783 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |
|
./pkg/ecco/ecco_cost_weights.F |
196 |
ECCO_COST_WEIGHTS |
do iobcs = 1,nobcs |