ShapeNodes Derived Type

type, private :: ShapeNodes

A shape's nodes: made under the frame's contents, replaced when the shape changes.


Inherits

type~~shapenodes~~InheritsGraph type~shapenodes ShapeNodes c_ptr c_ptr type~shapenodes->c_ptr contents, shape

Inherited by

type~~shapenodes~~InheritedByGraph type~shapenodes ShapeNodes type~coordinateaxes CoordinateAxes type~coordinateaxes->type~shapenodes nodes type~latlongrid LatLonGrid type~latlongrid->type~shapenodes nodes type~polyhedralcone PolyhedralCone type~polyhedralcone->type~shapenodes nodes type~polyhedron Polyhedron type~polyhedron->type~shapenodes nodes type~radialplane RadialPlane type~radialplane->type~shapenodes nodes type~ellipticcone EllipticCone type~ellipticcone->type~polyhedralcone type~rectangularcone RectangularCone type~rectangularcone->type~polyhedralcone

Components

Type Visibility Attributes Name Initial
type(c_ptr), public :: contents = c_null_ptr

the frame's contents group (null until built)
type(c_ptr), public :: shape = c_null_ptr

the switch now shown (null: none)
logical, public :: shown = .false.

built for a window: rebuilt nodes are compiled

Type-Bound Procedures

procedure, public :: replace

  • private subroutine replace(self, new)

    Show new (a switch made by the shape) in place of the shape's current nodes; compiled first if the window already runs.

    Arguments

    Type IntentOptional Attributes Name
    class(ShapeNodes), intent(inout) :: self
    type(c_ptr), intent(in) :: new

    a switch made by the shape (null: none)

Source Code

    type :: ShapeNodes
        type(c_ptr) :: contents = c_null_ptr                !! the frame's contents group (null until built)
        logical :: shown = .false.                          !! built for a window: rebuilt nodes are compiled
        type(c_ptr) :: shape = c_null_ptr                   !! the switch now shown (null: none)
    contains
        procedure :: replace
    end type ShapeNodes