| File |
Line number |
Procedure |
Code |
|
./pkg/grdchk/grdchk_getadxx.F |
101 |
GRDCHK_GETADXX |
& yadmark, xx_theta_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_getadxx.F |
98 |
GRDCHK_GETADXX |
il=ilnblnk( xx_theta_file ) |
|
./pkg/grdchk/grdchk_getxx.F |
103 |
GRDCHK_GETXX |
il=ilnblnk( xx_theta_file ) |
|
./pkg/grdchk/grdchk_getxx.F |
106 |
GRDCHK_GETXX |
& yadmark, xx_theta_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_getxx.F |
109 |
GRDCHK_GETXX |
& xx_theta_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_setxx.F |
100 |
GRDCHK_SETXX |
il=ilnblnk( xx_theta_file ) |
|
./pkg/grdchk/grdchk_setxx.F |
103 |
GRDCHK_SETXX |
& yadmark, xx_theta_file(1:il),'.',optimcycle |
|
./pkg/grdchk/grdchk_setxx.F |
106 |
GRDCHK_SETXX |
& xx_theta_file(1:il),'.',optimcycle |
|
./pkg/openad/the_model_main.F |
485 |
THE_MODEL_MAIN |
il=ilnblnk( xx_theta_file ) |
|
./pkg/openad/the_model_main.F |
487 |
THE_MODEL_MAIN |
& 'ad',xx_theta_file(1:il),'.' |
|
./optim/optim_numbmod.F |
114 |
OPTIM_NUMBMOD |
& xx_theta_file, xx_salt_file, |
|
./pkg/admtlm/admtlm_bypassad.F |
177 |
ADMTLM_BYPASSAD |
il = ilnblnk(xx_theta_file) |
|
./pkg/admtlm/admtlm_bypassad.F |
179 |
ADMTLM_BYPASSAD |
& xx_theta_file(1:il),'.',optimcycle |
|
./pkg/admtlm/admtlm_dsvd2model.F |
128 |
ADMTLM_DSVD2MODEL |
call CTRL_SET_FNAME(xx_theta_file, fname_theta, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
120 |
ADMTLM_MODEL2DSVD |
call CTRL_SET_FNAME(xx_theta_file, fname_theta, mythid) |
|
./pkg/ctrl/ctrl.h |
635 |
NO PROCEDURE |
& xx_theta_file |
|
./pkg/ctrl/ctrl.h |
693 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) xx_theta_file |
|
./pkg/ctrl/ctrl_init.F |
134 |
CTRL_INIT |
& xx_theta_file, 1, 101, 1, 1, 1, |
|
./pkg/ctrl/ctrl_map_ini.F |
101 |
CTRL_MAP_INI |
il=ilnblnk( xx_theta_file ) |
|
./pkg/ctrl/ctrl_map_ini.F |
103 |
CTRL_MAP_INI |
& xx_theta_file(1:il),'.',optimcycle |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
142 |
CTRL_MAP_INI_ECCO |
call CTRL_MAP_INI_GEN3D(xx_theta_file, 'wthetaLev', |
|
./pkg/ctrl/ctrl_pack.F |
122 |
CTRL_PACK |
call CTRL_SET_FNAME(xx_theta_file, fname_theta, mythid) |
|
./pkg/ctrl/ctrl_readparms.F |
188 |
CTRL_READPARMS |
xx_theta_file = 'xx_theta' |
|
./pkg/ctrl/ctrl_readparms.F |
69 |
CTRL_READPARMS |
& xx_theta_file, xx_salt_file, |
|
./pkg/ctrl/ctrl_unpack.F |
131 |
CTRL_UNPACK |
call CTRL_SET_FNAME(xx_theta_file, fname_theta, mythid) |
|
./pkg/ecco/cost_theta0.F |
100 |
COST_THETA0 |
ilfld = ilnblnk( xx_theta_file ) |
|
./pkg/ecco/cost_theta0.F |
102 |
COST_THETA0 |
& xx_theta_file(1:ilfld),'.',optimcycle |