mbe_base_has_mpi Function

private pure function mbe_base_has_mpi(this)

Check if MPI resources are available

Type Bound

many_body_expansion_t

Arguments

Type IntentOptional Attributes Name
class(many_body_expansion_t), intent(in) :: this

Return Value logical


Called by

proc~~mbe_base_has_mpi~~CalledByGraph proc~mbe_base_has_mpi many_body_expansion_t%mbe_base_has_mpi proc~gmbe_run_distributed gmbe_context_t%gmbe_run_distributed proc~gmbe_run_distributed->proc~mbe_base_has_mpi proc~mbe_run_distributed mbe_context_t%mbe_run_distributed proc~mbe_run_distributed->proc~mbe_base_has_mpi

Source Code

   pure logical function mbe_base_has_mpi(this)
      !! Check if MPI resources are available
      class(many_body_expansion_t), intent(in) :: this
      mbe_base_has_mpi = associated(this%resources)
   end function mbe_base_has_mpi