File |
Line number |
Procedure |
Code |
./optim/optim_numbmod.F |
177 |
OPTIM_NUMBMOD |
& ctrlname, costname, scalname, maskname, metaname |
./optim/optim_readdata.F |
116 |
OPTIM_READDATA |
else if ( dfile .eq. costname ) then |
./optim/optim_readdata.F |
387 |
OPTIM_READDATA |
else if ( dfile .eq. costname ) then |
./optim/simul.F |
77 |
SIMUL |
call OPTIM_READDATA( nn, costname, lheaderonly, objf, adxx ) |
./pkg/admtlm/admtlm_dsvd2model.F |
180 |
ADMTLM_DSVD2MODEL |
& costname(1:9),'_',yctrlid(1:10), |
./pkg/admtlm/admtlm_dsvd2model.F |
182 |
ADMTLM_DSVD2MODEL |
print *, 'ph-pack: unpacking ', costname(1:9) |
./pkg/admtlm/admtlm_model2dsvd.F |
172 |
ADMTLM_MODEL2DSVD |
& costname(1:9),'_',yctrlid(1:10), |
./pkg/admtlm/admtlm_model2dsvd.F |
174 |
ADMTLM_MODEL2DSVD |
print *, 'ph-pack: packing ', costname(1:9) |
./pkg/ctrl/ctrl.h |
213 |
NO PROCEDURE |
& costname, |
./pkg/ctrl/ctrl.h |
222 |
NO PROCEDURE |
character*9 costname |
./pkg/ctrl/ctrl_pack.F |
208 |
CTRL_PACK |
& costname(1:9),'_',yctrlid(1:10), |
./pkg/ctrl/ctrl_pack.F |
210 |
CTRL_PACK |
write(standardMessageUnit,*) 'ph-pack: packing ',costname(1:9) |
./pkg/ctrl/ctrl_readparms.F |
150 |
CTRL_READPARMS |
& ctrlname, costname, scalname, maskname, metaname |
./pkg/ctrl/ctrl_readparms.F |
492 |
CTRL_READPARMS |
costname = 'ecco_cost' |
./pkg/ctrl/ctrl_unpack.F |
210 |
CTRL_UNPACK |
& costname(1:9),'_',yctrlid(1:10), |
./pkg/ctrl/ctrl_unpack.F |
213 |
CTRL_UNPACK |
& costname(1:9) |