cleanup

git-svn-id: http://svn.code.sf.net/p/netpbm/code/trunk@4677 9d0c8265-081b-0410-96cb-a4ca84ce46f8

1 files changed, 14 insertions, 0 deletions

diff --git a/converter/other/pamtosvg/point.c b/converter/other/pamtosvg/point.c
index 690f6d80..0e10b6b6 100644
--- a/converter/other/pamtosvg/point.c
+++ b/converter/other/pamtosvg/point.c
@@ -1,4 +1,5 @@
 #include <stdbool.h>
+#include <math.h>
 
 #include "epsilon.h"
 
@@ -74,3 +75,16 @@ point_scaled(Point const coord,
 
 
 
+float
+point_distance(Point const p1,
+               Point const p2) {
+/*----------------------------------------------------------------------------
+  Return the Euclidean distance between 'p1' and 'p2'.
+-----------------------------------------------------------------------------*/
+    float const x = p1.x - p2.x, y = p1.y - p2.y, z = p1.z - p2.z;
+
+    return (float) sqrt(SQR(x) + SQR(y) + SQR(z));
+}
+
+
+