2 点間の距離を返します。
dist ( p1 As Point, _ p2 As Point ) As Number
Intent >dist(point(0, 0, 0), point(1, 0, 0)) --> 1.0
Intent >dist(point(0, 0, 0), point(1, 1, 1)) --> 1.732