File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_set_globfld_xy.F |
108 |
CTRL_SET_GLOBFLD_XY |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_set_globfld_xy.F |
114 |
CTRL_SET_GLOBFLD_XY |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_set_globfld_yz.F |
108 |
CTRL_SET_GLOBFLD_YZ |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_set_globfld_yz.F |
114 |
CTRL_SET_GLOBFLD_YZ |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
230 |
CTRL_SET_UNPACK_YZ |
& optimcycle, mythid) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
298 |
CTRL_SET_UNPACK_YZ |
& optimcycle, mythid) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
136 |
CTRL_SET_UNPACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
139 |
CTRL_SET_UNPACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
143 |
CTRL_SET_UNPACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
146 |
CTRL_SET_UNPACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
261 |
CTRL_SET_UNPACK_XYZ |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_map_ini_ecco.F |
103 |
CTRL_MAP_INI_ECCO |
& xx_theta_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
105 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
171 |
CTRL_MAP_INI_ECCO |
& xx_salt_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
173 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
227 |
CTRL_MAP_INI_ECCO |
& xx_edtaux_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
229 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
249 |
CTRL_MAP_INI_ECCO |
& xx_edtauy_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
251 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
271 |
CTRL_MAP_INI_ECCO |
& xx_uvel_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
273 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
293 |
CTRL_MAP_INI_ECCO |
& xx_vvel_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
295 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
315 |
CTRL_MAP_INI_ECCO |
& xx_etan_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
317 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
334 |
CTRL_MAP_INI_ECCO |
& xx_relaxsst_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
336 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
355 |
CTRL_MAP_INI_ECCO |
& xx_relaxsss_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_ini_ecco.F |
357 |
CTRL_MAP_INI_ECCO |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_set_globfld_xz.F |
108 |
CTRL_SET_GLOBFLD_XZ |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_set_globfld_xz.F |
114 |
CTRL_SET_GLOBFLD_XZ |
& irec, optimcycle, mythid) |
./pkg/ctrl/ctrl_volflux.F |
140 |
CTRL_VOLFLUX |
if (optimcycle .ge. 0) then |
./pkg/ctrl/ctrl_volflux.F |
145 |
CTRL_VOLFLUX |
& xx_obcsn_file(1:ilfld),'.', optimcycle |
./pkg/ctrl/ctrl_volflux.F |
150 |
CTRL_VOLFLUX |
& xx_obcss_file(1:ilfld),'.',optimcycle |
./pkg/ctrl/ctrl_volflux.F |
155 |
CTRL_VOLFLUX |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
./pkg/ctrl/ctrl_volflux.F |
160 |
CTRL_VOLFLUX |
& xx_obcse_file(1:ilfld),'.',optimcycle |
./pkg/ctrl/ctrl_volflux.F |
170 |
CTRL_VOLFLUX |
& ladinit, optimcycle, mythid |
./pkg/ctrl/ctrl_volflux.F |
218 |
CTRL_VOLFLUX |
& ladinit, optimcycle, mythid |
./pkg/ctrl/ctrl_volflux.F |
269 |
CTRL_VOLFLUX |
& ladinit, optimcycle, mythid |
./pkg/ctrl/ctrl_volflux.F |
327 |
CTRL_VOLFLUX |
ladinit, optimcycle, mythid |
./pkg/ctrl/ctrl_hfacc_ini.F |
119 |
CTRL_HFACC_INI |
& xx_hfacc_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_hfacc_ini.F |
122 |
CTRL_HFACC_INI |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_hfacc_ini.F |
138 |
CTRL_HFACC_INI |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/optim.h |
48 |
NO PROCEDURE |
& optimcycle, |
./pkg/ctrl/optim.h |
54 |
NO PROCEDURE |
integer optimcycle |
./pkg/ctrl/ctrl_set_pack_xyz.F |
128 |
CTRL_SET_PACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_pack_xyz.F |
131 |
CTRL_SET_PACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_pack_xyz.F |
135 |
CTRL_SET_PACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/ctrl_set_pack_xyz.F |
138 |
CTRL_SET_PACK_XYZ |
& ivartype, '_', optimcycle, '.bin' |
./pkg/ctrl/optim_readparms.F |
54 |
OPTIM_READPARMS |
& optimcycle, nvars, |
./pkg/ctrl/optim_readparms.F |
63 |
OPTIM_READPARMS |
optimcycle = 0 |
./pkg/ctrl/ctrl_get_gen.F |
101 |
CTRL_GET_GEN |
if (optimcycle .ge. 0) then |
./pkg/ctrl/ctrl_get_gen.F |
104 |
CTRL_GET_GEN |
& xx_gen_file(1:ilgen), '.', optimcycle |
./pkg/ctrl/ctrl_get_gen.F |
116 |
CTRL_GET_GEN |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_get_gen.F |
129 |
CTRL_GET_GEN |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_unpack.F |
158 |
CTRL_UNPACK |
& yctrlposunpack(1:4), optimcycle |
./pkg/ctrl/ctrl_unpack.F |
166 |
CTRL_UNPACK |
& yctrlposunpack(1:4), optimcycle |
./pkg/ctrl/ctrl_getobcss.F |
109 |
CTRL_GETOBCSS |
if (optimcycle .ge. 0) then |
./pkg/ctrl/ctrl_getobcss.F |
112 |
CTRL_GETOBCSS |
& xx_obcss_file(1:ilobcss), '.', optimcycle |
./pkg/ctrl/ctrl_getobcss.F |
126 |
CTRL_GETOBCSS |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_getobcss.F |
131 |
CTRL_GETOBCSS |
if ( optimcycle .gt. 0) then |
./pkg/ctrl/ctrl_getobcss.F |
245 |
CTRL_GETOBCSS |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_getobcss.F |
250 |
CTRL_GETOBCSS |
if ( optimcycle .gt. 0) then |
./pkg/ctrl/ctrl_map_forcing.F |
100 |
CTRL_MAP_FORCING |
& xx_tauv_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_forcing.F |
102 |
CTRL_MAP_FORCING |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_forcing.F |
119 |
CTRL_MAP_FORCING |
& xx_sflux_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_forcing.F |
121 |
CTRL_MAP_FORCING |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_forcing.F |
138 |
CTRL_MAP_FORCING |
& xx_hflux_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_forcing.F |
140 |
CTRL_MAP_FORCING |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_forcing.F |
157 |
CTRL_MAP_FORCING |
& xx_sss_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_forcing.F |
159 |
CTRL_MAP_FORCING |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_forcing.F |
176 |
CTRL_MAP_FORCING |
& xx_sst_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_forcing.F |
178 |
CTRL_MAP_FORCING |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_map_forcing.F |
81 |
CTRL_MAP_FORCING |
& xx_tauu_file(1:il),'.',optimcycle |
./pkg/ctrl/ctrl_map_forcing.F |
83 |
CTRL_MAP_FORCING |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_getobcsn.F |
112 |
CTRL_GETOBCSN |
if (optimcycle .ge. 0) then |
./pkg/ctrl/ctrl_getobcsn.F |
115 |
CTRL_GETOBCSN |
& xx_obcsn_file(1:ilobcsn), '.', optimcycle |
./pkg/ctrl/ctrl_getobcsn.F |
129 |
CTRL_GETOBCSN |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_getobcsn.F |
134 |
CTRL_GETOBCSN |
if ( optimcycle .gt. 0) then |
./pkg/ctrl/ctrl_getobcsn.F |
259 |
CTRL_GETOBCSN |
& doglobalread, ladinit, optimcycle, |
./pkg/ctrl/ctrl_getobcsn.F |
264 |
CTRL_GETOBCSN |
if ( optimcycle .gt. 0) then |
./pkg/ctrl/ctrl_init_ctrlvar.F |
79 |
CTRL_INIT_CTRLVAR |
if ( doInitXX .AND. optimcycle.eq.0 ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
84 |
CTRL_INIT_CTRLVAR |
if ( doInitXX .AND. optimcycle.eq.0 ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
89 |
CTRL_INIT_CTRLVAR |
if ( doInitXX .AND. optimcycle.eq.0 ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
94 |
CTRL_INIT_CTRLVAR |
if ( doInitXX .AND. optimcycle.eq.0 ) |