../../Task/Closest-pair-problem/Tcl