breadth-first search Elixir

bfs.ex

	@doc """
	Performs a Breadth-First Search in the given 'tree'. The nodes' values are
	returned as a list.
	"""
	@spec breadth_first_search(%{}) :: list(any)

	def breadth_first_search(tree) do 
		bfs(tree)
	end

	defp bfs(%{value: val, left: :leaf, right: :leaf}) do 
		[val]
	end

	defp bfs(%{value: val, left: :leaf, right: right}) do 
		[val] ++ bfs(right)
	end

	defp bfs(%{value: val, left: left, right: :leaf}) do 
		[val] ++ bfs(left)
	end

	defp bfs(%{value: val, left: left, right: right}) do 
		[val] ++ bfs(left) ++ bfs(right)
	end