logical_column Derived Type

type, public, extends(data_column) :: logical_column

Defines a column of logical values.


Components

Type Visibility Attributes Name Initial
character(len=:), public, allocatable :: m_name

A header, or column name.

Constructor

public interface logical_column

  • private pure function lc_init_empty(n) result(rst)

    Constructs an empty logical_column of the requested size.

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=int32), intent(in) :: n

    The number of rows to create.

    Return Value type(logical_column)

    The newly constructed logical_column object.

  • private pure function lc_init_array(x) result(rst)

    Constructs a new logical_column by copying the contents of the supplied array.

    Arguments

    Type IntentOptional Attributes Name
    logical, intent(in), dimension(:) :: x

    The array to copy.

    Return Value type(logical_column)

    The newly constructed logical_column object.


Type-Bound Procedures

procedure, public :: append => lc_append

  • private subroutine lc_append(this, x)

    Arguments

    Type IntentOptional Attributes Name
    class(logical_column), intent(inout) :: this
    class(*), intent(in) :: x

procedure, public :: copy => lc_copy

  • private pure subroutine lc_copy(this, dest)

    Copies the contents of this column to the supplied destination array.

    Arguments

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

    The logical_column object.
    class(*), intent(inout), dimension(:) :: dest

    The destination array.

procedure, public :: count => lc_count

  • private pure function lc_count(this) result(rst)

    Gets the number of values stored in this column.

    Arguments

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

    The logical_column object.

    Return Value integer(kind=int32)

    The number of values.

procedure, public :: get => lc_get

  • private pure function lc_get(this, row) result(rst)

    Gets the requested value from the column.

    Arguments

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

    The logical_column object.
    integer(kind=int32), intent(in) :: row

    The row index of the value to retrieve.

    Return Value logical

    The value stored at the requested row.

procedure, public :: get_data_type => lc_get_type

  • private pure function lc_get_type(this) result(rst)

    Gets the type stored by this column.

    Arguments

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

    The logical_column object.

    Return Value integer(kind=int32)

    The type stored by this column.

procedure, public :: get_name => dc_get_name

  • private pure function dc_get_name(this) result(rst)

    Gets the name associated with the column.

    Arguments

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

    The data_column object.

    Return Value character(len=:), allocatable

    The name.

procedure, public :: insert => lc_insert

  • private subroutine lc_insert(this, row, x)

    Arguments

    Type IntentOptional Attributes Name
    class(logical_column), intent(inout) :: this
    integer(kind=int32), intent(in) :: row
    class(*), intent(in) :: x

procedure, public :: remove => lc_remove

  • private subroutine lc_remove(this, row)

    Arguments

    Type IntentOptional Attributes Name
    class(logical_column), intent(inout) :: this
    integer(kind=int32), intent(in) :: row

procedure, public :: set => lc_set

  • private subroutine lc_set(this, row, x)

    Sets the requested value into the column.

    Arguments

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

    The logical_column object.
    integer(kind=int32), intent(in) :: row

    The row index.
    logical, intent(in) :: x

    The value stored at the requested row.

procedure, public :: set_name => dc_set_name

  • private subroutine dc_set_name(this, x)

    Sets the name associated with the column.

    Arguments

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

    The data_column object.
    character(len=*), intent(in) :: x

    The name.

procedure, public :: slice => lc_slice

  • private function lc_slice(this, first, last) result(rst)

    Returns a borrowed, mutable slice of this column's array.

    Arguments

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

    The logical_column object.
    integer(kind=int32), intent(in) :: first

    The one-based starting index of the slice.
    integer(kind=int32), intent(in) :: last

    The one-based ending index of the slice.

    Return Value class(*), pointer, dimension(:)

    The array pointer, or null if unallocated.

procedure, public :: to_string => lc_to_string

  • private function lc_to_string(this, row, fmt) result(rst)

    Returns the value in the requested row as a string.

    Arguments

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

    The logical_column object.
    integer(kind=int32), intent(in) :: row

    The row index.
    character(len=*), intent(in), optional :: fmt

    The formatting string (e.g. "L1").

    Return Value character(len=:), allocatable

    The resulting string.

procedure, public :: view => lc_view

  • private function lc_view(this) result(rst)

    Returns a borrowed, mutable view of this column's array.

    Arguments

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

    The logical_column object.

    Return Value class(*), pointer, dimension(:)

    The array pointer, or null if unallocated.