history_stack_t Derived Type

type, public :: history_stack_t


Components

Type Visibility Attributes Name Initial
type(vec4), public, allocatable :: data(:)
integer, public :: edge_counter
character(len=:), public, allocatable :: filename
integer, public :: size
character(len=:), public, allocatable :: type
integer, public :: vertex_counter

Constructor

public interface history_stack_t

  • private function init_historyStack(filename, id)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: filename
    integer, intent(in) :: id

    Return Value type(history_stack_t)


Type-Bound Procedures

procedure, public :: empty => histempty_fn

  • private function histempty_fn(this)

    Arguments

    Type IntentOptional Attributes Name
    class(history_stack_t) :: this

    Return Value logical

procedure, public :: finish => histfinish_sub

procedure, public :: peek => histpeek_fn

procedure, public :: pop => histpop_fn

procedure, public :: push => histpush_sub

procedure, public :: write => histwrite_sub

procedure, public :: zero => histzero_sub

Source Code

    type :: history_stack_t
        type(vec4), allocatable :: data(:)
        integer :: size, vertex_counter, edge_counter
        character(len=:), allocatable :: filename, type
        contains
            procedure :: pop   => histpop_fn
            procedure :: push  => histpush_sub
            procedure :: peek  => histpeek_fn
            procedure :: empty => histempty_fn
            procedure :: zero  => histzero_sub
            procedure :: write => histwrite_sub
            procedure :: finish => histfinish_sub
    end type history_stack_t