| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_argo_salt.F |
133 |
COST_ARGO_SALT |
il=ilnblnk(argosfile) |
|
./pkg/ecco/cost_argo_salt.F |
135 |
COST_ARGO_SALT |
& argosfile(1:il), '_', iyear |
|
./pkg/ecco/cost_argo_salt.F |
138 |
COST_ARGO_SALT |
write(fnametmp(1:80),'(a)') argosfile(1:il) |
|
./pkg/ecco/cost_readargos.F |
84 |
COST_READARGOS |
call MDSREADFIELD( argosfile, cost_iprec, cost_yftype, nr, |
|
./pkg/ecco/ecco_cost.h |
1324 |
NO PROCEDURE |
& argosfile, |
|
./pkg/ecco/ecco_cost.h |
1349 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) argosfile |
|
./pkg/ecco/ecco_cost_init_fixed.F |
129 |
ECCO_COST_INIT_FIXED |
if ( argosfile .ne. ' ' ) |
|
./pkg/ecco/ecco_readparms.F |
221 |
ECCO_READPARMS |
argosfile = ' ' |
|
./pkg/ecco/ecco_readparms.F |
74 |
ECCO_READPARMS |
& argosstartdate1, argosstartdate2, argosfile, |