Property definitions

a_star $ PositionedNamedNode :: defaultinit
# Node with a name and position
class PositionedNamedNode
	super NamedNode

	redef type N: PositionedNamedNode

	var x: Int
	var y: Int

	redef fun to_s do return "{super}-at-({x},{y})"

	fun dist_with(o: PositionedNamedNode): Int
	do
		var dx = o.x - x
		var dy = o.y - y
		var d2 = dx*dx + dy*dy
		return d2.sqrt
	end
end
lib/a_star/tests/test_a_star.nit:244,1--262,3