File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_getadxx.F |
201 |
GRDCHK_GETADXX |
il=ilnblnk( xx_obcsn_file ) |
./pkg/grdchk/grdchk_getadxx.F |
204 |
GRDCHK_GETADXX |
& yadmark, xx_obcsn_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_getxx.F |
254 |
GRDCHK_GETXX |
il=ilnblnk( xx_obcsn_file ) |
./pkg/grdchk/grdchk_getxx.F |
257 |
GRDCHK_GETXX |
& yadmark, xx_obcsn_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_getxx.F |
260 |
GRDCHK_GETXX |
& xx_obcsn_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_setxx.F |
251 |
GRDCHK_SETXX |
il=ilnblnk( xx_obcsn_file ) |
./pkg/grdchk/grdchk_setxx.F |
254 |
GRDCHK_SETXX |
& yadmark, xx_obcsn_file(1:il),'.',optimcycle |
./pkg/grdchk/grdchk_setxx.F |
257 |
GRDCHK_SETXX |
& xx_obcsn_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 |
141 |
ADMTLM_DSVD2MODEL |
call CTRL_SET_FNAME(xx_obcsn_file, fname_obcsn, mythid) |
./pkg/admtlm/admtlm_model2dsvd.F |
133 |
ADMTLM_MODEL2DSVD |
call CTRL_SET_FNAME(xx_obcsn_file, fname_obcsn, mythid) |
./pkg/ctrl/CTRL_OBCS.h |
43 |
NO PROCEDURE |
& xx_obcsn_file |
./pkg/ctrl/CTRL_OBCS.h |
47 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) xx_obcsn_file |
./pkg/ctrl/ctrl_getobcsn.F |
114 |
CTRL_GETOBCSN |
ilobcsn=ilnblnk( xx_obcsn_file ) |
./pkg/ctrl/ctrl_getobcsn.F |
116 |
CTRL_GETOBCSN |
& xx_obcsn_file(1:ilobcsn), '.', optimcycle |
./pkg/ctrl/ctrl_init.F |
353 |
CTRL_INIT |
call CTRL_INIT_REC ( xx_obcsn_file, |
./pkg/ctrl/ctrl_init.F |
358 |
CTRL_INIT |
& xx_obcsn_file, 11, 111, diffrec, startrec, endrec, |
./pkg/ctrl/ctrl_pack.F |
130 |
CTRL_PACK |
call CTRL_SET_FNAME(xx_obcsn_file, fname_obcsn, mythid) |
./pkg/ctrl/ctrl_readparms.F |
116 |
CTRL_READPARMS |
& xx_obcsn_file, |
./pkg/ctrl/ctrl_readparms.F |
423 |
CTRL_READPARMS |
xx_obcsn_file = 'xx_obcsn' |
./pkg/ctrl/ctrl_unpack.F |
139 |
CTRL_UNPACK |
call CTRL_SET_FNAME(xx_obcsn_file, fname_obcsn, mythid) |
./pkg/ecco/cost_obcsn.F |
147 |
COST_OBCSN |
ilfld=ilnblnk( xx_obcsn_file ) |
./pkg/ecco/cost_obcsn.F |
149 |
COST_OBCSN |
& xx_obcsn_file(1:ilfld), '.', optimcycle |
./pkg/ecco/cost_obcsvol.F |
157 |
COST_OBCSVOL |
ilfld=ilnblnk( xx_obcsn_file ) |
./pkg/ecco/cost_obcsvol.F |
159 |
COST_OBCSVOL |
& xx_obcsn_file(1:ilfld),'.', optimcycle |