| File |
Line number |
Procedure |
Code |
|
./pkg/grdchk/grdchk_getadxx.F |
236 |
GRDCHK_GETADXX |
il=ilnblnk( xx_obcsw_file ) |
|
./pkg/grdchk/grdchk_getadxx.F |
239 |
GRDCHK_GETADXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_getxx.F |
349 |
GRDCHK_GETXX |
il=ilnblnk( xx_obcsw_file ) |
|
./pkg/grdchk/grdchk_getxx.F |
352 |
GRDCHK_GETXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_getxx.F |
355 |
GRDCHK_GETXX |
& xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_setxx.F |
322 |
GRDCHK_SETXX |
il=ilnblnk( xx_obcsw_file ) |
|
./pkg/grdchk/grdchk_setxx.F |
325 |
GRDCHK_SETXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_setxx.F |
328 |
GRDCHK_SETXX |
& xx_obcsw_file(1:il),'.',optimcycle |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
129 |
CTRL_PACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./optim/optim_numbmod.F |
151 |
OPTIM_NUMBMOD |
& xx_obcsn_file, xx_obcss_file, xx_obcsw_file, xx_obcse_file, |
|
./pkg/admtlm/admtlm_dsvd2model.F |
142 |
ADMTLM_DSVD2MODEL |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
133 |
ADMTLM_MODEL2DSVD |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./pkg/ctrl/ctrl.h |
596 |
NO PROCEDURE |
& , xx_obcsw_file |
|
./pkg/ctrl/ctrl.h |
647 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) xx_obcsw_file |
|
./pkg/ctrl/ctrl_getobcsw.F |
111 |
CTRL_GETOBCSW |
ilobcsw=ilnblnk( xx_obcsw_file ) |
|
./pkg/ctrl/ctrl_getobcsw.F |
113 |
CTRL_GETOBCSW |
& xx_obcsw_file(1:ilobcsw), '.', optimcycle |
|
./pkg/ctrl/ctrl_init.F |
532 |
CTRL_INIT |
& xx_obcsw_file, 13, 113, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_obcsvol.F |
151 |
CTRL_OBCSVOL |
ilfld=ilnblnk( xx_obcsw_file ) |
|
./pkg/ctrl/ctrl_obcsvol.F |
153 |
CTRL_OBCSVOL |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
|
./pkg/ctrl/ctrl_pack.F |
129 |
CTRL_PACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./pkg/ctrl/ctrl_readparms.F |
114 |
CTRL_READPARMS |
& xx_obcsw_file, |
|
./pkg/ctrl/ctrl_readparms.F |
301 |
CTRL_READPARMS |
xx_obcsw_file = 'xx_obcsw' |
|
./pkg/ctrl/ctrl_unpack.F |
137 |
CTRL_UNPACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./pkg/ctrl/ctrl_volflux.F |
155 |
CTRL_VOLFLUX |
ilfld=ilnblnk( xx_obcsw_file ) |
|
./pkg/ctrl/ctrl_volflux.F |
157 |
CTRL_VOLFLUX |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
|
./pkg/ecco/cost_obcsvol.F |
154 |
COST_OBCSVOL |
ilfld=ilnblnk( xx_obcsw_file ) |
|
./pkg/ecco/cost_obcsvol.F |
156 |
COST_OBCSVOL |
& xx_obcsw_file(1:ilfld),'.',optimcycle |