]> www.ginac.de Git - ginac.git/blobdiff - ginac/polynomial/ring_traits.hpp
Renamed files *.tcc and *.hpp to *.h.
[ginac.git] / ginac / polynomial / ring_traits.hpp
diff --git a/ginac/polynomial/ring_traits.hpp b/ginac/polynomial/ring_traits.hpp
deleted file mode 100644 (file)
index 540a6bd..0000000
+++ /dev/null
@@ -1,45 +0,0 @@
-#ifndef GINAC_RING_TRAITS_HPP
-#define GINAC_RING_TRAITS_HPP
-#include <cln/integer.h>
-#include <cln/modinteger.h>
-
-namespace cln
-{
-static inline cln::cl_I div(const cln::cl_I& x, const cln::cl_I& y)
-{
-       return cln::exquo(x, y);
-}
-
-/// Exact integer division.
-/// Check if y divides x, if yes put the quotient into q, otherwise don't
-/// touch q. Returns true if y divides x and false if not.
-static inline bool div(cln::cl_I& q, const cln::cl_I& x, const cln::cl_I& y)
-{
-       const cln::cl_I_div_t qr = cln::truncate2(x, y);
-       if (zerop(qr.remainder)) {
-               q = qr.quotient;
-               return true;
-       }
-       return false;
-}
-
-static inline cln::cl_I get_ring_elt(const cln::cl_I& sample, const int val)
-{
-       return cln::cl_I(val);
-}
-
-static inline cln::cl_MI get_ring_elt(const cln::cl_MI& sample, const int val)
-{
-       return sample.ring()->canonhom(val);
-}
-
-template<typename T>
-static inline T the_one(const T& sample)
-{
-       return get_ring_elt(sample, 1);
-}
-
-} // namespace cln
-
-#endif // GINAC_RING_TRAITS_HPP
-