dbcsr_mp_active Function

public function dbcsr_mp_active(mp_env) result(active)

Checks whether this process is part of the message passing environment

Arguments

TypeIntentOptionalAttributesName
type(dbcsr_mp_obj), intent(in) :: mp_env

Return Value logical


Contents

Source Code


Source Code

   FUNCTION dbcsr_mp_active(mp_env) RESULT(active)
      !! Checks whether this process is part of the message passing environment
      TYPE(dbcsr_mp_obj), INTENT(IN)                     :: mp_env
      LOGICAL                                            :: active

      active = ASSOCIATED(mp_env%mp)
   END FUNCTION dbcsr_mp_active