From 8ea840d722b60fa537b60d8eb822b747ddcd0d7d Mon Sep 17 00:00:00 2001
From: Alexander Kobel <akobel@mpi-inf.mpg.de>
Date: Wed, 5 Feb 2014 15:47:58 +0100
Subject: [PATCH] fix Residue constructor from long int

see feature description, change 2.2:
  https://cgal.geometryfactory.com/CGAL/Members/wiki/Features/Small_Features/Modular_arithmetic_fixes
---
 .../include/CGAL/Modular_arithmetic/Residue_type.h          | 6 +++---
 Modular_arithmetic/src/CGAL/primes.cpp                      | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Modular_arithmetic/include/CGAL/Modular_arithmetic/Residue_type.h b/Modular_arithmetic/include/CGAL/Modular_arithmetic/Residue_type.h
index 0f6228347f3..e0434f81c36 100644
--- a/Modular_arithmetic/include/CGAL/Modular_arithmetic/Residue_type.h
+++ b/Modular_arithmetic/include/CGAL/Modular_arithmetic/Residue_type.h
@@ -16,7 +16,7 @@
 // $URL$
 // $Id$
 //
-// Author(s)     : Sylvain Pion, Michael Hemmer
+// Author(s)     : Sylvain Pion, Michael Hemmer, Alexander Kobel
 
 #ifndef CGAL_RESIDUE_TYPE_H
 #define CGAL_RESIDUE_TYPE_H
@@ -227,8 +227,8 @@ public:
     }
 
     //! constructor of Residue, from long 
-    Residue(long n){
-        x_= RES_reduce((double)n);
+    Residue (long n) {
+        x_= RES_soft_reduce (static_cast< double > (n % get_prime_int()));
     }
    
     //! Access operator for x, \c const 
diff --git a/Modular_arithmetic/src/CGAL/primes.cpp b/Modular_arithmetic/src/CGAL/primes.cpp
index 45248011669..139b0f89932 100644
--- a/Modular_arithmetic/src/CGAL/primes.cpp
+++ b/Modular_arithmetic/src/CGAL/primes.cpp
@@ -15,7 +15,7 @@
 // $URL$
 // $Id$
 //
-// Author(s)     : Michael Hemmer
+// Author(s)     : Michael Hemmer, Alexander Kobel
 
 #include <CGAL/basic.h>
 #include <CGAL/primes.h>