| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_obcs_ageos.F |
138 |
COST_OBCS_AGEOS |
iluvel = ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_obcs_ageos.F |
140 |
COST_OBCS_AGEOS |
& ubarfile(1:iluvel),'.',optimcycle |
|
./pkg/ecco/cost_drifter.F |
117 |
COST_DRIFTER |
ilu = ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_drifter.F |
119 |
COST_DRIFTER |
& ubarfile(1:ilu),'.',optimcycle |
|
./pkg/ecco/cost_obcsn.F |
182 |
COST_OBCSN |
il = ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_obcsn.F |
184 |
COST_OBCSN |
& ubarfile(1:il),'.',optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
237 |
ECCO_COST_INIT_BARFILES |
ils=ilnblnk( ubarfile ) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
239 |
ECCO_COST_INIT_BARFILES |
& ubarfile(1:ils), '.', optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
243 |
ECCO_COST_INIT_BARFILES |
& yadprefix, ubarfile(1:ils), '.', optimcycle |
|
./pkg/ecco/ecco_readparms.F |
104 |
ECCO_READPARMS |
ubarfile = 'ubar' |
|
./pkg/ecco/ecco_readparms.F |
45 |
ECCO_READPARMS |
& ubarfile, vbarfile, wbarfile, |
|
./pkg/ecco/cost_trans_zonal.F |
125 |
COST_TRANS_ZONAL |
il=ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_trans_zonal.F |
127 |
COST_TRANS_ZONAL |
& ubarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_obcss.F |
182 |
COST_OBCSS |
il = ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_obcss.F |
184 |
COST_OBCSS |
& ubarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_obcsw.F |
182 |
COST_OBCSW |
il = ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_obcsw.F |
184 |
COST_OBCSW |
& ubarfile(1:il),'.',optimcycle |
|
./pkg/ecco/ecco_cost.h |
185 |
NO PROCEDURE |
& ubarfile, |
|
./pkg/ecco/ecco_cost.h |
195 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) ubarfile |
|
./pkg/ecco/cost_averagesfields.F |
549 |
COST_AVERAGESFIELDS |
ils=ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_averagesfields.F |
550 |
COST_AVERAGESFIELDS |
write(fnameubar,'(2a,i10.10)') ubarfile(1:ils),'.', |
|
./pkg/ecco/cost_trans_merid.F |
136 |
COST_TRANS_MERID |
il=ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_trans_merid.F |
138 |
COST_TRANS_MERID |
& ubarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_obcse.F |
182 |
COST_OBCSE |
il = ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_obcse.F |
184 |
COST_OBCSE |
& ubarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_curmtr.F |
118 |
COST_CURMTR |
ilu=ilnblnk( ubarfile ) |
|
./pkg/ecco/cost_curmtr.F |
120 |
COST_CURMTR |
& ubarfile(1:ilu), '.', optimcycle |