| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_bottomdrag.F |
56 |
COST_BOTTOMDRAG |
character*(80) fnamefld |
|
./pkg/ecco/cost_bottomdrag.F |
86 |
COST_BOTTOMDRAG |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_bottomdrag.F |
92 |
COST_BOTTOMDRAG |
call ACTIVE_READ_XY( fnamefld, tmpfld2d, irec, doglobalread, |
|
./pkg/ecco/cost_diffkr.F |
56 |
COST_DIFFKR |
character*(80) fnamefld |
|
./pkg/ecco/cost_diffkr.F |
86 |
COST_DIFFKR |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_diffkr.F |
92 |
COST_DIFFKR |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_forcing_gen.F |
129 |
COST_FORCING_GEN |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_forcing_gen.F |
154 |
COST_FORCING_GEN |
& fnamefld, tmpfld2d, irec, doglobalread, |
|
./pkg/ecco/cost_forcing_gen.F |
203 |
COST_FORCING_GEN |
& fnamefld, tmpfld2d, irec, doglobalread, |
|
./pkg/ecco/cost_forcing_gen.F |
251 |
COST_FORCING_GEN |
& fnamefld, tmpfld2d, irec, doglobalread, |
|
./pkg/ecco/cost_forcing_gen.F |
98 |
COST_FORCING_GEN |
character*(80) fnamefld |
|
./pkg/ecco/cost_kapgm.F |
59 |
COST_KAPGM |
character*(80) fnamefld |
|
./pkg/ecco/cost_kapgm.F |
89 |
COST_KAPGM |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_kapgm.F |
95 |
COST_KAPGM |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_kapredi.F |
59 |
COST_KAPREDI |
character*(80) fnamefld |
|
./pkg/ecco/cost_kapredi.F |
89 |
COST_KAPREDI |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_kapredi.F |
95 |
COST_KAPREDI |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_salt0.F |
100 |
COST_SALT0 |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_salt0.F |
104 |
COST_SALT0 |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_salt0.F |
145 |
COST_SALT0 |
& fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_salt0.F |
68 |
COST_SALT0 |
character*(80) fnamefld |
|
./pkg/ecco/cost_salt_ini_fin.F |
60 |
COST_SALT_INI_FIN |
character*(80) fnamefld |
|
./pkg/ecco/cost_salt_ini_fin.F |
89 |
COST_SALT_INI_FIN |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_salt_ini_fin.F |
94 |
COST_SALT_INI_FIN |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_tau_eddy.F |
101 |
COST_TAU_EDDY |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_tau_eddy.F |
133 |
COST_TAU_EDDY |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_tau_eddy.F |
136 |
COST_TAU_EDDY |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_tau_eddy.F |
62 |
COST_TAU_EDDY |
character*(80) fnamefld |
|
./pkg/ecco/cost_tau_eddy.F |
98 |
COST_TAU_EDDY |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_theta0.F |
100 |
COST_THETA0 |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_theta0.F |
105 |
COST_THETA0 |
& fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_theta0.F |
145 |
COST_THETA0 |
& fnamefld, tmpfld3d, irec, doglobalread, |
|
./pkg/ecco/cost_theta0.F |
68 |
COST_THETA0 |
character*(80) fnamefld |
|
./pkg/ecco/cost_theta_ini_fin.F |
60 |
COST_THETA_INI_FIN |
character*(80) fnamefld |
|
./pkg/ecco/cost_theta_ini_fin.F |
89 |
COST_THETA_INI_FIN |
write(fnamefld(1:80),'(2a,i10.10)') |
|
./pkg/ecco/cost_theta_ini_fin.F |
94 |
COST_THETA_INI_FIN |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |