From c9f4aeec27c6c9c3a0fa9ab8c1a6132b506f6814 Mon Sep 17 00:00:00 2001
From: jofret
Date: Mon, 23 Apr 2007 15:30:12 +0000
Subject: Adding Pythag function, must be used as often as possible.

---
 src/auxiliaryFunctions/pythag/dpythags.c | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 src/auxiliaryFunctions/pythag/dpythags.c

(limited to 'src/auxiliaryFunctions/pythag/dpythags.c')

diff --git a/src/auxiliaryFunctions/pythag/dpythags.c b/src/auxiliaryFunctions/pythag/dpythags.c
new file mode 100644
index 00000000..0b3eeb5f
--- /dev/null
+++ b/src/auxiliaryFunctions/pythag/dpythags.c
@@ -0,0 +1,19 @@
+/*
+**  -*- C -*-
+**
+** dpythags.c
+** Made by  Bruno JOFRET <bruno.jofret@inria.fr>
+**
+** Started on  Mon Apr 23 11:54:15 2007 jofret
+** Last update Mon Apr 23 15:43:21 2007 jofret
+**
+** Copyright INRIA 2007
+*/
+
+#include "pythag.h"
+#include "sqrt.h"
+
+double	dpythags(double x, double y) {
+  return (dsqrts( (x*x) + (y*y) ) );
+}
+
-- 
cgit