Peek at the next step of the path

Property definitions

a_star $ AStarPath :: peek_step
	# Peek at the next step of the path
	fun peek_step: N do return nodes[at]
lib/a_star/a_star.nit:323,2--324,37