| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_argo_theta.F |
136 |
COST_ARGO_THETA |
il=ilnblnk(argotfile) |
|
./pkg/ecco/cost_argo_theta.F |
138 |
COST_ARGO_THETA |
& argotfile(1:il), '_', iyear |
|
./pkg/ecco/cost_argo_theta.F |
141 |
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 |
1323 |
NO PROCEDURE |
& argotfile, |
|
./pkg/ecco/ecco_cost.h |
1348 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) argotfile |
|
./pkg/ecco/ecco_cost_init_fixed.F |
126 |
ECCO_COST_INIT_FIXED |
if ( argotfile .ne. ' ' ) |
|
./pkg/ecco/ecco_readparms.F |
218 |
ECCO_READPARMS |
argotfile = ' ' |
|
./pkg/ecco/ecco_readparms.F |
73 |
ECCO_READPARMS |
& argotstartdate1, argotstartdate2, argotfile, |