| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_obcs_ageos.F |
132 |
COST_OBCS_AGEOS |
iltheta = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_obcs_ageos.F |
134 |
COST_OBCS_AGEOS |
& tbarfile(1:iltheta),'.',optimcycle |
|
./pkg/ecco/cost_xbt.F |
113 |
COST_XBT |
ilu=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_xbt.F |
115 |
COST_XBT |
& tbarfile(1:ilu),'.',optimcycle |
|
./pkg/ecco/cost_obcsn.F |
108 |
COST_OBCSN |
il = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_obcsn.F |
110 |
COST_OBCSN |
& tbarfile(1:il),'.',optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
156 |
ECCO_COST_INIT_BARFILES |
ilt=ilnblnk( tbarfile ) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
158 |
ECCO_COST_INIT_BARFILES |
& tbarfile(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
160 |
ECCO_COST_INIT_BARFILES |
& yadprefix, tbarfile(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
173 |
ECCO_COST_INIT_BARFILES |
ilt=ilnblnk( tbarfile ) |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
175 |
ECCO_COST_INIT_BARFILES |
& tbarfile(1:ilt), '.', optimcycle |
|
./pkg/ecco/ecco_cost_init_barfiles.F |
177 |
ECCO_COST_INIT_BARFILES |
& yadprefix, tbarfile(1:ilt), '.', optimcycle |
|
./pkg/ecco/cost_ctdtclim.F |
110 |
COST_CTDTCLIM |
ilctdtclim = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_ctdtclim.F |
112 |
COST_CTDTCLIM |
& tbarfile(1:ilctdtclim),'.',optimcycle |
|
./pkg/ecco/cost_tmi.F |
100 |
COST_TMI |
& tbarfile(1:iltheta),'.',optimcycle |
|
./pkg/ecco/cost_tmi.F |
98 |
COST_TMI |
iltheta = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_argo_theta.F |
111 |
COST_ARGO_THETA |
ilu=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_argo_theta.F |
113 |
COST_ARGO_THETA |
& tbarfile(1:ilu),'.',optimcycle |
|
./pkg/ecco/ecco_readparms.F |
101 |
ECCO_READPARMS |
tbarfile = 'tbar' |
|
./pkg/ecco/ecco_readparms.F |
44 |
ECCO_READPARMS |
& tbarfile, sbarfile, psbarfile, |
|
./pkg/ecco/cost_ctdt.F |
109 |
COST_CTDT |
ilu=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_ctdt.F |
111 |
COST_CTDT |
& tbarfile(1:ilu),'.',optimcycle |
|
./pkg/ecco/cost_trans_zonal.F |
117 |
COST_TRANS_ZONAL |
il=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_trans_zonal.F |
119 |
COST_TRANS_ZONAL |
& tbarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_obcss.F |
108 |
COST_OBCSS |
il = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_obcss.F |
110 |
COST_OBCSS |
& tbarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_obcsw.F |
108 |
COST_OBCSW |
il = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_obcsw.F |
110 |
COST_OBCSW |
& tbarfile(1:il),'.',optimcycle |
|
./pkg/ecco/ecco_cost.h |
182 |
NO PROCEDURE |
& tbarfile, |
|
./pkg/ecco/ecco_cost.h |
192 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) tbarfile |
|
./pkg/ecco/cost_theta.F |
109 |
COST_THETA |
iltheta = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_theta.F |
111 |
COST_THETA |
& tbarfile(1:iltheta),'.',optimcycle |
|
./pkg/ecco/cost_averagesfields.F |
216 |
COST_AVERAGESFIELDS |
ilt=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_averagesfields.F |
217 |
COST_AVERAGESFIELDS |
write(fnametbar,'(2a,i10.10)') tbarfile(1:ilt),'.',optimcycle |
|
./pkg/ecco/cost_averagesfields.F |
279 |
COST_AVERAGESFIELDS |
ilt=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_averagesfields.F |
280 |
COST_AVERAGESFIELDS |
write(fnametbar,'(2a,i10.10)') tbarfile(1:ilt),'.',optimcycle |
|
./pkg/ecco/cost_sst.F |
100 |
COST_SST |
& tbarfile(1:iltheta),'.',optimcycle |
|
./pkg/ecco/cost_sst.F |
98 |
COST_SST |
iltheta = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_trans_merid.F |
128 |
COST_TRANS_MERID |
il=ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_trans_merid.F |
130 |
COST_TRANS_MERID |
& tbarfile(1:il),'.',optimcycle |
|
./pkg/ecco/cost_drift.F |
108 |
COST_DRIFT |
iltheta = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_drift.F |
110 |
COST_DRIFT |
& tbarfile(1:iltheta),'.',optimcycle |
|
./pkg/ecco/cost_obcse.F |
108 |
COST_OBCSE |
il = ilnblnk( tbarfile ) |
|
./pkg/ecco/cost_obcse.F |
110 |
COST_OBCSE |
& tbarfile(1:il),'.',optimcycle |