A routine to invert the field matrix using mpi
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(supercell_type), | intent(inout) | :: | self |
subroutine sc_invert_mpi(self)
use mp, only: mp_abort
implicit none
class(supercell_type), intent(inout) :: self
self%is_empty=.true. !Until implemented make everything be treated as empty.
call mp_abort("ERROR: Invert with mpi not yet implemented.")
end subroutine sc_invert_mpi