Removes the thread distribution from a distribution
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_distribution_obj), | intent(inout) | :: | dist |
SUBROUTINE dbcsr_distribution_no_threads(dist)
!! Removes the thread distribution from a distribution
TYPE(dbcsr_distribution_obj), INTENT(INOUT) :: dist
!$OMP MASTER
CALL array_release(dist%d%thread_dist)
dist%d%has_thread_dist = .FALSE.
!$OMP END MASTER
END SUBROUTINE dbcsr_distribution_no_threads