FV3 Bundle
type_nicas_blk.F90 File Reference

Go to the source code of this file.

Data Types

type  type_nicas_blk::balldata_type
 
type  type_nicas_blk::nicas_blk_type
 

Modules

module  type_nicas_blk
 

Functions/Subroutines

subroutine type_nicas_blk::balldata_alloc (balldata)
 
subroutine type_nicas_blk::balldata_dealloc (balldata)
 
subroutine type_nicas_blk::balldata_pack (balldata, nc1, nl1, val)
 
subroutine type_nicas_blk::nicas_blk_dealloc (nicas_blk, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_parameters (nicas_blk, mpl, rng, nam, geom, cmat_blk)
 
subroutine type_nicas_blk::nicas_blk_compute_sampling (nicas_blk, mpl, rng, nam, geom, cmat_blk)
 
subroutine type_nicas_blk::nicas_blk_compute_interp_h (nicas_blk, mpl, rng, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_interp_v (nicas_blk, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_interp_s (nicas_blk, mpl, rng, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_mpi_ab (nicas_blk, mpl, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_convol (nicas_blk, mpl, rng, nam, geom, cmat_blk)
 
subroutine type_nicas_blk::nicas_blk_compute_convol_network (nicas_blk, mpl, rng, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_convol_distance (nicas_blk, mpl, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_convol_weights (nicas_blk, mpl, nam, geom, ctmp)
 
subroutine type_nicas_blk::nicas_blk_compute_mpi_c (nicas_blk, mpl, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_normalization (nicas_blk, mpl, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_compute_adv (nicas_blk, mpl, rng, nam, geom, cmat_blk)
 
subroutine type_nicas_blk::nicas_blk_apply (nicas_blk, mpl, nam, geom, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_from_sqrt (nicas_blk, mpl, geom, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_sqrt (nicas_blk, mpl, geom, alpha, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_sqrt_ad (nicas_blk, mpl, geom, fld, alpha)
 
subroutine type_nicas_blk::nicas_blk_apply_interp (nicas_blk, mpl, geom, alpha, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_ad (nicas_blk, mpl, geom, fld, alpha)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_h (nicas_blk, mpl, geom, delta, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_h_ad (nicas_blk, mpl, geom, fld, delta)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_v (nicas_blk, mpl, geom, gamma, delta)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_v_ad (nicas_blk, mpl, geom, delta, gamma)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_s (nicas_blk, mpl, alpha, gamma)
 
subroutine type_nicas_blk::nicas_blk_apply_interp_s_ad (nicas_blk, mpl, gamma, alpha)
 
subroutine type_nicas_blk::nicas_blk_apply_convol (nicas_blk, mpl, alpha)
 
subroutine type_nicas_blk::nicas_blk_apply_adv (nicas_blk, mpl, nam, geom, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_adv_ad (nicas_blk, mpl, nam, geom, fld)
 
subroutine type_nicas_blk::nicas_blk_apply_adv_inv (nicas_blk, mpl, nam, geom, fld)
 
subroutine type_nicas_blk::nicas_blk_test_adjoint (nicas_blk, mpl, rng, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_test_pos_def (nicas_blk, mpl, rng, nam, geom)
 
subroutine type_nicas_blk::nicas_blk_test_sqrt (nicas_blk, mpl, rng, nam, geom, bpar, io, cmat_blk)
 
subroutine type_nicas_blk::nicas_blk_test_dirac (nicas_blk, mpl, nam, geom, bpar, io)
 

Variables

integer, parameter type_nicas_blk::nc1max = 50000
 
logical, parameter type_nicas_blk::write_grids = .false.
 
real(kind_real), parameter type_nicas_blk::sqrt_r = 0.721_kind_real
 
real(kind_real), parameter type_nicas_blk::sqrt_r_dble = 0.86_kind_real
 
real(kind_real), parameter type_nicas_blk::sqrt_rfac = 0.9_kind_real
 
real(kind_real), parameter type_nicas_blk::sqrt_coef = 0.54_kind_real
 
real(kind_real), parameter type_nicas_blk::s_inf = 1.0e-2_kind_real
 
real(kind_real), parameter type_nicas_blk::tol = 1.0e-3_kind_real
 
integer, parameter type_nicas_blk::nitermax = 50
 
logical, parameter type_nicas_blk::test_no_point = .false.