| File |
Line number |
Procedure |
Code |
|
./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) |
|
./optim/optim_numbmod.F |
142 |
OPTIM_NUMBMOD |
& xx_obcsw_file, |
|
./pkg/grdchk/grdchk_getxx.F |
388 |
GRDCHK_GETXX |
il=ilnblnk( xx_obcsw_file ) |
|
./pkg/grdchk/grdchk_getxx.F |
391 |
GRDCHK_GETXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_getxx.F |
394 |
GRDCHK_GETXX |
& xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_setxx.F |
361 |
GRDCHK_SETXX |
il=ilnblnk( xx_obcsw_file ) |
|
./pkg/grdchk/grdchk_setxx.F |
364 |
GRDCHK_SETXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_setxx.F |
367 |
GRDCHK_SETXX |
& xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_getadxx.F |
263 |
GRDCHK_GETADXX |
il=ilnblnk( xx_obcsw_file ) |
|
./pkg/grdchk/grdchk_getadxx.F |
266 |
GRDCHK_GETADXX |
& yadmark, xx_obcsw_file(1:il),'.',optimcycle |
|
./pkg/ecco/cost_obcsvol.F |
152 |
COST_OBCSVOL |
ilfld=ilnblnk( xx_obcsw_file ) |
|
./pkg/ecco/cost_obcsvol.F |
154 |
COST_OBCSVOL |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
|
./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_unpack.F |
131 |
CTRL_UNPACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
122 |
CTRL_PACK |
call CTRL_SET_FNAME(xx_obcsw_file, fname_obcsw, mythid) |
|
./pkg/ctrl/ctrl_obcsvol.F |
149 |
CTRL_OBCSVOL |
ilfld=ilnblnk( xx_obcsw_file ) |
|
./pkg/ctrl/ctrl_obcsvol.F |
151 |
CTRL_OBCSVOL |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
|
./pkg/ctrl/ctrl_init.F |
513 |
CTRL_INIT |
& xx_obcsw_file, 13, 113, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl.h |
487 |
NO PROCEDURE |
& , xx_obcsw_file |
|
./pkg/ctrl/ctrl.h |
523 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) xx_obcsw_file |
|
./pkg/ctrl/ctrl_volflux.F |
153 |
CTRL_VOLFLUX |
ilfld=ilnblnk( xx_obcsw_file ) |
|
./pkg/ctrl/ctrl_volflux.F |
155 |
CTRL_VOLFLUX |
& xx_obcsw_file(1:ilfld),'.',optimcycle |
|
./pkg/ctrl/ctrl_readparms.F |
112 |
CTRL_READPARMS |
& xx_obcsw_file, |
|
./pkg/ctrl/ctrl_readparms.F |
256 |
CTRL_READPARMS |
xx_obcsw_file = 'xx_obcsw' |