| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_argo_salt.F |
110 |
COST_ARGO_SALT |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_argo_salt.F |
125 |
COST_ARGO_SALT |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_argo_salt.F |
68 |
COST_ARGO_SALT |
character*(80) fnamesalt |
|
./pkg/ecco/cost_ctds.F |
110 |
COST_CTDS |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_ctds.F |
125 |
COST_CTDS |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_ctds.F |
68 |
COST_CTDS |
character*(80) fnamesalt |
|
./pkg/ecco/cost_ctdsclim.F |
113 |
COST_CTDSCLIM |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_ctdsclim.F |
127 |
COST_CTDSCLIM |
call ACTIVE_READ_XYZ( fnamesalt, sbar, mrec, |
|
./pkg/ecco/cost_ctdsclim.F |
156 |
COST_CTDSCLIM |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_ctdsclim.F |
77 |
COST_CTDSCLIM |
character*(80) fnamesalt |
|
./pkg/ecco/cost_drift.F |
112 |
COST_DRIFT |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_drift.F |
150 |
COST_DRIFT |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_drift.F |
181 |
COST_DRIFT |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_drift.F |
71 |
COST_DRIFT |
character*(80) fnamesalt |
|
./pkg/ecco/cost_obcs_ageos.F |
137 |
COST_OBCS_AGEOS |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_obcs_ageos.F |
190 |
COST_OBCS_AGEOS |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_obcs_ageos.F |
86 |
COST_OBCS_AGEOS |
character*(80) fnamesalt |
|
./pkg/ecco/cost_obcse.F |
148 |
COST_OBCSE |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_obcse.F |
150 |
COST_OBCSE |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_obcse.F |
68 |
COST_OBCSE |
character*(80) fnamesalt |
|
./pkg/ecco/cost_obcsn.F |
148 |
COST_OBCSN |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_obcsn.F |
150 |
COST_OBCSN |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_obcsn.F |
68 |
COST_OBCSN |
character*(80) fnamesalt |
|
./pkg/ecco/cost_obcss.F |
148 |
COST_OBCSS |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_obcss.F |
150 |
COST_OBCSS |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_obcss.F |
68 |
COST_OBCSS |
character*(80) fnamesalt |
|
./pkg/ecco/cost_obcsw.F |
148 |
COST_OBCSW |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_obcsw.F |
150 |
COST_OBCSW |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_obcsw.F |
68 |
COST_OBCSW |
character*(80) fnamesalt |
|
./pkg/ecco/cost_salt.F |
112 |
COST_SALT |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_salt.F |
126 |
COST_SALT |
call ACTIVE_READ_XYZ( fnamesalt, sbar, mrec, |
|
./pkg/ecco/cost_salt.F |
156 |
COST_SALT |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_salt.F |
72 |
COST_SALT |
character*(80) fnamesalt |
|
./pkg/ecco/cost_trans_merid.F |
134 |
COST_TRANS_MERID |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_trans_merid.F |
166 |
COST_TRANS_MERID |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_trans_merid.F |
60 |
COST_TRANS_MERID |
character*(80) fnamesalt |
|
./pkg/ecco/cost_trans_zonal.F |
123 |
COST_TRANS_ZONAL |
write(fnamesalt(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_trans_zonal.F |
155 |
COST_TRANS_ZONAL |
call ACTIVE_READ_XYZ( fnamesalt, sbar, irec, |
|
./pkg/ecco/cost_trans_zonal.F |
60 |
COST_TRANS_ZONAL |
character*(80) fnamesalt |