|
| subroutine | w3tidemd::tide_write_results (LP, filename, ndef, KD1, KD2, ITZ, xlat, xlon, RES, SSQ, RMSR0, SDEV0, SDEV, RMSR, RESMAX, IMAX, RMSRP) |
| |
| subroutine | w3tidemd::tide_find_indices_prediction (LIST, INDS, TIDE_PRMF) |
| |
| subroutine | w3tidemd::tide_find_indices_analysis (LIST) |
| |
| subroutine | w3tidemd::tide_set_indices |
| |
| subroutine | w3tidemd::setvuf_fast (h, pp, s, p, enp, dh, dpp, ds, dp, dnp, tau, XLAT, F, U, V) |
| |
| subroutine | w3tidemd::tide_read_settings (filename, fnam6, fnam7, fnam8, fnam9, fnam11) |
| |
| subroutine | w3tidemd::tide_read_anapar (KR1, LP, filename, KD1, KD2, XLON, XLAT, NDEF, ITREND, ITZ) |
| |
| subroutine | w3tidemd::tide_read_timeseries (KR2, filename, KD1, KD2, TIDE_NTI, NDEF) |
| |
| subroutine | w3tidemd::astr (d1, h, pp, s, p, np, dh, dpp, ds, dp, dnp) |
| |
| double precision function | w3tidemd::dpythag (a, b) |
| |
| subroutine | w3tidemd::dsvbksb (u, w, v, m, n, mp, np, b, x) |
| |
| subroutine | w3tidemd::dsvdcmp (a, m, n, mp, np, w, v) |
| |
| integer *4 function | w3tidemd::juldayt (id, mm, iyyy) |
| |
| subroutine | w3tidemd::caldatt (julian, id, mm, iyyy) |
| |
| subroutine | w3tidemd::svd (q, u, v, cov, w, p, b, sig, ic, m, n, mm, N2, toler, jc, ssq, res) |
| |
| subroutine | w3tidemd::vuf_set_parameters |
| |
| subroutine | w3tidemd::vuf (KONX, Vx, ux, FX, ITIME) |
| |
| subroutine | w3tidemd::opnvuf (filename) |
| |
| subroutine | w3tidemd::setvuf (hr, XLAT, ITIME) |
| |
| subroutine | w3tidemd::flex_tidana_webpage (IX, IY, XLON, XLAT, KD1, KD2, ndef, itrend, RES, SSQ, RMSR0, SDEV0, RMSR, RESMAX, IMAX, ITEST) |
| |
| subroutine | w3tidemd::tide_predict (itrend, ndef, N, HOURS, DATAIN, PREDICTED, RESID, XLAT, SDEV, RMSR) |
| |
| subroutine | w3tidemd::tide_predict_only (itrend, ndef, N, TIDE_HOURS, PREDICTED, XLAT) |
| |
|
| double precision, parameter | w3tidemd::twpi =3.1415926535898*2. |
| |
| double precision, parameter | w3tidemd::fac =TWPI/360. |
| |
| integer, parameter | w3tidemd::mc =70 |
| |
| integer, parameter | w3tidemd::nr =106000 |
| |
| integer, parameter | w3tidemd::nmaxp1 =MC*2 |
| |
| integer, parameter | w3tidemd::nmaxpm =NR*2+NMAXP1 |
| |
| integer, parameter | w3tidemd::mc2 =MC*2 |
| |
| character *5, parameter | w3tidemd::kblank =' ' |
| |
| integer | w3tidemd::ntidal_con |
| |
| integer | w3tidemd::ntotal_con |
| |
| integer | w3tidemd::nkonco |
| |
| character *5, dimension(:), allocatable | w3tidemd::tidecon_allnames |
| |
| character *5, dimension(:), allocatable | w3tidemd::konco_con |
| |
| real, dimension(:), allocatable | w3tidemd::semi |
| |
| real, dimension(:), allocatable | w3tidemd::coef_con |
| |
| real, dimension(:,:), allocatable | w3tidemd::v_arg |
| |
| real, dimension(:,:), allocatable | w3tidemd::f_arg |
| |
| real, dimension(:,:), allocatable | w3tidemd::u_arg |
| |
| real, dimension(180) | w3tidemd::ee |
| |
| real, dimension(180) | w3tidemd::ph |
| |
| integer, dimension(180) | w3tidemd::ldel |
| |
| integer, dimension(180) | w3tidemd::mdel |
| |
| integer, dimension(180) | w3tidemd::ndel |
| |
| integer, dimension(180) | w3tidemd::ir |
| |
| integer, dimension(:), allocatable | w3tidemd::tide_indexj |
| |
| integer, dimension(:), allocatable | w3tidemd::tide_indexjk |
| |
| integer | w3tidemd::tide_mf |
| |
| integer | w3tidemd::tide_nx |
| |
| integer | w3tidemd::tide_ny |
| |
| real, dimension(:), allocatable | w3tidemd::tide_freqc |
| |
| character(len=5), dimension(:), allocatable | w3tidemd::tidecon_namei |
| |
| character(len=5), dimension(:), allocatable | w3tidemd::tidecon_name |
| |
| character(len=5), dimension(10) | w3tidemd::tide_konan |
| |
| character(len=5), dimension(10, 10) | w3tidemd::tide_konin |
| |
| real, dimension(10, 10) | w3tidemd::tide_r |
| |
| real, dimension(10, 10) | w3tidemd::tide_zeta |
| |
| real, dimension(10) | w3tidemd::tide_sigan |
| |
| real, dimension(10, 10) | w3tidemd::tide_sigin |
| |
| integer | w3tidemd::tide_nin |
| |
| integer, dimension(10) | w3tidemd::tide_ninf |
| |
| real, dimension(:,:,:,:,:), allocatable | w3tidemd::tidal_const |
| |
| integer(kind=4) | w3tidemd::tide_nti |
| |
| real, dimension(:,:), allocatable | w3tidemd::tide_data |
| |
| integer(kind=4), dimension(:), allocatable | w3tidemd::tide_days |
| |
| integer(kind=4), dimension(:), allocatable | w3tidemd::tide_secs |
| |
| real(kind=8), dimension(:), allocatable | w3tidemd::tide_hours |
| |
| real, parameter | w3tidemd::tide_dt = 1800. |
| |
| real, dimension(mc, 2) | w3tidemd::tide_ampc |
| |
| real, dimension(mc, 2) | w3tidemd::tide_phg |
| |
| real, dimension(mc, 2) | w3tidemd::tide_sig1 |
| |
| real, dimension(mc, 2) | w3tidemd::tide_sig2 |
| |
| real, dimension(mc, 2) | w3tidemd::tide_sig3 |
| |
| real, dimension(mc, 2) | w3tidemd::tide_ttest |
| |
| real, dimension(10, 10, 2) | w3tidemd::tide_ampci |
| |
| real, dimension(10, 10, 2) | w3tidemd::tide_phgi |
| |
| integer, dimension(mc) | w3tidemd::tide_index |
| |
| integer, dimension(mc) | w3tidemd::tide_index2 |
| |
| integer | w3tidemd::ndset |
| |
| integer | w3tidemd::tide_verbose = 0 |
| |
1.8.17