FV3 Bundle
|
Functions/Subroutines | |
subroutine, public | fv_nwp_nudge (Time, dt, npx, npy, npz, ps_dt, u_dt, v_dt, t_dt, q_dt, zvir, ptop, ak, bk, ts, ps, delp, ua, va, pt, nwat, q, phis, gridstruct, bd, domain) |
subroutine | ps_nudging (dt, factor, npz, ak, bk, ps_obs, mask, tm, ps, phis, delp, ua, va, pt, nwat, q, bd, npx, npy, gridstruct, domain) |
subroutine | ps_bias_correction (ps_dt, is, ie, js, je, isd, ied, jsd, jed, area) |
real function | g0_sum (p, ifirst, ilast, jfirst, jlast, mode, reproduce, isd, ied, jsd, jed, area) |
subroutine | compute_slp (isc, iec, jsc, jec, tm, ps, gz, slp) |
subroutine | get_obs (Time, dt, zvir, ak, bk, ps, ts, ps_obs, delp, pt, nwat, q, u_obs, v_obs, t_obs, q_obs, phis, ua, va, u_dt, v_dt, npx, npy, npz, factor, mask, ptop, bd, gridstruct, domain) |
subroutine, public | fv_nwp_nudge_init (time, axes, npz, zvir, ak, bk, ts, phis, gridstruct, ks, npx, neststruct, bd) |
subroutine | get_ncep_analysis (ps, u, v, t, q, zvir, ts, nfile, fname, bd) |
subroutine | remap_coef (agrid) |
subroutine | ncep2fms (sst) |
subroutine | get_int_hght (npz, ak, bk, ps, delp, ps0, tv) |
subroutine | remap_tq (npz, ak, bk, ps, delp, t, q, kmd, ps0, ta, qa, zvir, ptop) |
subroutine | remap_uv (npz, ak, bk, ps, delp, u, v, kmd, ps0, u0, v0, ptop) |
subroutine, public | fv_nwp_nudge_end |
subroutine | get_tc_mask (time, mask, agrid) |
subroutine, public | breed_slp_inline (nstep, dt, npz, ak, bk, phis, pe, pk, peln, pkz, delp, u, v, pt, q, nwat, zvir, gridstruct, ks, domain_local, bd, hydrostatic) |
subroutine | breed_srf_w10 (time, dt, npz, ak, bk, ps, phis, slp, delp, u, v, gridstruct) |
subroutine | breed_srf_winds (time, dt, npz, u_obs, v_obs, ak, bk, ps, phis, delp, ua, va, u_dt, v_dt, pt, q, nwat, zvir, gridstruct) |
subroutine | tangent_wind (elon, elat, speed, po, pp, ut, vt) |
subroutine | get_slp_obs (time, nobs, lon_obs, lat_obs, w10, mslp, slp_out, r_out, time_obs, x_o, y_o, w10_o, slp_o, r_vor, p_vor, stime, fact) |
subroutine | slp_obs_init |
real function | calday (year, month, day, hour, minute, sec) |
logical function | leap_year (ny) |
subroutine | pmaxmin (qname, a, imax, jmax, fac) |
subroutine | del2_uv (du, dv, cd, kmd, ntimes, bd, npx, npy, gridstruct, domain) |
subroutine | del2_scalar (qdt, cd, kmd, nmax, bd, npx, npy, gridstruct, domain) |
subroutine | rmse_bias (a, rms, bias, area) |
subroutine | corr (a, b, co, area) |
subroutine | std (a, mean, stdv, area) |
Variables | |
real(kind=r_grid), parameter | radius = cnst_radius |
character(len=128) | version = '' |
character(len=128) | tagname = '' |
logical, public | do_adiabatic_init |
integer | im |
integer | jm |
integer | km |
real, dimension(:), allocatable | ak0 |
real, dimension(:), allocatable | bk0 |
real, dimension(:), allocatable | lat |
real, dimension(:), allocatable | lon |
logical | module_is_initialized = .false. |
logical | master |
logical | no_obs |
real | deg2rad |
real | rad2deg |
real | time_nudge = 0. |
integer | time_interval = 6*3600 |
integer, parameter | nfile_max = 29280 |
integer | nfile |
integer | k_breed = 0 |
integer | k_trop = 0 |
real | p_trop = 950.E2 |
real | dps_min = 50. |
real | del2_cd = 0.16 |
real, dimension(:,:,:), allocatable | s2c |
integer, dimension(:,:), allocatable | id1 |
integer, dimension(:,:), allocatable | id2 |
integer, dimension(:,:), allocatable | jdc |
real, dimension(:,:,:), allocatable | ps_dat |
real(kind=4), dimension(:,:,:,:), allocatable | u_dat |
real(kind=4), dimension(:,:,:,:), allocatable | v_dat |
real(kind=4), dimension(:,:,:,:), allocatable | t_dat |
real(kind=4), dimension(:,:,:,:), allocatable | q_dat |
real(kind=4), dimension(:,:,:), allocatable | gz3 |
real, dimension(:,:), allocatable | gz0 |
character(len=128) | input_fname_list ="" |
character(len=128) | analysis_file_first ="" |
character(len=128) | analysis_file_last ="" |
real | p_relax = 30.E2 |
real | p_norelax = 0.0 |
character(len=128), dimension(nfile_max) | file_names |
character(len=128) | track_file_name |
integer | nfile_total = 0 |
real | p_wvp = 100.E2 |
integer | kord_data = 8 |
real | mask_fac = 0.25 |
logical, public | t_is_tv = .false. |
logical | use_pt_inc = .false. |
logical | use_high_top = .false. |
logical | add_bg_wind = .true. |
logical | conserve_mom = .true. |
logical | conserve_hgt = .true. |
logical | tc_mask = .false. |
logical | strong_mask = .false. |
logical | ibtrack = .true. |
logical | nudge_debug = .false. |
logical | do_ps_bias = .false. |
logical | nudge_ps = .false. |
logical | nudge_q = .false. |
logical | nudge_winds = .true. |
logical | nudge_virt = .true. |
logical | nudge_hght = .true. |
logical | time_varying = .true. |
logical | print_end_breed = .true. |
logical | print_end_nudge = .true. |
real | tau_ps = 21600. |
real | tau_q = 86400. |
real | tau_winds = 21600. |
real | tau_virt = 43200. |
real | tau_hght = 43200. |
real | q_min = 1.E-8 |
integer | jbeg |
integer | jend |
integer | nf_uv = 0 |
integer | nf_ps = 0 |
integer | nf_t = 2 |
integer | nf_ht = 1 |
integer | kstart = 2 |
integer | kbot_winds = 0 |
integer | kbot_t = 0 |
integer | kbot_q = 0 |
logical | analysis_time |
logical | breed_srf_w = .false. |
real | grid_size = 28.E3 |
real | tau_vt_slp = 1200. |
real | tau_vt_wind = 1200. |
real | tau_vt_rad = 4.0 |
real | pt_lim = 0.2 |
real | slp_env = 101010. |
real | pre0_env = 100000. |
real, parameter | tm_max = 315. |
real | r_lo = 2.0 |
real | r_hi = 5.0 |
real | r_fac = 1.2 |
real | r_min = 200.E3 |
real | r_inc = 25.E3 |
real, parameter | del_r = 50.E3 |
real | elapsed_time = 0.0 |
real | nudged_time = 1.E12 |
integer | year_track_data |
integer, parameter | max_storm = 140 |
integer, parameter | nobs_max = 125 |
integer | nstorms = 0 |
integer, dimension(max_storm) | nobs_tc |
integer | min_nobs = 16 |
real | min_mslp = 1009.E2 |
real(kind=4), dimension(nobs_max, max_storm) | x_obs |
real(kind=4), dimension(nobs_max, max_storm) | y_obs |
real(kind=4), dimension(nobs_max, max_storm) | wind_obs |
real(kind=4), dimension(nobs_max, max_storm) | mslp_obs |
real(kind=4), dimension(nobs_max, max_storm) | mslp_out |
real(kind=4), dimension(nobs_max, max_storm) | rad_out |
real(kind=4), dimension(nobs_max, max_storm) | time_tc |
integer | id_ht_err |
integer | is |
integer | ie |
integer | js |
integer | je |
integer | isd |
integer | ied |
integer | jsd |
integer | jed |
subroutine, public fv_nwp_nudge_nlm_mod::breed_slp_inline | ( | integer, intent(in) | nstep, |
real, intent(in) | dt, | ||
integer, intent(in) | npz, | ||
real, dimension(npz+1), intent(in) | ak, | ||
real, dimension(npz+1), intent(in) | bk, | ||
real, dimension(isd:ied,jsd:jed), intent(in) | phis, | ||
real, dimension(is-1:ie+1, npz+1,js-1:je+1), intent(inout) | pe, | ||
real, dimension(is:ie,js:je, npz+1), intent(inout) | pk, | ||
real, dimension(is:ie,npz+1,js:je), intent(out) | peln, | ||
real, dimension(is:ie,js:je,npz), intent(inout) | pkz, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | delp, | ||
real, dimension(isd:ied,jsd:jed+1,npz), intent(inout) | u, | ||
real, dimension(isd:ied+1,jsd:jed,npz), intent(inout) | v, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | pt, | ||
real, dimension(isd:ied,jsd:jed,npz,*), intent(inout) | q, | ||
integer, intent(in) | nwat, | ||
real, intent(in) | zvir, | ||
type(fv_grid_type), target | gridstruct, | ||
integer, intent(in) | ks, | ||
type(domain2d), intent(inout) | domain_local, | ||
type(fv_grid_bounds_type), intent(in) | bd, | ||
logical, intent(in) | hydrostatic | ||
) |
Definition at line 2019 of file fv_nudge_nlm.F90.
|
private |
|
private |
Definition at line 2777 of file fv_nudge_nlm.F90.
|
private |
Definition at line 3260 of file fv_nudge_nlm.F90.
|
private |
|
private |
Definition at line 3548 of file fv_nudge_nlm.F90.
|
private |
Definition at line 3404 of file fv_nudge_nlm.F90.
|
private |
Definition at line 3356 of file fv_nudge_nlm.F90.
subroutine, public fv_nwp_nudge_nlm_mod::fv_nwp_nudge | ( | type(time_type), intent(in) | Time, |
real, intent(in) | dt, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
integer, intent(in) | npz, | ||
real, dimension(is:ie,js:je), intent(out) | ps_dt, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | u_dt, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | v_dt, | ||
real, dimension(is:ie,js:je,npz), intent(out) | t_dt, | ||
real, dimension(is:ie,js:je,npz), intent(out) | q_dt, | ||
real, intent(in) | zvir, | ||
real, intent(in) | ptop, | ||
real, dimension(npz+1), intent(in) | ak, | ||
real, dimension(npz+1), intent(in) | bk, | ||
real, dimension(is:ie,js:je), intent(out) | ts, | ||
real, dimension(isd:ied,jsd:jed), intent(inout) | ps, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | delp, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | ua, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | va, | ||
real, dimension(isd:ied,jsd:jed,npz), intent(inout) | pt, | ||
integer, intent(in) | nwat, | ||
real, dimension(isd:ied,jsd:jed,npz,nwat), intent(inout) | q, | ||
real, dimension(isd:ied,jsd:jed ), intent(in) | phis, | ||
type(fv_grid_type), intent(inout), target | gridstruct, | ||
type(fv_grid_bounds_type), intent(in) | bd, | ||
type(domain2d), intent(inout), target | domain | ||
) |
Definition at line 224 of file fv_nudge_nlm.F90.
subroutine, public fv_nwp_nudge_nlm_mod::fv_nwp_nudge_end | ( | ) |
Definition at line 1950 of file fv_nudge_nlm.F90.
subroutine, public fv_nwp_nudge_nlm_mod::fv_nwp_nudge_init | ( | type(time_type), intent(in) | time, |
integer, dimension(4), intent(in) | axes, | ||
integer, intent(in) | npz, | ||
real, intent(in) | zvir, | ||
real, dimension(npz+1), intent(in) | ak, | ||
real, dimension(npz+1), intent(in) | bk, | ||
real, dimension(bd%is:bd%ie,bd%js:bd%je), intent(out) | ts, | ||
real, dimension(bd%isd:bd%ied,bd%jsd:bd%jed), intent(in) | phis, | ||
type(fv_grid_type), target | gridstruct, | ||
integer, intent(in) | ks, | ||
integer, intent(in) | npx, | ||
type(fv_nest_type) | neststruct, | ||
type(fv_grid_bounds_type), intent(in) | bd | ||
) |
|
private |
|
private |
|
private |
Definition at line 1350 of file fv_nudge_nlm.F90.
|
private |
Definition at line 960 of file fv_nudge_nlm.F90.
|
private |
Definition at line 3039 of file fv_nudge_nlm.F90.
|
private |
Definition at line 1977 of file fv_nudge_nlm.F90.
|
private |
|
private |
|
private |
Definition at line 843 of file fv_nudge_nlm.F90.
|
private |
Definition at line 684 of file fv_nudge_nlm.F90.
|
private |
|
private |
Definition at line 1795 of file fv_nudge_nlm.F90.
|
private |
Definition at line 1874 of file fv_nudge_nlm.F90.
|
private |
Definition at line 3131 of file fv_nudge_nlm.F90.
|
private |
Definition at line 3010 of file fv_nudge_nlm.F90.
|
private |
Definition at line 117 of file fv_nudge_nlm.F90.
|
private |
Definition at line 64 of file fv_nudge_nlm.F90.
|
private |
Definition at line 95 of file fv_nudge_nlm.F90.
|
private |
Definition at line 97 of file fv_nudge_nlm.F90.
|
private |
Definition at line 158 of file fv_nudge_nlm.F90.
|
private |
Definition at line 64 of file fv_nudge_nlm.F90.
|
private |
Definition at line 164 of file fv_nudge_nlm.F90.
|
private |
Definition at line 119 of file fv_nudge_nlm.F90.
|
private |
Definition at line 118 of file fv_nudge_nlm.F90.
|
private |
Definition at line 70 of file fv_nudge_nlm.F90.
|
private |
Definition at line 83 of file fv_nudge_nlm.F90.
|
private |
Definition at line 181 of file fv_nudge_nlm.F90.
logical, public fv_nwp_nudge_nlm_mod::do_adiabatic_init |
Definition at line 57 of file fv_nudge_nlm.F90.
|
private |
Definition at line 124 of file fv_nudge_nlm.F90.
|
private |
Definition at line 82 of file fv_nudge_nlm.F90.
|
private |
Definition at line 182 of file fv_nudge_nlm.F90.
Definition at line 106 of file fv_nudge_nlm.F90.
|
private |
Definition at line 165 of file fv_nudge_nlm.F90.
|
private |
Definition at line 90 of file fv_nudge_nlm.F90.
|
private |
Definition at line 89 of file fv_nudge_nlm.F90.
|
private |
Definition at line 122 of file fv_nudge_nlm.F90.
|
private |
Definition at line 86 of file fv_nudge_nlm.F90.
|
private |
Definition at line 86 of file fv_nudge_nlm.F90.
|
private |
Definition at line 203 of file fv_nudge_nlm.F90.
|
private |
Definition at line 206 of file fv_nudge_nlm.F90.
|
private |
Definition at line 207 of file fv_nudge_nlm.F90.
|
private |
Definition at line 61 of file fv_nudge_nlm.F90.
|
private |
Definition at line 94 of file fv_nudge_nlm.F90.
|
private |
Definition at line 206 of file fv_nudge_nlm.F90.
|
private |
Definition at line 207 of file fv_nudge_nlm.F90.
|
private |
Definition at line 145 of file fv_nudge_nlm.F90.
|
private |
Definition at line 86 of file fv_nudge_nlm.F90.
|
private |
Definition at line 206 of file fv_nudge_nlm.F90.
|
private |
Definition at line 207 of file fv_nudge_nlm.F90.
|
private |
Definition at line 145 of file fv_nudge_nlm.F90.
|
private |
Definition at line 62 of file fv_nudge_nlm.F90.
|
private |
Definition at line 206 of file fv_nudge_nlm.F90.
|
private |
Definition at line 207 of file fv_nudge_nlm.F90.
|
private |
Definition at line 79 of file fv_nudge_nlm.F90.
|
private |
Definition at line 80 of file fv_nudge_nlm.F90.
|
private |
Definition at line 157 of file fv_nudge_nlm.F90.
|
private |
Definition at line 156 of file fv_nudge_nlm.F90.
|
private |
Definition at line 155 of file fv_nudge_nlm.F90.
|
private |
Definition at line 63 of file fv_nudge_nlm.F90.
|
private |
Definition at line 110 of file fv_nudge_nlm.F90.
|
private |
Definition at line 152 of file fv_nudge_nlm.F90.
|
private |
Definition at line 65 of file fv_nudge_nlm.F90.
|
private |
Definition at line 65 of file fv_nudge_nlm.F90.
|
private |
Definition at line 112 of file fv_nudge_nlm.F90.
|
private |
Definition at line 68 of file fv_nudge_nlm.F90.
|
private |
Definition at line 188 of file fv_nudge_nlm.F90.
|
private |
Definition at line 194 of file fv_nudge_nlm.F90.
|
private |
Definition at line 193 of file fv_nudge_nlm.F90.
|
private |
Definition at line 67 of file fv_nudge_nlm.F90.
Definition at line 198 of file fv_nudge_nlm.F90.
Definition at line 199 of file fv_nudge_nlm.F90.
|
private |
Definition at line 149 of file fv_nudge_nlm.F90.
|
private |
Definition at line 147 of file fv_nudge_nlm.F90.
|
private |
Definition at line 148 of file fv_nudge_nlm.F90.
|
private |
Definition at line 146 of file fv_nudge_nlm.F90.
|
private |
Definition at line 77 of file fv_nudge_nlm.F90.
|
private |
Definition at line 75 of file fv_nudge_nlm.F90.
|
private |
Definition at line 108 of file fv_nudge_nlm.F90.
|
private |
Definition at line 69 of file fv_nudge_nlm.F90.
|
private |
Definition at line 189 of file fv_nudge_nlm.F90.
Definition at line 192 of file fv_nudge_nlm.F90.
|
private |
Definition at line 191 of file fv_nudge_nlm.F90.
|
private |
Definition at line 123 of file fv_nudge_nlm.F90.
|
private |
Definition at line 129 of file fv_nudge_nlm.F90.
|
private |
Definition at line 125 of file fv_nudge_nlm.F90.
|
private |
Definition at line 126 of file fv_nudge_nlm.F90.
|
private |
Definition at line 128 of file fv_nudge_nlm.F90.
|
private |
Definition at line 127 of file fv_nudge_nlm.F90.
|
private |
Definition at line 183 of file fv_nudge_nlm.F90.
|
private |
Definition at line 103 of file fv_nudge_nlm.F90.
|
private |
Definition at line 100 of file fv_nudge_nlm.F90.
|
private |
Definition at line 81 of file fv_nudge_nlm.F90.
|
private |
Definition at line 109 of file fv_nudge_nlm.F90.
|
private |
Definition at line 172 of file fv_nudge_nlm.F90.
|
private |
Definition at line 131 of file fv_nudge_nlm.F90.
|
private |
Definition at line 132 of file fv_nudge_nlm.F90.
|
private |
Definition at line 87 of file fv_nudge_nlm.F90.
|
private |
Definition at line 170 of file fv_nudge_nlm.F90.
|
private |
Definition at line 88 of file fv_nudge_nlm.F90.
|
private |
Definition at line 143 of file fv_nudge_nlm.F90.
|
private |
Definition at line 178 of file fv_nudge_nlm.F90.
|
private |
Definition at line 176 of file fv_nudge_nlm.F90.
|
private |
Definition at line 180 of file fv_nudge_nlm.F90.
|
private |
Definition at line 175 of file fv_nudge_nlm.F90.
|
private |
Definition at line 179 of file fv_nudge_nlm.F90.
|
private |
Definition at line 70 of file fv_nudge_nlm.F90.
Definition at line 200 of file fv_nudge_nlm.F90.
|
private |
Definition at line 53 of file fv_nudge_nlm.F90.
|
private |
Definition at line 85 of file fv_nudge_nlm.F90.
|
private |
Definition at line 171 of file fv_nudge_nlm.F90.
|
private |
Definition at line 121 of file fv_nudge_nlm.F90.
|
private |
Definition at line 88 of file fv_nudge_nlm.F90.
logical, public fv_nwp_nudge_nlm_mod::t_is_tv = .false. |
Definition at line 114 of file fv_nudge_nlm.F90.
|
private |
Definition at line 56 of file fv_nudge_nlm.F90.
|
private |
Definition at line 141 of file fv_nudge_nlm.F90.
|
private |
Definition at line 137 of file fv_nudge_nlm.F90.
|
private |
Definition at line 138 of file fv_nudge_nlm.F90.
|
private |
Definition at line 140 of file fv_nudge_nlm.F90.
|
private |
Definition at line 168 of file fv_nudge_nlm.F90.
|
private |
Definition at line 166 of file fv_nudge_nlm.F90.
|
private |
Definition at line 167 of file fv_nudge_nlm.F90.
|
private |
Definition at line 139 of file fv_nudge_nlm.F90.
|
private |
Definition at line 120 of file fv_nudge_nlm.F90.
|
private |
Definition at line 72 of file fv_nudge_nlm.F90.
|
private |
Definition at line 71 of file fv_nudge_nlm.F90.
Definition at line 201 of file fv_nudge_nlm.F90.
|
private |
Definition at line 130 of file fv_nudge_nlm.F90.
|
private |
Definition at line 173 of file fv_nudge_nlm.F90.
|
private |
Definition at line 107 of file fv_nudge_nlm.F90.
|
private |
Definition at line 88 of file fv_nudge_nlm.F90.
|
private |
Definition at line 116 of file fv_nudge_nlm.F90.
|
private |
Definition at line 115 of file fv_nudge_nlm.F90.
|
private |
Definition at line 88 of file fv_nudge_nlm.F90.
|
private |
Definition at line 55 of file fv_nudge_nlm.F90.
Definition at line 197 of file fv_nudge_nlm.F90.
Definition at line 195 of file fv_nudge_nlm.F90.
Definition at line 196 of file fv_nudge_nlm.F90.
|
private |
Definition at line 187 of file fv_nudge_nlm.F90.