File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_getadxx.F |
217 |
GRDCHK_GETADXX |
il=ilnblnk( xx_obcsw_file ) |
./pkg/grdchk/grdchk_getadxx.F |
220 |
GRDCHK_GETADXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_getxx.F |
278 |
GRDCHK_GETXX |
il=ilnblnk( xx_obcsw_file ) |
./pkg/grdchk/grdchk_getxx.F |
281 |
GRDCHK_GETXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_getxx.F |
284 |
GRDCHK_GETXX |
& xx_obcsw_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_setxx.F |
276 |
GRDCHK_SETXX |
il=ilnblnk( xx_obcsw_file ) |
./pkg/grdchk/grdchk_setxx.F |
279 |
GRDCHK_SETXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_setxx.F |
282 |
GRDCHK_SETXX |
& xx_obcsw_file(1:il),'.',optimcycle |
./optim/optim_numbmod.F |
156 |
OPTIM_NUMBMOD |
& xx_obcsn_file, xx_obcss_file, xx_obcsw_file, xx_obcse_file, |
./pkg/admtlm/admtlm_dsvd2model.F |
143 |
ADMTLM_DSVD2MODEL |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
./pkg/admtlm/admtlm_model2dsvd.F |
135 |
ADMTLM_MODEL2DSVD |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
./pkg/ctrl/CTRL_OBCS.h |
45 |
NO PROCEDURE |
& , xx_obcsw_file |
./pkg/ctrl/CTRL_OBCS.h |
49 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) xx_obcsw_file |
./pkg/ctrl/ctrl_getobcsw.F |
109 |
CTRL_GETOBCSW |
ilobcsw=ilnblnk( xx_obcsw_file ) |
./pkg/ctrl/ctrl_getobcsw.F |
111 |
CTRL_GETOBCSW |
& xx_obcsw_file(1:ilobcsw), '.', optimcycle |
./pkg/ctrl/ctrl_init.F |
379 |
CTRL_INIT |
call CTRL_INIT_REC ( xx_obcsw_file, |
./pkg/ctrl/ctrl_init.F |
384 |
CTRL_INIT |
& xx_obcsw_file, 13, 113, diffrec, startrec, endrec, |
./pkg/ctrl/ctrl_pack.F |
132 |
CTRL_PACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
./pkg/ctrl/ctrl_readparms.F |
120 |
CTRL_READPARMS |
& xx_obcsw_file, |
./pkg/ctrl/ctrl_readparms.F |
433 |
CTRL_READPARMS |
xx_obcsw_file = 'xx_obcsw' |
./pkg/ctrl/ctrl_unpack.F |
141 |
CTRL_UNPACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
./pkg/ecco/cost_obcsvol.F |
167 |
COST_OBCSVOL |
ilfld=ilnblnk( xx_obcsw_file ) |
./pkg/ecco/cost_obcsvol.F |
169 |
COST_OBCSVOL |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
./pkg/ecco/cost_obcsw.F |
147 |
COST_OBCSW |
ilfld=ilnblnk( xx_obcsw_file ) |
./pkg/ecco/cost_obcsw.F |
149 |
COST_OBCSW |
& xx_obcsw_file(1:ilfld), '.', optimcycle |