| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_curmtr.F |
127 |
COST_CURMTR |
write(fnamevvel(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_curmtr.F |
144 |
COST_CURMTR |
call ACTIVE_READ_XYZ( fnamevvel, vbar, irec, |
|
./pkg/ecco/cost_curmtr.F |
75 |
COST_CURMTR |
character*(80) fnamevvel |
|
./pkg/ecco/cost_obcs_ageos.F |
138 |
COST_OBCS_AGEOS |
write(fnamevvel(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_obcs_ageos.F |
197 |
COST_OBCS_AGEOS |
call ACTIVE_READ_XYZ( fnamevvel, vbar, irec, |
|
./pkg/ecco/cost_obcs_ageos.F |
83 |
COST_OBCS_AGEOS |
character*(80) fnamevvel |
|
./pkg/ecco/cost_trans_merid.F |
145 |
COST_TRANS_MERID |
write(fnamevvel(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_trans_merid.F |
179 |
COST_TRANS_MERID |
call ACTIVE_READ_XYZ( fnamevvel, vbar, irec, |
|
./pkg/ecco/cost_trans_merid.F |
65 |
COST_TRANS_MERID |
character*(80) fnamevvel |
|
./pkg/ecco/cost_trans_zonal.F |
134 |
COST_TRANS_ZONAL |
write(fnamevvel(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_trans_zonal.F |
168 |
COST_TRANS_ZONAL |
call ACTIVE_READ_XYZ( fnamevvel, vbar, irec, |
|
./pkg/ecco/cost_trans_zonal.F |
65 |
COST_TRANS_ZONAL |
character*(80) fnamevvel |