+extern const Real infinity_f;
+
+template<class T> inline T abs (T x)
+{
+ return x > 0 ? x : -x;
+}
+
+template<class T> inline int sign (T x)
+{
+ if (x)
+ return x > T (0) ? 1 : -1;
+ return 0;
+}
+
+template<class T> inline T max (T x, T y)
+{
+ return x >? y;
+}
+
+template<class T> inline T sqr (T x)
+{
+ return x*x;
+}
+
+
+template<class T> inline T min (T x, T y)
+{
+ return x <? y;
+}