dbcsr_mp_has_subgroups Function

public pure function dbcsr_mp_has_subgroups(mp_env) result(has_subgroups)

Arguments

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

Return Value logical

Source Code

   PURE FUNCTION dbcsr_mp_has_subgroups(mp_env) RESULT(has_subgroups)
      TYPE(dbcsr_mp_obj), INTENT(IN)                     :: mp_env
      LOGICAL                                            :: has_subgroups

      has_subgroups = mp_env%mp%subgroups_defined
   END FUNCTION dbcsr_mp_has_subgroups