RosettaCodeData/Task/Closest-pair-problem/Maple/closest-pair-problem-2.maple

mirror of https://github.com/acmeism/RosettaCodeData.git
> L := RandomTools:-Generate(list(list(float(range=0..1),2),512)):
> ClosestPair(L);
 0.002576770304, [[0.4265584800, 0.7443097852], [0.4240649736, 0.7449595321]]
	`> L := RandomTools:-Generate(list(list(float(range=0..1),2),512)):`
	`> ClosestPair(L);`
	`0.002576770304, [[0.4265584800, 0.7443097852], [0.4240649736, 0.7449595321]]`