Some insertion of one conversion routine.

Author: MathieuDutSik

src_number/Makefile

@@ -1,11 +1,11 @@
-PROGRAM		= Test_SquareRoot Test_UnorderedMapMpzq Factorize Factorize_help Test_Factorize Test_PracticalInf Test_QuoInt Test_PrintStaticInfo Test_RealCubicField Test_QuadField Test_Rational Test_TypeBoostGmp Test_GetBit Test_QuadraticResidue Test_PrimeGenerator Test_SequenceApproximant ReadValueString ComputeQuadraticResidue Test_ComputePairGcdDot
+PROGRAM		= Test_SquareRoot Test_UnorderedMapMpzq Factorize Factorize_help Test_Factorize Test_PracticalInf Test_QuoInt Test_PrintStaticInfo Test_RealCubicField Test_QuadField Test_Rational Test_TypeBoostGmp Test_GetBit Test_QuadraticResidue Test_PrimeGenerator Test_SequenceApproximant ReadValueString ComputeQuadraticResidue Test_ComputePairGcdDot Test_Conversion
 #PROGRAM		= test_mpz_givaro
 #PROGRAM		= test_unordered_map_mpzq
 #PROGRAM		= Factorize
 #PROGRAM		= PracticalInf
 #PROGRAM		= TestQuoInt
-#PROGRAM		= TestConversion
-#PROGRAM		= TestSquareRoot
+#PROGRAM		= Test_Conversion
+#PROGRAM		= Test_SquareRoot
 #PROGRAM		= PrintStaticInfo
 #PROGRAM		= QuadFieldTest
 #PROGRAM		= RealCubicFieldTest

src_number/NumberTheoryGmp.h

@@ -535,6 +535,16 @@ inline void TYPE_CONVERSION(stc<long> const &a1, mpz_class &a2) {
 
 #endif
 
+// double as input
+
+// This conversion could be improved upon. But that would slow it
+// and in any case the conversion from double has inherent issues
+// that have to be addressed in other parts of the code.
+inline void TYPE_CONVERSION(stc<double> const &a1, mpz_class &a2) {
+  uint64_t a1_b = static_cast<int64_t>(a1.val);
+  a2 = convert_mpz_class_int64_t(a1_b);
+}
+
 // int64_t as input
 
 inline void TYPE_CONVERSION(stc<int64_t> const &a1, mpq_class &a2) {

src_number/Test_Conversion.cpp

@@ -7,26 +7,8 @@
 #include "TypeConversionFinal.h"
 // clang-format on
 
-int main(int argc, char *argv[]) {
-  using T1 = boost::multiprecision::cpp_int;
-  using T2 = mpz_class;
-
-  T1 val1;
-  T2 val2;
-  /*
-  std::string str1 = "43";
-  std::istringstream is(str1);
-  is >> val1;
-  std::cerr << "val1=" << val1;
-  */
-
-  /*
-  val1 = 43;
-  TYPE_CONVERSION_STRING(val1, val2);
-  std::cerr << "val1=" << val1 << " val2=" << val2 << "\n";
-  */
-
-  val1 = 43;
-  val2 = UniversalScalarConversion<T2, T1>(val1);
-  std::cerr << "val1=" << val1 << " val2=" << val2 << "\n";
+int main([[maybe_unused]] int argc, [[maybe_unused]] char *argv[]) {
+  double val1_d = 1.0;
+  mpz_class val1_z = UniversalScalarConversion<mpz_class, double>(val1_d);
+  std::cerr << "val1_z=" << val1_z << " val1_d=" << val1_d << "\n";
 }