:- object(brighton,
	extends(location(248, 10))).


	links([
		(dover, 81),
		(portsmouth, 49),
		(london, 52)]).


:- end_object.