File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_obcs_ageos.F |
133 |
COST_OBCS_AGEOS |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcs_ageos.F |
183 |
COST_OBCS_AGEOS |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_obcs_ageos.F |
84 |
COST_OBCS_AGEOS |
character*(80) fnametheta |
./pkg/ecco/cost_xbt.F |
114 |
COST_XBT |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_xbt.F |
129 |
COST_XBT |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_xbt.F |
67 |
COST_XBT |
character*(80) fnametheta |
./pkg/ecco/cost_obcsn.F |
109 |
COST_OBCSN |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcsn.F |
111 |
COST_OBCSN |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_obcsn.F |
65 |
COST_OBCSN |
character*(80) fnametheta |
./pkg/ecco/cost_ctdtclim.F |
111 |
COST_CTDTCLIM |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_ctdtclim.F |
125 |
COST_CTDTCLIM |
call ACTIVE_READ_XYZ( fnametheta, tbar, mrec, |
./pkg/ecco/cost_ctdtclim.F |
154 |
COST_CTDTCLIM |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_ctdtclim.F |
76 |
COST_CTDTCLIM |
character*(80) fnametheta |
./pkg/ecco/cost_tmi.F |
109 |
COST_TMI |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_tmi.F |
65 |
COST_TMI |
character*(80) fnametheta |
./pkg/ecco/cost_tmi.F |
99 |
COST_TMI |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_argo_theta.F |
112 |
COST_ARGO_THETA |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_argo_theta.F |
127 |
COST_ARGO_THETA |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_argo_theta.F |
66 |
COST_ARGO_THETA |
character*(80) fnametheta |
./pkg/ecco/cost_ctdt.F |
110 |
COST_CTDT |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_ctdt.F |
125 |
COST_CTDT |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_ctdt.F |
68 |
COST_CTDT |
character*(80) fnametheta |
./pkg/ecco/cost_trans_zonal.F |
118 |
COST_TRANS_ZONAL |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_trans_zonal.F |
149 |
COST_TRANS_ZONAL |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_trans_zonal.F |
58 |
COST_TRANS_ZONAL |
character*(80) fnametheta |
./pkg/ecco/cost_obcss.F |
109 |
COST_OBCSS |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcss.F |
111 |
COST_OBCSS |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_obcss.F |
65 |
COST_OBCSS |
character*(80) fnametheta |
./pkg/ecco/cost_obcsw.F |
109 |
COST_OBCSW |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcsw.F |
111 |
COST_OBCSW |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_obcsw.F |
65 |
COST_OBCSW |
character*(80) fnametheta |
./pkg/ecco/cost_theta.F |
110 |
COST_THETA |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_theta.F |
124 |
COST_THETA |
call ACTIVE_READ_XYZ( fnametheta, tbar, mrec, |
./pkg/ecco/cost_theta.F |
153 |
COST_THETA |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_theta.F |
74 |
COST_THETA |
character*(80) fnametheta |
./pkg/ecco/cost_sst.F |
109 |
COST_SST |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_sst.F |
65 |
COST_SST |
character*(80) fnametheta |
./pkg/ecco/cost_sst.F |
99 |
COST_SST |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_trans_merid.F |
129 |
COST_TRANS_MERID |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_trans_merid.F |
160 |
COST_TRANS_MERID |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_trans_merid.F |
58 |
COST_TRANS_MERID |
character*(80) fnametheta |
./pkg/ecco/cost_drift.F |
109 |
COST_DRIFT |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_drift.F |
150 |
COST_DRIFT |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_drift.F |
181 |
COST_DRIFT |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_drift.F |
72 |
COST_DRIFT |
character*(80) fnametheta |
./pkg/ecco/cost_obcse.F |
109 |
COST_OBCSE |
write(fnametheta(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcse.F |
111 |
COST_OBCSE |
call ACTIVE_READ_XYZ( fnametheta, tbar, irec, |
./pkg/ecco/cost_obcse.F |
65 |
COST_OBCSE |
character*(80) fnametheta |