spy_context_t Derived Type

type, public, extends(plot_context) :: spy_context_t


Components

Type Visibility Attributes Name Initial
integer, public :: width
integer, public :: height
real(kind=wp), public :: x_min
real(kind=wp), public :: x_max
real(kind=wp), public :: y_min
real(kind=wp), public :: y_max
logical, public :: has_rendered_arrows = .false.
logical, public :: uses_vector_arrows = .false.
logical, public :: has_triangular_arrows = .false.
real(kind=wp), public :: current_color(3) = [0.0_wp, 0.0_wp, 0.0_wp]
real(kind=wp), public :: expected_fill(3) = [0.0_wp, 0.0_wp, 0.0_wp]
real(kind=wp), public :: expected_edge(3) = [0.0_wp, 0.0_wp, 0.0_wp]
integer, public :: fill_calls = 0
integer, public :: line_calls = 0
integer, public :: unexpected_calls = 0
logical, public :: fill_color_ok = .true.
logical, public :: line_color_ok = .true.

Type-Bound Procedures

procedure, public :: reset => spy_reset

  • private subroutine spy_reset(this)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this

procedure, public :: line => spy_line

  • private subroutine spy_line(this, x1, y1, x2, y2)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x1
    real(kind=wp), intent(in) :: y1
    real(kind=wp), intent(in) :: x2
    real(kind=wp), intent(in) :: y2

procedure, public :: color => spy_color

  • private subroutine spy_color(this, r, g, b)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: r
    real(kind=wp), intent(in) :: g
    real(kind=wp), intent(in) :: b

procedure, public :: text => spy_text

  • private subroutine spy_text(this, x, y, text)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x
    real(kind=wp), intent(in) :: y
    character(len=*), intent(in) :: text

procedure, public :: save => spy_save

  • private subroutine spy_save(this, filename)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    character(len=*), intent(in) :: filename

procedure, public :: set_line_width => spy_set_line_width

  • private subroutine spy_set_line_width(this, width)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: width

procedure, public :: set_line_style => spy_set_line_style

  • private subroutine spy_set_line_style(this, style)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    character(len=*), intent(in) :: style

procedure, public :: draw_marker => spy_draw_marker

  • private subroutine spy_draw_marker(this, x, y, style)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x
    real(kind=wp), intent(in) :: y
    character(len=*), intent(in) :: style

procedure, public :: set_marker_colors => spy_set_marker_colors

  • private subroutine spy_set_marker_colors(this, edge_r, edge_g, edge_b, face_r, face_g, face_b)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: edge_r
    real(kind=wp), intent(in) :: edge_g
    real(kind=wp), intent(in) :: edge_b
    real(kind=wp), intent(in) :: face_r
    real(kind=wp), intent(in) :: face_g
    real(kind=wp), intent(in) :: face_b

procedure, public :: set_marker_colors_with_alpha => spy_set_marker_colors_with_alpha

  • private subroutine spy_set_marker_colors_with_alpha(this, edge_r, edge_g, edge_b, edge_alpha, face_r, face_g, face_b, face_alpha)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: edge_r
    real(kind=wp), intent(in) :: edge_g
    real(kind=wp), intent(in) :: edge_b
    real(kind=wp), intent(in) :: edge_alpha
    real(kind=wp), intent(in) :: face_r
    real(kind=wp), intent(in) :: face_g
    real(kind=wp), intent(in) :: face_b
    real(kind=wp), intent(in) :: face_alpha

procedure, public :: draw_arrow => spy_draw_arrow

  • private subroutine spy_draw_arrow(this, x, y, dx, dy, size, style)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x
    real(kind=wp), intent(in) :: y
    real(kind=wp), intent(in) :: dx
    real(kind=wp), intent(in) :: dy
    real(kind=wp), intent(in) :: size
    character(len=*), intent(in) :: style

procedure, public :: get_ascii_output => spy_get_ascii_output

  • private function spy_get_ascii_output(this) result(output)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(in) :: this

    Return Value character(len=:), allocatable

procedure, public :: get_width_scale => spy_get_width_scale

  • private function spy_get_width_scale(this) result(scale)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(in) :: this

    Return Value real(kind=wp)

