File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_obcs_ageos.F |
135 |
COST_OBCS_AGEOS |
ilsalt = ilnblnk( sbarfile ) |
./pkg/ecco/cost_obcs_ageos.F |
137 |
COST_OBCS_AGEOS |
& sbarfile(1:ilsalt),'.',optimcycle |
./pkg/ecco/cost_salt.F |
110 |
COST_SALT |
ilsalt = ilnblnk( sbarfile ) |
./pkg/ecco/cost_salt.F |
112 |
COST_SALT |
& sbarfile(1:ilsalt),'.',optimcycle |
./pkg/ecco/cost_obcsn.F |
145 |
COST_OBCSN |
il = ilnblnk( sbarfile ) |
./pkg/ecco/cost_obcsn.F |
147 |
COST_OBCSN |
& sbarfile(1:il),'.',optimcycle |
./pkg/ecco/ecco_cost_init_barfiles.F |
195 |
ECCO_COST_INIT_BARFILES |
ils=ilnblnk( sbarfile ) |
./pkg/ecco/ecco_cost_init_barfiles.F |
197 |
ECCO_COST_INIT_BARFILES |
& sbarfile(1:ils), '.', optimcycle |
./pkg/ecco/ecco_cost_init_barfiles.F |
199 |
ECCO_COST_INIT_BARFILES |
& yadprefix, sbarfile(1:ils), '.', optimcycle |
./pkg/ecco/ecco_cost_init_barfiles.F |
212 |
ECCO_COST_INIT_BARFILES |
ils=ilnblnk( sbarfile ) |
./pkg/ecco/ecco_cost_init_barfiles.F |
214 |
ECCO_COST_INIT_BARFILES |
& sbarfile(1:ils), '.', optimcycle |
./pkg/ecco/ecco_cost_init_barfiles.F |
216 |
ECCO_COST_INIT_BARFILES |
& yadprefix, sbarfile(1:ils), '.', optimcycle |
./pkg/ecco/cost_ctdsclim.F |
111 |
COST_CTDSCLIM |
ilctdsclim = ilnblnk( sbarfile ) |
./pkg/ecco/cost_ctdsclim.F |
113 |
COST_CTDSCLIM |
& sbarfile(1:ilctdsclim),'.',optimcycle |
./pkg/ecco/cost_sss.F |
100 |
COST_SSS |
& sbarfile(1:ilsalt),'.',optimcycle |
./pkg/ecco/cost_sss.F |
98 |
COST_SSS |
ilsalt = ilnblnk( sbarfile ) |
./pkg/ecco/ecco_readparms.F |
102 |
ECCO_READPARMS |
sbarfile = 'sbar' |
./pkg/ecco/ecco_readparms.F |
44 |
ECCO_READPARMS |
& tbarfile, sbarfile, psbarfile, |
./pkg/ecco/cost_argo_salt.F |
108 |
COST_ARGO_SALT |
ilu=ilnblnk( sbarfile ) |
./pkg/ecco/cost_argo_salt.F |
110 |
COST_ARGO_SALT |
& sbarfile(1:ilu),'.', optimcycle |
./pkg/ecco/cost_trans_zonal.F |
121 |
COST_TRANS_ZONAL |
il=ilnblnk( sbarfile ) |
./pkg/ecco/cost_trans_zonal.F |
123 |
COST_TRANS_ZONAL |
& sbarfile(1:il),'.',optimcycle |
./pkg/ecco/cost_obcss.F |
145 |
COST_OBCSS |
il = ilnblnk( sbarfile ) |
./pkg/ecco/cost_obcss.F |
147 |
COST_OBCSS |
& sbarfile(1:il),'.',optimcycle |
./pkg/ecco/cost_obcsw.F |
145 |
COST_OBCSW |
il = ilnblnk( sbarfile ) |
./pkg/ecco/cost_obcsw.F |
147 |
COST_OBCSW |
& sbarfile(1:il),'.',optimcycle |
./pkg/ecco/ecco_cost.h |
183 |
NO PROCEDURE |
& sbarfile, |
./pkg/ecco/ecco_cost.h |
193 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) sbarfile |
./pkg/ecco/cost_averagesfields.F |
346 |
COST_AVERAGESFIELDS |
ils=ilnblnk( sbarfile ) |
./pkg/ecco/cost_averagesfields.F |
347 |
COST_AVERAGESFIELDS |
write(fnamesbar,'(2a,i10.10)') sbarfile(1:ils),'.', |
./pkg/ecco/cost_averagesfields.F |
410 |
COST_AVERAGESFIELDS |
ilt=ilnblnk( sbarfile ) |
./pkg/ecco/cost_averagesfields.F |
411 |
COST_AVERAGESFIELDS |
write(fnamesbar,'(2a,i10.10)') sbarfile(1:ilt),'.',optimcycle |
./pkg/ecco/cost_ctds.F |
108 |
COST_CTDS |
ilu=ilnblnk( sbarfile ) |
./pkg/ecco/cost_ctds.F |
110 |
COST_CTDS |
& sbarfile(1:ilu),'.',optimcycle |
./pkg/ecco/cost_trans_merid.F |
132 |
COST_TRANS_MERID |
il=ilnblnk( sbarfile ) |
./pkg/ecco/cost_trans_merid.F |
134 |
COST_TRANS_MERID |
& sbarfile(1:il),'.',optimcycle |
./pkg/ecco/cost_drift.F |
111 |
COST_DRIFT |
ilsalt = ilnblnk( sbarfile ) |
./pkg/ecco/cost_drift.F |
113 |
COST_DRIFT |
& sbarfile(1:ilsalt),'.',optimcycle |
./pkg/ecco/cost_obcse.F |
145 |
COST_OBCSE |
il = ilnblnk( sbarfile ) |
./pkg/ecco/cost_obcse.F |
147 |
COST_OBCSE |
& sbarfile(1:il),'.',optimcycle |