create_polar_map_matrix Subroutine

public subroutine create_polar_map_matrix(polar_map_csr, equi, mesh, polar_grid, intorder, dbgout)

Creates matrix that maps a field from Cartesian to polar mesh

Arguments

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

Created polar map matrix in CSR format
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) :: intorder

Interpolation order of the mapping
integer, intent(in), optional :: dbgout

Specifies the number of information printed on screen

Calls

proc~~create_polar_map_matrix~~CallsGraph proc~create_polar_map_matrix create_polar_map_matrix interface~get_n_points mesh_cart_t%get_n_points proc~create_polar_map_matrix->interface~get_n_points interface~get_nrho polar_grid_t%get_nrho proc~create_polar_map_matrix->interface~get_nrho interface~get_ntheta polar_grid_t%get_ntheta proc~create_polar_map_matrix->interface~get_ntheta interface~get_phi~2 polar_grid_t%get_phi proc~create_polar_map_matrix->interface~get_phi~2 interface~get_rho polar_grid_t%get_rho proc~create_polar_map_matrix->interface~get_rho interface~get_spacing_f mesh_cart_t%get_spacing_f proc~create_polar_map_matrix->interface~get_spacing_f interface~get_surrounding_indices mesh_cart_t%get_surrounding_indices proc~create_polar_map_matrix->interface~get_surrounding_indices interface~get_theta polar_grid_t%get_theta proc~create_polar_map_matrix->interface~get_theta interface~get_x mesh_cart_t%get_x proc~create_polar_map_matrix->interface~get_x interface~get_y mesh_cart_t%get_y proc~create_polar_map_matrix->interface~get_y proc~get_stdout get_stdout proc~create_polar_map_matrix->proc~get_stdout proc~interpol_coeffs interpol_coeffs proc~create_polar_map_matrix->proc~interpol_coeffs proc~is_master is_master proc~create_polar_map_matrix->proc~is_master proc~polar_to_cart polar_to_cart proc~create_polar_map_matrix->proc~polar_to_cart proc~sortsum csrmat_t%sortsum proc~create_polar_map_matrix->proc~sortsum dgetrf dgetrf proc~interpol_coeffs->dgetrf dgetri dgetri proc~interpol_coeffs->dgetri proc~get_stderr get_stderr proc~interpol_coeffs->proc~get_stderr sgetrf sgetrf proc~interpol_coeffs->sgetrf sgetri sgetri proc~interpol_coeffs->sgetri mpi_comm_rank mpi_comm_rank proc~is_master->mpi_comm_rank mag_axis_loc mag_axis_loc proc~polar_to_cart->mag_axis_loc proc~find_zero find_zero proc~polar_to_cart->proc~find_zero proc~polar_to_cart->proc~get_stderr func func proc~find_zero->func