procedure, public :: get_height_scale => spy_get_height_scale

  • private function spy_get_height_scale(this) result(scale)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(in) :: this

    Return Value real(kind=wp)

procedure, public :: fill_quad => spy_fill_quad

  • private subroutine spy_fill_quad(this, x_quad, y_quad)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x_quad(4)
    real(kind=wp), intent(in) :: y_quad(4)

procedure, public :: fill_heatmap => spy_fill_heatmap

  • private subroutine spy_fill_heatmap(this, x_grid, y_grid, z_grid, z_min, z_max)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x_grid(:)
    real(kind=wp), intent(in) :: y_grid(:)
    real(kind=wp), intent(in) :: z_grid(:,:)
    real(kind=wp), intent(in) :: z_min
    real(kind=wp), intent(in) :: z_max

procedure, public :: extract_rgb_data => spy_extract_rgb_data

  • private subroutine spy_extract_rgb_data(this, width, height, rgb_data)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(in) :: this
    integer, intent(in) :: width
    integer, intent(in) :: height
    real(kind=wp), intent(out) :: rgb_data(width,height,3)

procedure, public :: get_png_data_backend => spy_get_png_data_backend

  • private subroutine spy_get_png_data_backend(this, width, height, png_data, status)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(in) :: this
    integer, intent(in) :: width
    integer, intent(in) :: height
    integer(kind=1), intent(out), allocatable :: png_data(:)
    integer, intent(out) :: status

procedure, public :: prepare_3d_data => spy_prepare_3d_data

  • private subroutine spy_prepare_3d_data(this, plots)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    type(plot_data_t), intent(in) :: plots(:)

procedure, public :: render_ylabel => spy_render_ylabel

  • private subroutine spy_render_ylabel(this, ylabel)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    character(len=*), intent(in) :: ylabel

procedure, public :: draw_axes_and_labels_backend => spy_draw_axes_and_labels_backend

  • private subroutine spy_draw_axes_and_labels_backend(this, xscale, yscale, symlog_threshold, x_min, x_max, y_min, y_max, title, xlabel, ylabel, x_date_format, y_date_format, z_min, z_max, has_3d_plots)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    character(len=*), intent(in) :: xscale
    character(len=*), intent(in) :: yscale
    real(kind=wp), intent(in) :: symlog_threshold
    real(kind=wp), intent(in) :: x_min
    real(kind=wp), intent(in) :: x_max
    real(kind=wp), intent(in) :: y_min
    real(kind=wp), intent(in) :: y_max
    character(len=:), intent(in), optional, allocatable :: title
    character(len=:), intent(in), optional, allocatable :: xlabel
    character(len=:), intent(in), optional, allocatable :: ylabel
    character(len=*), intent(in), optional :: x_date_format
    character(len=*), intent(in), optional :: y_date_format
    real(kind=wp), intent(in), optional :: z_min
    real(kind=wp), intent(in), optional :: z_max
    logical, intent(in) :: has_3d_plots

procedure, public :: save_coordinates => spy_save_coordinates

  • private subroutine spy_save_coordinates(this, x_min, x_max, y_min, y_max)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(in) :: this
    real(kind=wp), intent(out) :: x_min
    real(kind=wp), intent(out) :: x_max
    real(kind=wp), intent(out) :: y_min
    real(kind=wp), intent(out) :: y_max

procedure, public :: set_coordinates => spy_set_coordinates

  • private subroutine spy_set_coordinates(this, x_min, x_max, y_min, y_max)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    real(kind=wp), intent(in) :: x_min
    real(kind=wp), intent(in) :: x_max
    real(kind=wp), intent(in) :: y_min
    real(kind=wp), intent(in) :: y_max

procedure, public :: render_axes => spy_render_axes

  • private subroutine spy_render_axes(this, title_text, xlabel_text, ylabel_text)

    Arguments

    Type IntentOptional Attributes Name
    class(spy_context_t), intent(inout) :: this
    character(len=*), intent(in), optional :: title_text
    character(len=*), intent(in), optional :: xlabel_text
    character(len=*), intent(in), optional :: ylabel_text