| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_argo_theta.F |
137 |
COST_ARGO_THETA |
il=ilnblnk(argotfile) |
|
./pkg/ecco/cost_argo_theta.F |
139 |
COST_ARGO_THETA |
& argotfile(1:il), '_', iyear |
|
./pkg/ecco/cost_argo_theta.F |
142 |
COST_ARGO_THETA |
write(fnametmp(1:80),'(a)') argotfile(1:il) |
|
./pkg/ecco/cost_readargot.F |
84 |
COST_READARGOT |
call MDSREADFIELD( argotfile, cost_iprec, cost_yftype, nr, |
|
./pkg/ecco/ecco_cost.h |
1487 |
NO PROCEDURE |
& argotfile, |
|
./pkg/ecco/ecco_cost.h |
1516 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) argotfile |
|
./pkg/ecco/ecco_cost_init_fixed.F |
139 |
ECCO_COST_INIT_FIXED |
if ( argotfile .ne. ' ' ) |
|
./pkg/ecco/ecco_readparms.F |
298 |
ECCO_READPARMS |
argotfile = ' ' |
|
./pkg/ecco/ecco_readparms.F |
91 |
ECCO_READPARMS |
& argotstartdate1, argotstartdate2, argotfile, |