GridSpec Derived Type

type, public :: GridSpec


Inherits

type~~gridspec~2~~InheritsGraph type~gridspec~2 GridSpec type~dimensionspec DimensionSpec type~gridspec~2->type~dimensionspec dim_specs type~gridtype GridType type~gridspec~2->type~gridtype grid_type

Components

Type Visibility Attributes Name Initial
type(DimensionSpec), public :: dim_specs(NUM_DIMS)
type(GridType), public :: grid_type

Type-Bound Procedures

procedure, public :: equals_grid

  • private impure elemental function equals_grid(a, b) result(equals)

    Arguments

    Type IntentOptional Attributes Name
    class(GridSpec), intent(in) :: a
    class(GridSpec), intent(in) :: b

    Return Value logical

procedure, public :: not_equals_grid

  • private impure elemental function not_equals_grid(a, b) result(not_equals)

    Arguments

    Type IntentOptional Attributes Name
    class(GridSpec), intent(in) :: a
    class(GridSpec), intent(in) :: b

    Return Value logical

generic, public :: operator(/=) => not_equals_grid

  • private impure elemental function not_equals_grid(a, b) result(not_equals)

    Arguments

    Type IntentOptional Attributes Name
    class(GridSpec), intent(in) :: a
    class(GridSpec), intent(in) :: b

    Return Value logical

generic, public :: operator(==) => equals_grid

  • private impure elemental function equals_grid(a, b) result(equals)

    Arguments

    Type IntentOptional Attributes Name
    class(GridSpec), intent(in) :: a
    class(GridSpec), intent(in) :: b

    Return Value logical

Source Code

   type :: GridSpec
      type (GridType) :: grid_type
      type (DimensionSpec) :: dim_specs(NUM_DIMS)
   contains
      procedure :: equals_grid
      procedure :: not_equals_grid
      generic :: operator(==) => equals_grid
      generic :: operator(/=) => not_equals_grid
   end type GridSpec