File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_seaicev4.F |
236 |
COST_GENCOST_SEAICEV4 |
& fname0,localrec,obsrec,exst,mythid) |
./pkg/ecco/cost_gencost_seaicev4.F |
246 |
COST_GENCOST_SEAICEV4 |
& fname0,localrec,obsrec,exst,mythid) |
./pkg/ecco/cost_gencost_seaicev4.F |
257 |
COST_GENCOST_SEAICEV4 |
& fname0,localrec,obsrec,exst,mythid) |
./pkg/ecco/cost_gencost_seaicev4.F |
269 |
COST_GENCOST_SEAICEV4 |
call MDSREADFIELD( fname0, cost_iprec, cost_yftype, nnzsiv4, |
./pkg/ecco/cost_gencost_seaicev4.F |
272 |
COST_GENCOST_SEAICEV4 |
il=ilnblnk( fname0 ) |
./pkg/ecco/cost_gencost_seaicev4.F |
275 |
COST_GENCOST_SEAICEV4 |
& fname0(1:il) |
./pkg/ecco/cost_gencost_seaicev4.F |
97 |
COST_GENCOST_SEAICEV4 |
character*(128) fname0, fname0w, fname1 |
./pkg/ecco/cost_gencost_transp.F |
215 |
COST_GENCOST_TRANSP |
& fname0,localrec,obsrec,exst,mythid) |
./pkg/ecco/cost_gencost_transp.F |
83 |
COST_GENCOST_TRANSP |
character*(128) fname1, fname0 |