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

Type	Intent	Optional	Attributes		Name
type(dbcsr_mp_obj),	intent(in)			::	mp_env

Return Value logical

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