get_div_B Function

private function get_div_B(settings, grid, eigenvector) result(div_B)

Arguments

Type	Intent	Optional	Attributes		Name
type(settings_t),	intent(in)			::	settings
type(grid_t),	intent(in)			::	grid
complex(kind=dp),	intent(in)			::	eigenvector(:)

Return Value complex(kind=dp), (size(grid%ef_grid))