make_polygon Subroutine

public subroutine make_polygon(N_points, X_points, Y_points, polygon, local_min, local_max, use_local_min, use_local_max)

Initialises a polygon object "polygon" with points {X_points, Y_points} If local_min and local_max are given, a limiting_polygon2d_t is created, which stores these limits for later recall N.b. X_points and Y_points should be given normalised

Type Bound

divertor_equilibrium_t

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: N_points
real(kind=FP), intent(in), dimension(N_points) :: X_points
real(kind=FP), intent(in), dimension(N_points) :: Y_points
class(polygon2d_t), intent(out) :: polygon
real(kind=FP), intent(in), optional :: local_min
real(kind=FP), intent(in), optional :: local_max
logical, intent(in), optional :: use_local_min
logical, intent(in), optional :: use_local_max

Calls

proc~~make_polygon~~CallsGraph proc~make_polygon divertor_equilibrium_t%make_polygon proc~create_closed_polygon2d_t create_closed_polygon2d_t proc~make_polygon->proc~create_closed_polygon2d_t proc~create_limiting_polygon2d_t create_limiting_polygon2d_t proc~make_polygon->proc~create_limiting_polygon2d_t proc~get_stderr get_stderr proc~make_polygon->proc~get_stderr none~create_polygon2d polygon2d_t%create_polygon2d proc~create_closed_polygon2d_t->none~create_polygon2d proc~create_limiting_polygon2d_t->none~create_polygon2d none~create_polygon2d->proc~get_stderr

Called by

proc~~make_polygon~~CalledByGraph proc~make_polygon divertor_equilibrium_t%make_polygon proc~make_polygon_from_params divertor_equilibrium_t%make_polygon_from_params proc~make_polygon_from_params->proc~make_polygon proc~init~3 cerfons_t%init proc~init~3->proc~make_polygon_from_params