mp_info_type Derived Type

type, public :: mp_info_type


Components

Type Visibility Attributes Name Initial
integer, private :: handle = mp_info_null_handle

Type-Bound Procedures

procedure, public, pass(info), non_overridable :: get_handle => mp_get_info_handle

  • private elemental function mp_get_info_handle(info)

    Arguments

    Type IntentOptional Attributes Name
    class(mp_info_type), intent(in) :: info

    Return Value integer

procedure, public, pass(info), non_overridable :: set_handle => mp_set_info_handle

  • private elemental subroutine mp_set_info_handle(info, handle)

    Arguments

    Type IntentOptional Attributes Name
    class(mp_info_type), intent(inout) :: info
    integer, intent(in) :: handle

procedure, private, pass(info1), non_overridable :: mp_info_op_eq

  • private impure elemental function mp_info_op_eq(info1, info2)

    Arguments

    Type IntentOptional Attributes Name
    class(mp_info_type), intent(in) :: info1
    class(mp_info_type), intent(in) :: info2

    Return Value logical

generic, public :: OPERATOR(.EQ.) => mp_info_op_eq

  • private impure elemental function mp_info_op_eq(info1, info2)

    Arguments

    Type IntentOptional Attributes Name
    class(mp_info_type), intent(in) :: info1
    class(mp_info_type), intent(in) :: info2

    Return Value logical

procedure, private, pass(info1), non_overridable :: mp_info_op_ne

  • private impure elemental function mp_info_op_ne(info1, info2)

    Arguments

    Type IntentOptional Attributes Name
    class(mp_info_type), intent(in) :: info1
    class(mp_info_type), intent(in) :: info2

    Return Value logical

generic, public :: OPERATOR(.NE.) => mp_info_op_ne

  • private impure elemental function mp_info_op_ne(info1, info2)

    Arguments

    Type IntentOptional Attributes Name
    class(mp_info_type), intent(in) :: info1
    class(mp_info_type), intent(in) :: info2

    Return Value logical

Source Code

   TYPE mp_info_type
      PRIVATE
      MPI_INFO_TYPE :: handle = mp_info_null_handle
   CONTAINS
      PROCEDURE, PUBLIC, PASS(info), NON_OVERRIDABLE :: get_handle => mp_get_info_handle
      PROCEDURE, PUBLIC, PASS(info), NON_OVERRIDABLE :: set_handle => mp_set_info_handle
      PROCEDURE, PRIVATE, PASS(info1), NON_OVERRIDABLE :: mp_info_op_eq
      GENERIC, PUBLIC :: OPERATOR(.EQ.) => mp_info_op_eq
      PROCEDURE, PRIVATE, PASS(info1), NON_OVERRIDABLE :: mp_info_op_ne
      GENERIC, PUBLIC :: OPERATOR(.NE.) => mp_info_op_ne
   END TYPE mp_info_type