create_flux_surface_average_csr_viaaddvols Subroutine

public subroutine create_flux_surface_average_csr_viaaddvols(flux_surface_average_csr, equi, mesh, polar_grid, dbgout)

Constructs flux surface average matrix via adding volumes of adjacent surfaces

Arguments

Type IntentOptional Attributes Name
type(csrmat_t), intent(out), allocatable :: flux_surface_average_csr

Zonal average matrix
class(equilibrium_t), intent(inout) :: equi

Equilibrium
type(mesh_cart_t), intent(in) :: mesh

Cartesian mesh
type(polar_grid_t), intent(in) :: polar_grid

Polar grid
integer, intent(in), optional :: dbgout

Specifies the number of information printed on screen

Calls

proc~~create_flux_surface_average_csr_viaaddvols~~CallsGraph proc~create_flux_surface_average_csr_viaaddvols create_flux_surface_average_csr_viaaddvols interface~get_drho polar_grid_t%get_drho proc~create_flux_surface_average_csr_viaaddvols->interface~get_drho interface~get_n_points mesh_cart_t%get_n_points proc~create_flux_surface_average_csr_viaaddvols->interface~get_n_points interface~get_nrho polar_grid_t%get_nrho proc~create_flux_surface_average_csr_viaaddvols->interface~get_nrho interface~get_phi~2 polar_grid_t%get_phi proc~create_flux_surface_average_csr_viaaddvols->interface~get_phi~2 interface~get_rho polar_grid_t%get_rho proc~create_flux_surface_average_csr_viaaddvols->interface~get_rho interface~get_x mesh_cart_t%get_x proc~create_flux_surface_average_csr_viaaddvols->interface~get_x interface~get_y mesh_cart_t%get_y proc~create_flux_surface_average_csr_viaaddvols->interface~get_y jacobian jacobian proc~create_flux_surface_average_csr_viaaddvols->jacobian proc~get_stdout get_stdout proc~create_flux_surface_average_csr_viaaddvols->proc~get_stdout proc~is_master is_master proc~create_flux_surface_average_csr_viaaddvols->proc~is_master rho rho proc~create_flux_surface_average_csr_viaaddvols->rho mpi_comm_rank mpi_comm_rank proc~is_master->mpi_comm_rank