GridType Derived Type

type, public :: GridType


Inherited by

type~~gridtype~~InheritedByGraph type~gridtype GridType type~gridspec GridSpec type~gridspec->type~gridtype grid_type

Constructor

public interface GridType

  • private function newGridType_name(name) result(grid_type)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: name

    Return Value type(GridType)

  • private function newGridType_mapl(grid) result(grid_type)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_Grid), intent(in) :: grid

    Return Value type(GridType)


Type-Bound Procedures

procedure, public :: equals

  • private function equals(a, b)

    Arguments

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

    Return Value logical

procedure, public :: greater_than_or_equal

  • private function greater_than_or_equal(a, b)

    Arguments

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

    Return Value logical

procedure, public :: less_than

  • private function less_than(a, b)

    Arguments

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

    Return Value logical

procedure, public :: not_equals

  • private function not_equals(a, b)

    Arguments

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

    Return Value logical

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

  • private function not_equals(a, b)

    Arguments

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

    Return Value logical

generic, public :: operator(<) => less_than

  • private function less_than(a, b)

    Arguments

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

    Return Value logical

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

  • private function equals(a, b)

    Arguments

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

    Return Value logical

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

  • private function greater_than_or_equal(a, b)

    Arguments

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

    Return Value logical

Source Code

   type :: GridType
      private
      character(len=:), allocatable :: name
   contains
      procedure :: equals
      procedure :: not_equals
      procedure :: less_than
      procedure :: greater_than_or_equal
      generic :: operator(<) => less_than
      generic :: operator(>=) => greater_than_or_equal
      generic :: operator(==) => equals
      generic :: operator(/=) => not_equals
   end type GridType