From 5fa7e249b027ce94b1e2f1064c2c884c9ed538c2 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 1 Feb 2024 22:56:12 +0000 Subject: mpfi integration into mpost from luigi git-svn-id: svn://tug.org/texlive/trunk@69664 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/libs/ChangeLog | 5 + Build/source/libs/Makefile.in | 2 + Build/source/libs/README | 9 +- Build/source/libs/aclocal.m4 | 1 + Build/source/libs/configure | 63 + Build/source/libs/gmp/ChangeLog | 6 + Build/source/libs/gmp/Makefile.am | 12 +- Build/source/libs/gmp/Makefile.in | 48 +- Build/source/libs/mpfi/ChangeLog | 3 + Build/source/libs/mpfi/Makefile.am | 219 + Build/source/libs/mpfi/Makefile.in | 2548 +++++++ Build/source/libs/mpfi/TLpatches/TL-Changes | 7 + Build/source/libs/mpfi/ac/withenable.ac | 7 + Build/source/libs/mpfi/aclocal.m4 | 1191 ++++ Build/source/libs/mpfi/configure | 7510 ++++++++++++++++++++ Build/source/libs/mpfi/configure.ac | 67 + Build/source/libs/mpfi/include/Makefile.am | 17 + Build/source/libs/mpfi/include/Makefile.in | 446 ++ Build/source/libs/mpfi/m4/mpfi-configs.m4 | 0 Build/source/libs/mpfi/mpfi-src/AUTHORS | 6 + Build/source/libs/mpfi/mpfi-src/ChangeLog | 364 + Build/source/libs/mpfi/mpfi-src/Makefile.am | 43 + Build/source/libs/mpfi/mpfi-src/NEWS | 91 + Build/source/libs/mpfi/mpfi-src/README | 41 + Build/source/libs/mpfi/mpfi-src/TODO | 58 + Build/source/libs/mpfi/mpfi-src/configure.ac | 135 + Build/source/libs/mpfi/mpfi-src/doc/Makefile.am | 2 + Build/source/libs/mpfi/mpfi-src/doc/Makefile.in | 753 ++ Build/source/libs/mpfi/mpfi-src/doc/mpfi.info | 1727 +++++ Build/source/libs/mpfi/mpfi-src/doc/mpfi.texi | 1791 +++++ Build/source/libs/mpfi/mpfi-src/mpfi.pc.in | 11 + Build/source/libs/mpfi/mpfi-src/mpfi_config.h.in | 184 + Build/source/libs/mpfi/mpfi-src/src/Makefile.am | 56 + Build/source/libs/mpfi/mpfi-src/src/Makefile.in | 1244 ++++ Build/source/libs/mpfi/mpfi-src/src/abs.c | 58 + Build/source/libs/mpfi/mpfi-src/src/acos.c | 49 + Build/source/libs/mpfi/mpfi-src/src/acosh.c | 50 + Build/source/libs/mpfi/mpfi-src/src/add.c | 63 + Build/source/libs/mpfi/mpfi-src/src/add_d.c | 54 + Build/source/libs/mpfi/mpfi-src/src/add_fr.c | 60 + Build/source/libs/mpfi/mpfi-src/src/add_q.c | 54 + Build/source/libs/mpfi/mpfi-src/src/add_si.c | 54 + Build/source/libs/mpfi/mpfi-src/src/add_ui.c | 61 + Build/source/libs/mpfi/mpfi-src/src/add_z.c | 54 + Build/source/libs/mpfi/mpfi-src/src/alea.c | 41 + Build/source/libs/mpfi/mpfi-src/src/asin.c | 45 + Build/source/libs/mpfi/mpfi-src/src/asinh.c | 45 + Build/source/libs/mpfi/mpfi-src/src/atan.c | 45 + Build/source/libs/mpfi/mpfi-src/src/atan2.c | 100 + Build/source/libs/mpfi/mpfi-src/src/atanh.c | 45 + Build/source/libs/mpfi/mpfi-src/src/bisect.c | 76 + Build/source/libs/mpfi/mpfi-src/src/blow.c | 96 + Build/source/libs/mpfi/mpfi-src/src/cbrt.c | 45 + Build/source/libs/mpfi/mpfi-src/src/clear.c | 36 + Build/source/libs/mpfi/mpfi-src/src/clears.c | 72 + Build/source/libs/mpfi/mpfi-src/src/cmp.c | 136 + Build/source/libs/mpfi/mpfi-src/src/cmp_sym_pi.c | 71 + Build/source/libs/mpfi/mpfi-src/src/constants.c | 62 + Build/source/libs/mpfi/mpfi-src/src/cos.c | 210 + Build/source/libs/mpfi/mpfi-src/src/cosh.c | 66 + Build/source/libs/mpfi/mpfi-src/src/cot.c | 115 + Build/source/libs/mpfi/mpfi-src/src/coth.c | 59 + Build/source/libs/mpfi/mpfi-src/src/csc.c | 141 + Build/source/libs/mpfi/mpfi-src/src/csch.c | 67 + Build/source/libs/mpfi/mpfi-src/src/d_div.c | 77 + Build/source/libs/mpfi/mpfi-src/src/d_sub.c | 66 + Build/source/libs/mpfi/mpfi-src/src/diam.c | 91 + Build/source/libs/mpfi/mpfi-src/src/div.c | 122 + Build/source/libs/mpfi/mpfi-src/src/div_2exp.c | 45 + Build/source/libs/mpfi/mpfi-src/src/div_2si.c | 45 + Build/source/libs/mpfi/mpfi-src/src/div_2ui.c | 45 + Build/source/libs/mpfi/mpfi-src/src/div_d.c | 80 + Build/source/libs/mpfi/mpfi-src/src/div_ext.c | 142 + Build/source/libs/mpfi/mpfi-src/src/div_fr.c | 43 + Build/source/libs/mpfi/mpfi-src/src/div_q.c | 104 + Build/source/libs/mpfi/mpfi-src/src/div_si.c | 79 + Build/source/libs/mpfi/mpfi-src/src/div_ui.c | 70 + Build/source/libs/mpfi/mpfi-src/src/div_z.c | 80 + Build/source/libs/mpfi/mpfi-src/src/erandom.c | 98 + Build/source/libs/mpfi/mpfi-src/src/error.c | 46 + Build/source/libs/mpfi/mpfi-src/src/exp.c | 51 + Build/source/libs/mpfi/mpfi-src/src/exp10.c | 50 + Build/source/libs/mpfi/mpfi-src/src/exp10m1.c | 89 + Build/source/libs/mpfi/mpfi-src/src/exp2.c | 50 + Build/source/libs/mpfi/mpfi-src/src/exp2m1.c | 108 + Build/source/libs/mpfi/mpfi-src/src/expm1.c | 45 + Build/source/libs/mpfi/mpfi-src/src/fr_div.c | 77 + Build/source/libs/mpfi/mpfi-src/src/fr_sub.c | 66 + Build/source/libs/mpfi/mpfi-src/src/get_d.c | 40 + .../source/libs/mpfi/mpfi-src/src/get_endpoints.c | 38 + Build/source/libs/mpfi/mpfi-src/src/get_fr.c | 32 + Build/source/libs/mpfi/mpfi-src/src/get_prec.c | 39 + Build/source/libs/mpfi/mpfi-src/src/get_version.c | 32 + Build/source/libs/mpfi/mpfi-src/src/has_zero.c | 34 + Build/source/libs/mpfi/mpfi-src/src/hypot.c | 89 + Build/source/libs/mpfi/mpfi-src/src/increase.c | 58 + Build/source/libs/mpfi/mpfi-src/src/init.c | 35 + Build/source/libs/mpfi/mpfi-src/src/init2.c | 34 + Build/source/libs/mpfi/mpfi-src/src/inits.c | 74 + Build/source/libs/mpfi/mpfi-src/src/inits2.c | 77 + Build/source/libs/mpfi/mpfi-src/src/inp_str.c | 86 + Build/source/libs/mpfi/mpfi-src/src/intersect.c | 58 + Build/source/libs/mpfi/mpfi-src/src/interv_d.c | 60 + Build/source/libs/mpfi/mpfi-src/src/interv_fr.c | 63 + Build/source/libs/mpfi/mpfi-src/src/interv_q.c | 48 + Build/source/libs/mpfi/mpfi-src/src/interv_si.c | 55 + Build/source/libs/mpfi/mpfi-src/src/interv_ui.c | 55 + Build/source/libs/mpfi/mpfi-src/src/interv_z.c | 48 + Build/source/libs/mpfi/mpfi-src/src/inv.c | 70 + Build/source/libs/mpfi/mpfi-src/src/is_empty.c | 32 + Build/source/libs/mpfi/mpfi-src/src/is_inside.c | 122 + Build/source/libs/mpfi/mpfi-src/src/log.c | 53 + Build/source/libs/mpfi/mpfi-src/src/log10.c | 50 + Build/source/libs/mpfi/mpfi-src/src/log10p1.c | 70 + Build/source/libs/mpfi/mpfi-src/src/log1p.c | 46 + Build/source/libs/mpfi/mpfi-src/src/log2.c | 51 + Build/source/libs/mpfi/mpfi-src/src/log2p1.c | 70 + Build/source/libs/mpfi/mpfi-src/src/mag.c | 55 + Build/source/libs/mpfi/mpfi-src/src/mid.c | 66 + Build/source/libs/mpfi/mpfi-src/src/mig.c | 48 + Build/source/libs/mpfi/mpfi-src/src/mpfi-impl.h | 111 + Build/source/libs/mpfi/mpfi-src/src/mpfi.h | 394 + Build/source/libs/mpfi/mpfi-src/src/mpfi_io.h | 50 + Build/source/libs/mpfi/mpfi-src/src/mul.c | 158 + Build/source/libs/mpfi/mpfi-src/src/mul_2exp.c | 45 + Build/source/libs/mpfi/mpfi-src/src/mul_2si.c | 45 + Build/source/libs/mpfi/mpfi-src/src/mul_2ui.c | 45 + Build/source/libs/mpfi/mpfi-src/src/mul_d.c | 69 + Build/source/libs/mpfi/mpfi-src/src/mul_fr.c | 50 + Build/source/libs/mpfi/mpfi-src/src/mul_q.c | 94 + Build/source/libs/mpfi/mpfi-src/src/mul_si.c | 66 + Build/source/libs/mpfi/mpfi-src/src/mul_ui.c | 57 + Build/source/libs/mpfi/mpfi-src/src/mul_z.c | 66 + Build/source/libs/mpfi/mpfi-src/src/neg.c | 49 + Build/source/libs/mpfi/mpfi-src/src/nrandom.c | 98 + Build/source/libs/mpfi/mpfi-src/src/out_str.c | 42 + Build/source/libs/mpfi/mpfi-src/src/predicates.c | 46 + Build/source/libs/mpfi/mpfi-src/src/print_binary.c | 38 + Build/source/libs/mpfi/mpfi-src/src/put.c | 59 + Build/source/libs/mpfi/mpfi-src/src/put_d.c | 75 + Build/source/libs/mpfi/mpfi-src/src/put_fr.c | 66 + Build/source/libs/mpfi/mpfi-src/src/put_q.c | 56 + Build/source/libs/mpfi/mpfi-src/src/put_si.c | 55 + Build/source/libs/mpfi/mpfi-src/src/put_ui.c | 55 + Build/source/libs/mpfi/mpfi-src/src/put_z.c | 55 + Build/source/libs/mpfi/mpfi-src/src/q_div.c | 74 + Build/source/libs/mpfi/mpfi-src/src/q_sub.c | 84 + Build/source/libs/mpfi/mpfi-src/src/quadrant.c | 71 + Build/source/libs/mpfi/mpfi-src/src/rec_sqrt.c | 58 + .../libs/mpfi/mpfi-src/src/revert_if_needed.c | 45 + Build/source/libs/mpfi/mpfi-src/src/round_prec.c | 46 + Build/source/libs/mpfi/mpfi-src/src/sec.c | 136 + Build/source/libs/mpfi/mpfi-src/src/sech.c | 73 + Build/source/libs/mpfi/mpfi-src/src/set.c | 65 + Build/source/libs/mpfi/mpfi-src/src/set_d.c | 78 + Build/source/libs/mpfi/mpfi-src/src/set_flt.c | 79 + Build/source/libs/mpfi/mpfi-src/src/set_fr.c | 78 + Build/source/libs/mpfi/mpfi-src/src/set_ld.c | 75 + Build/source/libs/mpfi/mpfi-src/src/set_prec.c | 35 + Build/source/libs/mpfi/mpfi-src/src/set_q.c | 70 + Build/source/libs/mpfi/mpfi-src/src/set_si.c | 72 + Build/source/libs/mpfi/mpfi-src/src/set_str.c | 126 + Build/source/libs/mpfi/mpfi-src/src/set_ui.c | 70 + Build/source/libs/mpfi/mpfi-src/src/set_z.c | 72 + Build/source/libs/mpfi/mpfi-src/src/si_div.c | 74 + Build/source/libs/mpfi/mpfi-src/src/si_sub.c | 66 + Build/source/libs/mpfi/mpfi-src/src/sign.c | 101 + Build/source/libs/mpfi/mpfi-src/src/sin.c | 209 + Build/source/libs/mpfi/mpfi-src/src/sinh.c | 45 + Build/source/libs/mpfi/mpfi-src/src/sqr.c | 79 + Build/source/libs/mpfi/mpfi-src/src/sqrt.c | 47 + Build/source/libs/mpfi/mpfi-src/src/sub.c | 65 + Build/source/libs/mpfi/mpfi-src/src/sub_d.c | 62 + Build/source/libs/mpfi/mpfi-src/src/sub_fr.c | 63 + Build/source/libs/mpfi/mpfi-src/src/sub_q.c | 63 + Build/source/libs/mpfi/mpfi-src/src/sub_si.c | 63 + Build/source/libs/mpfi/mpfi-src/src/sub_ui.c | 66 + Build/source/libs/mpfi/mpfi-src/src/sub_z.c | 67 + Build/source/libs/mpfi/mpfi-src/src/swap.c | 34 + Build/source/libs/mpfi/mpfi-src/src/tan.c | 81 + Build/source/libs/mpfi/mpfi-src/src/tanh.c | 45 + Build/source/libs/mpfi/mpfi-src/src/ui_div.c | 70 + Build/source/libs/mpfi/mpfi-src/src/ui_sub.c | 65 + Build/source/libs/mpfi/mpfi-src/src/union.c | 56 + Build/source/libs/mpfi/mpfi-src/src/urandom.c | 99 + Build/source/libs/mpfi/mpfi-src/src/z_div.c | 74 + Build/source/libs/mpfi/mpfi-src/src/z_sub.c | 82 + Build/source/libs/mpfi/mpfi-src/tests/Makefile.am | 119 + Build/source/libs/mpfi/mpfi-src/tests/Makefile.in | 4336 +++++++++++ Build/source/libs/mpfi/mpfi-src/tests/abs.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/acos.dat | 43 + Build/source/libs/mpfi/mpfi-src/tests/acosh.dat | 42 + Build/source/libs/mpfi/mpfi-src/tests/add.dat | 64 + Build/source/libs/mpfi/mpfi-src/tests/add_d.dat | 110 + Build/source/libs/mpfi/mpfi-src/tests/add_fr.dat | 114 + Build/source/libs/mpfi/mpfi-src/tests/add_q.dat | 88 + Build/source/libs/mpfi/mpfi-src/tests/add_si.dat | 88 + Build/source/libs/mpfi/mpfi-src/tests/add_ui.dat | 61 + Build/source/libs/mpfi/mpfi-src/tests/add_z.dat | 88 + Build/source/libs/mpfi/mpfi-src/tests/asin.dat | 43 + Build/source/libs/mpfi/mpfi-src/tests/asinh.dat | 43 + Build/source/libs/mpfi/mpfi-src/tests/atan.dat | 43 + Build/source/libs/mpfi/mpfi-src/tests/atan2.dat | 54 + Build/source/libs/mpfi/mpfi-src/tests/atanh.dat | 46 + Build/source/libs/mpfi/mpfi-src/tests/bisect.dat | 60 + Build/source/libs/mpfi/mpfi-src/tests/blow.dat | 106 + .../source/libs/mpfi/mpfi-src/tests/bounded_p.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/cbrt.dat | 31 + Build/source/libs/mpfi/mpfi-src/tests/check_data.c | 47 + .../libs/mpfi/mpfi-src/tests/const_catalan.dat | 5 + .../libs/mpfi/mpfi-src/tests/const_euler.dat | 5 + .../source/libs/mpfi/mpfi-src/tests/const_log2.dat | 5 + Build/source/libs/mpfi/mpfi-src/tests/const_pi.dat | 5 + Build/source/libs/mpfi/mpfi-src/tests/cos.dat | 73 + Build/source/libs/mpfi/mpfi-src/tests/cosh.dat | 37 + Build/source/libs/mpfi/mpfi-src/tests/cot.dat | 50 + Build/source/libs/mpfi/mpfi-src/tests/coth.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/csc.dat | 149 + Build/source/libs/mpfi/mpfi-src/tests/csch.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/d_div.dat | 86 + Build/source/libs/mpfi/mpfi-src/tests/d_sub.dat | 122 + Build/source/libs/mpfi/mpfi-src/tests/diam.dat | 55 + Build/source/libs/mpfi/mpfi-src/tests/diam_abs.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/diam_rel.dat | 51 + Build/source/libs/mpfi/mpfi-src/tests/div.dat | 199 + Build/source/libs/mpfi/mpfi-src/tests/div_2si.dat | 71 + Build/source/libs/mpfi/mpfi-src/tests/div_2ui.dat | 54 + Build/source/libs/mpfi/mpfi-src/tests/div_d.dat | 92 + Build/source/libs/mpfi/mpfi-src/tests/div_ext.dat | 285 + Build/source/libs/mpfi/mpfi-src/tests/div_fr.dat | 84 + Build/source/libs/mpfi/mpfi-src/tests/div_q.dat | 99 + Build/source/libs/mpfi/mpfi-src/tests/div_si.dat | 91 + Build/source/libs/mpfi/mpfi-src/tests/div_ui.dat | 63 + Build/source/libs/mpfi/mpfi-src/tests/div_z.dat | 100 + Build/source/libs/mpfi/mpfi-src/tests/exp.dat | 36 + Build/source/libs/mpfi/mpfi-src/tests/exp10m1.dat | 47 + Build/source/libs/mpfi/mpfi-src/tests/exp2.dat | 37 + Build/source/libs/mpfi/mpfi-src/tests/exp2m1.dat | 39 + Build/source/libs/mpfi/mpfi-src/tests/expm1.dat | 36 + Build/source/libs/mpfi/mpfi-src/tests/fr_div.dat | 79 + Build/source/libs/mpfi/mpfi-src/tests/fr_sub.dat | 115 + Build/source/libs/mpfi/mpfi-src/tests/has_zero.dat | 42 + Build/source/libs/mpfi/mpfi-src/tests/hypot.dat | 73 + Build/source/libs/mpfi/mpfi-src/tests/increase.dat | 104 + Build/source/libs/mpfi/mpfi-src/tests/inf_p.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/inp_str.dat | 5 + .../source/libs/mpfi/mpfi-src/tests/intersect.dat | 49 + Build/source/libs/mpfi/mpfi-src/tests/inv.dat | 31 + Build/source/libs/mpfi/mpfi-src/tests/is_neg.dat | 41 + .../source/libs/mpfi/mpfi-src/tests/is_nonneg.dat | 41 + .../source/libs/mpfi/mpfi-src/tests/is_nonpos.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/is_pos.dat | 43 + .../libs/mpfi/mpfi-src/tests/is_strictly_neg.dat | 41 + .../libs/mpfi/mpfi-src/tests/is_strictly_pos.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/log.dat | 42 + Build/source/libs/mpfi/mpfi-src/tests/log10.dat | 42 + Build/source/libs/mpfi/mpfi-src/tests/log1p.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/log2.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/mag.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/mid.dat | 57 + Build/source/libs/mpfi/mpfi-src/tests/mig.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.h | 320 + Build/source/libs/mpfi/mpfi-src/tests/mul.dat | 123 + Build/source/libs/mpfi/mpfi-src/tests/mul_2si.dat | 71 + Build/source/libs/mpfi/mpfi-src/tests/mul_2ui.dat | 66 + Build/source/libs/mpfi/mpfi-src/tests/mul_d.dat | 123 + Build/source/libs/mpfi/mpfi-src/tests/mul_fr.dat | 90 + Build/source/libs/mpfi/mpfi-src/tests/mul_q.dat | 99 + Build/source/libs/mpfi/mpfi-src/tests/mul_si.dat | 99 + Build/source/libs/mpfi/mpfi-src/tests/mul_ui.dat | 63 + Build/source/libs/mpfi/mpfi-src/tests/mul_z.dat | 99 + Build/source/libs/mpfi/mpfi-src/tests/nan_p.dat | 41 + Build/source/libs/mpfi/mpfi-src/tests/neg.dat | 36 + Build/source/libs/mpfi/mpfi-src/tests/put_d.dat | 67 + Build/source/libs/mpfi/mpfi-src/tests/put_fr.dat | 77 + Build/source/libs/mpfi/mpfi-src/tests/put_q.dat | 66 + Build/source/libs/mpfi/mpfi-src/tests/put_si.dat | 51 + Build/source/libs/mpfi/mpfi-src/tests/put_ui.dat | 44 + Build/source/libs/mpfi/mpfi-src/tests/put_z.dat | 51 + Build/source/libs/mpfi/mpfi-src/tests/q_div.dat | 130 + Build/source/libs/mpfi/mpfi-src/tests/q_sub.dat | 129 + Build/source/libs/mpfi/mpfi-src/tests/random.c | 215 + Build/source/libs/mpfi/mpfi-src/tests/read_data.c | 570 ++ Build/source/libs/mpfi/mpfi-src/tests/rec_sqrt.dat | 31 + Build/source/libs/mpfi/mpfi-src/tests/sec.dat | 144 + Build/source/libs/mpfi/mpfi-src/tests/sech.dat | 43 + Build/source/libs/mpfi/mpfi-src/tests/set_d.dat | 39 + Build/source/libs/mpfi/mpfi-src/tests/set_flt.dat | 37 + Build/source/libs/mpfi/mpfi-src/tests/set_fr.dat | 48 + Build/source/libs/mpfi/mpfi-src/tests/set_ld.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/set_q.dat | 35 + Build/source/libs/mpfi/mpfi-src/tests/set_si.dat | 40 + Build/source/libs/mpfi/mpfi-src/tests/set_ui.dat | 38 + Build/source/libs/mpfi/mpfi-src/tests/set_z.dat | 35 + Build/source/libs/mpfi/mpfi-src/tests/si_div.dat | 112 + Build/source/libs/mpfi/mpfi-src/tests/si_sub.dat | 101 + Build/source/libs/mpfi/mpfi-src/tests/sin.dat | 168 + Build/source/libs/mpfi/mpfi-src/tests/sinh.dat | 36 + Build/source/libs/mpfi/mpfi-src/tests/sqr.dat | 31 + Build/source/libs/mpfi/mpfi-src/tests/sqrt.dat | 32 + Build/source/libs/mpfi/mpfi-src/tests/sub.dat | 62 + Build/source/libs/mpfi/mpfi-src/tests/sub_d.dat | 108 + Build/source/libs/mpfi/mpfi-src/tests/sub_fr.dat | 125 + Build/source/libs/mpfi/mpfi-src/tests/sub_q.dat | 117 + Build/source/libs/mpfi/mpfi-src/tests/sub_si.dat | 92 + Build/source/libs/mpfi/mpfi-src/tests/sub_ui.dat | 63 + Build/source/libs/mpfi/mpfi-src/tests/sub_z.dat | 106 + Build/source/libs/mpfi/mpfi-src/tests/tabs.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tacos.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tacosh.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tadd.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tadd_d.c | 96 + Build/source/libs/mpfi/mpfi-src/tests/tadd_fr.c | 101 + Build/source/libs/mpfi/mpfi-src/tests/tadd_q.c | 98 + Build/source/libs/mpfi/mpfi-src/tests/tadd_si.c | 97 + Build/source/libs/mpfi/mpfi-src/tests/tadd_ui.c | 77 + Build/source/libs/mpfi/mpfi-src/tests/tadd_z.c | 97 + Build/source/libs/mpfi/mpfi-src/tests/tan.dat | 167 + Build/source/libs/mpfi/mpfi-src/tests/tanh.dat | 37 + Build/source/libs/mpfi/mpfi-src/tests/tasin.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tasinh.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tatan.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tatan2.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tatanh.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tbisect.c | 164 + Build/source/libs/mpfi/mpfi-src/tests/tblow.c | 43 + Build/source/libs/mpfi/mpfi-src/tests/tbounded_p.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tcbrt.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tcmp.c | 136 + Build/source/libs/mpfi/mpfi-src/tests/tcmp_d.c | 120 + Build/source/libs/mpfi/mpfi-src/tests/tcmp_fr.c | 108 + Build/source/libs/mpfi/mpfi-src/tests/tcmp_q.c | 116 + Build/source/libs/mpfi/mpfi-src/tests/tcmp_si.c | 123 + Build/source/libs/mpfi/mpfi-src/tests/tcmp_ui.c | 123 + Build/source/libs/mpfi/mpfi-src/tests/tcmp_z.c | 116 + .../libs/mpfi/mpfi-src/tests/tconst_catalan.c | 41 + .../source/libs/mpfi/mpfi-src/tests/tconst_euler.c | 41 + .../source/libs/mpfi/mpfi-src/tests/tconst_log2.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tconst_pi.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tcos.c | 60 + Build/source/libs/mpfi/mpfi-src/tests/tcosh.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tcot.c | 60 + Build/source/libs/mpfi/mpfi-src/tests/tcoth.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tcsc.c | 60 + Build/source/libs/mpfi/mpfi-src/tests/tcsch.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/td_div.c | 125 + Build/source/libs/mpfi/mpfi-src/tests/td_sub.c | 98 + Build/source/libs/mpfi/mpfi-src/tests/tdiam.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tdiam_abs.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tdiam_rel.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tdiv.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_2exp.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_2si.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_2ui.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_d.c | 136 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_ext.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_fr.c | 145 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_q.c | 184 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_si.c | 85 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_ui.c | 85 + Build/source/libs/mpfi/mpfi-src/tests/tdiv_z.c | 88 + Build/source/libs/mpfi/mpfi-src/tests/terror.c | 140 + Build/source/libs/mpfi/mpfi-src/tests/texp.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/texp10.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/texp10m1.c | 50 + Build/source/libs/mpfi/mpfi-src/tests/texp2.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/texp2m1.c | 50 + Build/source/libs/mpfi/mpfi-src/tests/texpm1.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tfr_div.c | 143 + Build/source/libs/mpfi/mpfi-src/tests/tfr_sub.c | 104 + Build/source/libs/mpfi/mpfi-src/tests/tget_d.c | 138 + .../libs/mpfi/mpfi-src/tests/tget_endpoints.c | 209 + Build/source/libs/mpfi/mpfi-src/tests/tget_fr.c | 157 + .../source/libs/mpfi/mpfi-src/tests/tget_version.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/thas_zero.c | 67 + Build/source/libs/mpfi/mpfi-src/tests/thypot.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tincrease.c | 43 + Build/source/libs/mpfi/mpfi-src/tests/tinf_p.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tinit.c | 58 + Build/source/libs/mpfi/mpfi-src/tests/tinit_set.c | 437 ++ Build/source/libs/mpfi/mpfi-src/tests/tinits.c | 76 + Build/source/libs/mpfi/mpfi-src/tests/tintersect.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tinterv_d.c | 126 + Build/source/libs/mpfi/mpfi-src/tests/tinterv_fr.c | 194 + Build/source/libs/mpfi/mpfi-src/tests/tinterv_q.c | 96 + Build/source/libs/mpfi/mpfi-src/tests/tinterv_si.c | 113 + Build/source/libs/mpfi/mpfi-src/tests/tinterv_ui.c | 104 + Build/source/libs/mpfi/mpfi-src/tests/tinterv_z.c | 96 + Build/source/libs/mpfi/mpfi-src/tests/tinv.c | 50 + Build/source/libs/mpfi/mpfi-src/tests/tio_str.c | 220 + Build/source/libs/mpfi/mpfi-src/tests/tis_empty.c | 64 + Build/source/libs/mpfi/mpfi-src/tests/tis_inside.c | 136 + .../source/libs/mpfi/mpfi-src/tests/tis_inside_d.c | 105 + .../libs/mpfi/mpfi-src/tests/tis_inside_fr.c | 102 + .../source/libs/mpfi/mpfi-src/tests/tis_inside_q.c | 111 + .../libs/mpfi/mpfi-src/tests/tis_inside_si.c | 117 + .../libs/mpfi/mpfi-src/tests/tis_inside_ui.c | 117 + .../source/libs/mpfi/mpfi-src/tests/tis_inside_z.c | 111 + Build/source/libs/mpfi/mpfi-src/tests/tis_neg.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tis_nonneg.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tis_nonpos.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tis_pos.c | 69 + .../libs/mpfi/mpfi-src/tests/tis_strictly_inside.c | 134 + .../libs/mpfi/mpfi-src/tests/tis_strictly_neg.c | 69 + .../libs/mpfi/mpfi-src/tests/tis_strictly_pos.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tis_zero.c | 90 + Build/source/libs/mpfi/mpfi-src/tests/tlog.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tlog10.c | 61 + Build/source/libs/mpfi/mpfi-src/tests/tlog1p.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tlog2.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tmag.c | 107 + Build/source/libs/mpfi/mpfi-src/tests/tmid.c | 118 + Build/source/libs/mpfi/mpfi-src/tests/tmig.c | 107 + Build/source/libs/mpfi/mpfi-src/tests/tmul.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tmul_2exp.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tmul_2si.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tmul_2ui.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tmul_d.c | 182 + Build/source/libs/mpfi/mpfi-src/tests/tmul_fr.c | 145 + Build/source/libs/mpfi/mpfi-src/tests/tmul_q.c | 182 + Build/source/libs/mpfi/mpfi-src/tests/tmul_si.c | 97 + Build/source/libs/mpfi/mpfi-src/tests/tmul_ui.c | 97 + Build/source/libs/mpfi/mpfi-src/tests/tmul_z.c | 100 + Build/source/libs/mpfi/mpfi-src/tests/tnan_p.c | 69 + Build/source/libs/mpfi/mpfi-src/tests/tneg.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tput_d.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tput_fr.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tput_q.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tput_si.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tput_ui.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tput_z.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tq_div.c | 119 + Build/source/libs/mpfi/mpfi-src/tests/tq_sub.c | 121 + Build/source/libs/mpfi/mpfi-src/tests/trec_sqrt.c | 44 + .../source/libs/mpfi/mpfi-src/tests/tround_prec.c | 183 + Build/source/libs/mpfi/mpfi-src/tests/tsec.c | 60 + Build/source/libs/mpfi/mpfi-src/tests/tsech.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tset.c | 132 + Build/source/libs/mpfi/mpfi-src/tests/tset_d.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tset_flt.c | 38 + Build/source/libs/mpfi/mpfi-src/tests/tset_fr.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tset_ld.c | 38 + Build/source/libs/mpfi/mpfi-src/tests/tset_q.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tset_si.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tset_str.c | 235 + Build/source/libs/mpfi/mpfi-src/tests/tset_ui.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tset_z.c | 41 + Build/source/libs/mpfi/mpfi-src/tests/tsi_div.c | 95 + Build/source/libs/mpfi/mpfi-src/tests/tsi_sub.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tsin.c | 60 + Build/source/libs/mpfi/mpfi-src/tests/tsinh.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tsqr.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tsqrt.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tsub.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tsub_d.c | 97 + Build/source/libs/mpfi/mpfi-src/tests/tsub_fr.c | 106 + Build/source/libs/mpfi/mpfi-src/tests/tsub_q.c | 100 + Build/source/libs/mpfi/mpfi-src/tests/tsub_si.c | 97 + Build/source/libs/mpfi/mpfi-src/tests/tsub_ui.c | 79 + Build/source/libs/mpfi/mpfi-src/tests/tsub_z.c | 103 + Build/source/libs/mpfi/mpfi-src/tests/tswap.c | 65 + Build/source/libs/mpfi/mpfi-src/tests/ttan.c | 60 + Build/source/libs/mpfi/mpfi-src/tests/ttanh.c | 45 + Build/source/libs/mpfi/mpfi-src/tests/tui_div.c | 95 + Build/source/libs/mpfi/mpfi-src/tests/tui_sub.c | 44 + Build/source/libs/mpfi/mpfi-src/tests/tunion.c | 68 + Build/source/libs/mpfi/mpfi-src/tests/type_i.c | 152 + Build/source/libs/mpfi/mpfi-src/tests/type_id.c | 134 + Build/source/libs/mpfi/mpfi-src/tests/type_idi.c | 201 + Build/source/libs/mpfi/mpfi-src/tests/type_if.c | 131 + Build/source/libs/mpfi/mpfi-src/tests/type_ii.c | 283 + Build/source/libs/mpfi/mpfi-src/tests/type_iid.c | 202 + Build/source/libs/mpfi/mpfi-src/tests/type_iii.c | 256 + Build/source/libs/mpfi/mpfi-src/tests/type_iiii.c | 310 + Build/source/libs/mpfi/mpfi-src/tests/type_iiq.c | 207 + Build/source/libs/mpfi/mpfi-src/tests/type_iir.c | 208 + Build/source/libs/mpfi/mpfi-src/tests/type_iis.c | 202 + Build/source/libs/mpfi/mpfi-src/tests/type_iiu.c | 202 + Build/source/libs/mpfi/mpfi-src/tests/type_iiz.c | 209 + Build/source/libs/mpfi/mpfi-src/tests/type_il.c | 131 + Build/source/libs/mpfi/mpfi-src/tests/type_iq.c | 137 + Build/source/libs/mpfi/mpfi-src/tests/type_iqi.c | 211 + Build/source/libs/mpfi/mpfi-src/tests/type_ir.c | 137 + Build/source/libs/mpfi/mpfi-src/tests/type_iri.c | 208 + Build/source/libs/mpfi/mpfi-src/tests/type_is.c | 134 + Build/source/libs/mpfi/mpfi-src/tests/type_isi.c | 200 + Build/source/libs/mpfi/mpfi-src/tests/type_iu.c | 134 + Build/source/libs/mpfi/mpfi-src/tests/type_iui.c | 200 + Build/source/libs/mpfi/mpfi-src/tests/type_iz.c | 137 + Build/source/libs/mpfi/mpfi-src/tests/type_izi.c | 209 + Build/source/libs/mpfi/mpfi-src/tests/type_ri.c | 130 + Build/source/libs/mpfi/mpfi-src/tests/tz_div.c | 118 + Build/source/libs/mpfi/mpfi-src/tests/tz_sub.c | 122 + Build/source/libs/mpfi/mpfi-src/tests/ui_div.dat | 81 + Build/source/libs/mpfi/mpfi-src/tests/ui_sub.dat | 71 + Build/source/libs/mpfi/mpfi-src/tests/union.dat | 49 + Build/source/libs/mpfi/mpfi-src/tests/z_div.dat | 112 + Build/source/libs/mpfi/mpfi-src/tests/z_sub.dat | 101 + Build/source/libs/mpfi/mpfi.test | 6 + Build/source/libs/mpfi/mpfi_config.h.in | 75 + Build/source/libs/mpfi/mpfitest.c | 26 + Build/source/libs/mpfi/version.ac | 11 + Build/source/libs/mpfr/Makefile.am | 4 +- Build/source/libs/mpfr/Makefile.in | 18 +- 505 files changed, 61202 insertions(+), 19 deletions(-) create mode 100644 Build/source/libs/mpfi/ChangeLog create mode 100644 Build/source/libs/mpfi/Makefile.am create mode 100644 Build/source/libs/mpfi/Makefile.in create mode 100644 Build/source/libs/mpfi/TLpatches/TL-Changes create mode 100644 Build/source/libs/mpfi/ac/withenable.ac create mode 100644 Build/source/libs/mpfi/aclocal.m4 create mode 100755 Build/source/libs/mpfi/configure create mode 100644 Build/source/libs/mpfi/configure.ac create mode 100644 Build/source/libs/mpfi/include/Makefile.am create mode 100644 Build/source/libs/mpfi/include/Makefile.in create mode 100644 Build/source/libs/mpfi/m4/mpfi-configs.m4 create mode 100644 Build/source/libs/mpfi/mpfi-src/AUTHORS create mode 100644 Build/source/libs/mpfi/mpfi-src/ChangeLog create mode 100644 Build/source/libs/mpfi/mpfi-src/Makefile.am create mode 100644 Build/source/libs/mpfi/mpfi-src/NEWS create mode 100644 Build/source/libs/mpfi/mpfi-src/README create mode 100644 Build/source/libs/mpfi/mpfi-src/TODO create mode 100644 Build/source/libs/mpfi/mpfi-src/configure.ac create mode 100644 Build/source/libs/mpfi/mpfi-src/doc/Makefile.am create mode 100644 Build/source/libs/mpfi/mpfi-src/doc/Makefile.in create mode 100644 Build/source/libs/mpfi/mpfi-src/doc/mpfi.info create mode 100644 Build/source/libs/mpfi/mpfi-src/doc/mpfi.texi create mode 100644 Build/source/libs/mpfi/mpfi-src/mpfi.pc.in create mode 100644 Build/source/libs/mpfi/mpfi-src/mpfi_config.h.in create mode 100644 Build/source/libs/mpfi/mpfi-src/src/Makefile.am create mode 100644 Build/source/libs/mpfi/mpfi-src/src/Makefile.in create mode 100644 Build/source/libs/mpfi/mpfi-src/src/abs.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/acos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/acosh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/add_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/alea.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/asin.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/asinh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/atan.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/atan2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/atanh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/bisect.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/blow.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/cbrt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/clear.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/clears.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/cmp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/cmp_sym_pi.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/constants.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/cos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/cosh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/cot.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/coth.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/csc.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/csch.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/d_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/d_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/diam.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_2exp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_2si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_2ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_ext.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/div_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/erandom.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/error.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/exp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/exp10.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/exp10m1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/exp2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/exp2m1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/expm1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/fr_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/fr_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/get_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/get_endpoints.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/get_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/get_prec.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/get_version.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/has_zero.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/hypot.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/increase.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/init.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/init2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/inits.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/inits2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/inp_str.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/intersect.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/interv_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/interv_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/interv_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/interv_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/interv_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/interv_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/inv.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/is_empty.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/is_inside.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/log.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/log10.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/log10p1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/log1p.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/log2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/log2p1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mag.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mid.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mig.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mpfi-impl.h create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mpfi.h create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mpfi_io.h create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_2exp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_2si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_2ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/mul_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/neg.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/nrandom.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/out_str.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/predicates.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/print_binary.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/put_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/q_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/q_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/quadrant.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/rec_sqrt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/revert_if_needed.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/round_prec.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sec.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sech.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_flt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_ld.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_prec.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_str.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/set_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/si_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/si_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sign.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sin.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sinh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sqr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sqrt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/sub_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/swap.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/tan.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/tanh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/ui_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/ui_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/union.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/urandom.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/z_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/src/z_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/Makefile.am create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/Makefile.in create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/abs.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/acos.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/acosh.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add_d.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add_fr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add_q.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add_si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add_ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/add_z.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/asin.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/asinh.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/atan.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/atan2.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/atanh.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/bisect.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/blow.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/bounded_p.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/cbrt.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/check_data.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/const_catalan.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/const_euler.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/const_log2.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/const_pi.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/cos.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/cosh.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/cot.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/coth.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/csc.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/csch.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/d_div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/d_sub.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/diam.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/diam_abs.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/diam_rel.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_2si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_2ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_d.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_ext.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_fr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_q.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/div_z.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/exp.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/exp10m1.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/exp2.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/exp2m1.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/expm1.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/fr_div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/fr_sub.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/has_zero.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/hypot.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/increase.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/inf_p.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/inp_str.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/intersect.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/inv.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/is_neg.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/is_nonneg.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/is_nonpos.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/is_pos.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/is_strictly_neg.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/is_strictly_pos.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/log.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/log10.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/log1p.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/log2.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mag.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mid.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mig.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.h create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_2si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_2ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_d.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_fr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_q.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/mul_z.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/nan_p.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/neg.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/put_d.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/put_fr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/put_q.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/put_si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/put_ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/put_z.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/q_div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/q_sub.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/random.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/read_data.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/rec_sqrt.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sec.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sech.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_d.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_flt.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_fr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_ld.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_q.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/set_z.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/si_div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/si_sub.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sin.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sinh.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sqr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sqrt.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub_d.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub_fr.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub_q.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub_si.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub_ui.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/sub_z.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tabs.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tacos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tacosh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tadd_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tan.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tanh.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tasin.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tasinh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tatan.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tatan2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tatanh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tbisect.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tblow.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tbounded_p.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcbrt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcmp_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tconst_catalan.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tconst_euler.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tconst_log2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tconst_pi.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcosh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcot.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcoth.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcsc.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tcsch.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/td_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/td_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiam.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiam_abs.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiam_rel.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_2exp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_2si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_2ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_ext.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tdiv_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/terror.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/texp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/texp10.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/texp10m1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/texp2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/texp2m1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/texpm1.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tfr_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tfr_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tget_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tget_endpoints.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tget_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tget_version.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/thas_zero.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/thypot.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tincrease.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinf_p.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinit.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinit_set.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinits.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tintersect.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinterv_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinterv_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinterv_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinterv_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinterv_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinterv_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tinv.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tio_str.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_empty.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_inside_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_neg.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_nonneg.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_nonpos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_pos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_inside.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_neg.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_pos.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tis_zero.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tlog.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tlog10.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tlog1p.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tlog2.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmag.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmid.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmig.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_2exp.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_2si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_2ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tmul_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tnan_p.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tneg.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tput_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tput_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tput_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tput_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tput_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tput_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tq_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tq_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/trec_sqrt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tround_prec.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsec.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsech.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_flt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_ld.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_str.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tset_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsi_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsi_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsin.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsinh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsqr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsqrt.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub_d.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub_fr.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub_q.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub_si.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub_ui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tsub_z.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tswap.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/ttan.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/ttanh.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tui_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tui_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tunion.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_i.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_id.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_idi.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_if.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_ii.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iid.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iii.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iiii.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iiq.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iir.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iis.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iiu.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iiz.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_il.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iq.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iqi.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_ir.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iri.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_is.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_isi.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iu.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iui.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_iz.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_izi.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/type_ri.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tz_div.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/tz_sub.c create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/ui_div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/ui_sub.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/union.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/z_div.dat create mode 100644 Build/source/libs/mpfi/mpfi-src/tests/z_sub.dat create mode 100755 Build/source/libs/mpfi/mpfi.test create mode 100644 Build/source/libs/mpfi/mpfi_config.h.in create mode 100644 Build/source/libs/mpfi/mpfitest.c create mode 100644 Build/source/libs/mpfi/version.ac (limited to 'Build/source/libs') diff --git a/Build/source/libs/ChangeLog b/Build/source/libs/ChangeLog index 581500c66d2..527ffca5112 100644 --- a/Build/source/libs/ChangeLog +++ b/Build/source/libs/ChangeLog @@ -1,3 +1,8 @@ +2024-02-01 Luigi Scarso + + * mpfi: new subdir for mpfi (interval arithmetic) library, + used in mpost. + 2022-08-29 Hironobu Yamashita * potrace: re-installed for mflua/mfluajit besides dvisvgm. diff --git a/Build/source/libs/Makefile.in b/Build/source/libs/Makefile.in index 09a7da16ebd..e1efd5dca9c 100644 --- a/Build/source/libs/Makefile.in +++ b/Build/source/libs/Makefile.in @@ -103,6 +103,7 @@ am__aclocal_m4_deps = $(top_srcdir)/../m4/kpse-cairo-flags.m4 \ $(top_srcdir)/../m4/kpse-libpng-flags.m4 \ $(top_srcdir)/../m4/kpse-lt-hack.m4 \ $(top_srcdir)/../m4/kpse-mktex.m4 \ + $(top_srcdir)/../m4/kpse-mpfi-flags.m4 \ $(top_srcdir)/../m4/kpse-mpfr-flags.m4 \ $(top_srcdir)/../m4/kpse-options.m4 \ $(top_srcdir)/../m4/kpse-pixman-flags.m4 \ @@ -179,6 +180,7 @@ am__aclocal_m4_deps = $(top_srcdir)/../m4/kpse-cairo-flags.m4 \ $(top_srcdir)/../libs/graphite2/ac/withenable.ac \ $(top_srcdir)/../libs/zziplib/ac/withenable.ac \ $(top_srcdir)/../libs/xpdf/ac/withenable.ac \ + $(top_srcdir)/../libs/mpfi/ac/withenable.ac \ $(top_srcdir)/../libs/mpfr/ac/withenable.ac \ $(top_srcdir)/../libs/gmp/ac/withenable.ac \ $(top_srcdir)/../libs/cairo/ac/withenable.ac \ diff --git a/Build/source/libs/README b/Build/source/libs/README index 532fd4bec51..dc3b253311d 100644 --- a/Build/source/libs/README +++ b/Build/source/libs/README @@ -9,7 +9,7 @@ bypassing or using the original one. See also comments in ../texk/README. -cairo 1.16.0 - checked 20oct18 +cairo 1.16.0 - no longer checked https://cairographics.org/releases/ There are later releases than this, but they removed autotools support. Since cairo is only used by MetaPost (for png output), and 1.16.0 @@ -50,10 +50,13 @@ luajit 2.1.0-beta3 - checked 20jun17 https://luajit.org/download/LuaJIT-2.1.0-beta3.tar.gz As with Lua. -mpfr 4.2.1 - checked 26aug23 +mpfi 1.5.4 - checked 1feb24 + https://perso.ens-lyon.fr/nathalie.revol/software.html#download + +mpfr 4.2.1 - checked 1feb24 https://ftp.gnu.org/gnu/mpfr/ -pixman 0.42.2 - checked 03nov22 +pixman 0.42.2 - no longer checked https://cairographics.org/releases/ See cairo above. diff --git a/Build/source/libs/aclocal.m4 b/Build/source/libs/aclocal.m4 index 70328d93537..66a863190c4 100644 --- a/Build/source/libs/aclocal.m4 +++ b/Build/source/libs/aclocal.m4 @@ -1198,6 +1198,7 @@ m4_include([../m4/kpse-libpaper-flags.m4]) m4_include([../m4/kpse-libpng-flags.m4]) m4_include([../m4/kpse-lt-hack.m4]) m4_include([../m4/kpse-mktex.m4]) +m4_include([../m4/kpse-mpfi-flags.m4]) m4_include([../m4/kpse-mpfr-flags.m4]) m4_include([../m4/kpse-options.m4]) m4_include([../m4/kpse-pixman-flags.m4]) diff --git a/Build/source/libs/configure b/Build/source/libs/configure index af970279106..7330e6e969b 100755 --- a/Build/source/libs/configure +++ b/Build/source/libs/configure @@ -842,6 +842,9 @@ with_system_icu with_system_teckit with_system_graphite2 with_system_zziplib +with_system_mpfi +with_mpfi_includes +with_mpfi_libdir with_system_mpfr with_mpfr_includes with_mpfr_libdir @@ -1684,6 +1687,10 @@ Optional Packages: (requires pkg-config) --with-system-zziplib use installed zziplib headers and library (requires pkg-config) + --with-system-mpfi use installed mpfi headers and library + --with-mpfi-includes=DIR + mpfi headers installed in DIR + --with-mpfi-libdir=DIR mpfi library installed in DIR --with-system-mpfr use installed mpfr headers and library --with-mpfr-includes=DIR mpfr headers installed in DIR @@ -4745,6 +4752,7 @@ case $enable_mp in #( esac test "x$enable_web2c:$enable_mp" = xyes:yes && { + need_mpfi=yes need_mpfr=yes need_cairo=yes need_libpng=yes @@ -4762,6 +4770,7 @@ case $enable_pmp in #( esac test "x$enable_web2c:$enable_pmp" = xyes:yes && { + need_mpfi=yes need_mpfr=yes need_cairo=yes need_libpng=yes @@ -4780,6 +4789,7 @@ case $enable_upmp in #( esac test "x$enable_web2c:$enable_upmp" = xyes:yes && { + need_mpfi=yes need_mpfr=yes need_cairo=yes need_libpng=yes @@ -6011,6 +6021,53 @@ printf "%s\n" "$as_me: Assuming installed \`xpdf' headers and library" >&6;} ac_configure_args="$ac_configure_args '--with-system-xpdf=$with_system_xpdf'" fi +## libs/mpfi/ac/withenable.ac: configure.ac fragment for the TeX Live subdirectory libs/mpfi/ +## configure options and TL libraries required for mpfi + +# Check whether --with-system-mpfi was given. +if test ${with_system_mpfi+y} +then : + withval=$with_system_mpfi; +fi + +# Check whether --with-mpfi-includes was given. +if test ${with_mpfi_includes+y} +then : + withval=$with_mpfi_includes; +fi + +# Check whether --with-mpfi-libdir was given. +if test ${with_mpfi_libdir+y} +then : + withval=$with_mpfi_libdir; +fi +if test "x$with_system_mpfi" = x; then + if test -f $srcdir/../libs/mpfi/configure; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: Assuming \`mpfi' headers and library from TL tree" >&5 +printf "%s\n" "$as_me: Assuming \`mpfi' headers and library from TL tree" >&6;} + with_system_mpfi=no + else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: Assuming installed \`mpfi' headers and library" >&5 +printf "%s\n" "$as_me: Assuming installed \`mpfi' headers and library" >&6;} + with_system_mpfi=yes + fi + ac_configure_args="$ac_configure_args '--with-system-mpfi=$with_system_mpfi'" +fi +if test "x$with_system_mpfi" = xyes; then + if test "x$with_system_mpfr" = x; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: -> installed \`mpfr' headers and library" >&5 +printf "%s\n" "$as_me: -> installed \`mpfr' headers and library" >&6;} + with_system_mpfr=yes + ac_configure_args="$ac_configure_args '--with-system-mpfr'" + elif test "x$with_system_mpfr" != xyes; then + as_fn_error $? "Sorry, \`--with-system-mpfi' requires \`--with-system-mpfr'" "$LINENO" 5 + fi +fi + +test "x$need_mpfi" = xyes && { + need_mpfr=yes +} + ## libs/mpfr/ac/withenable.ac: configure.ac fragment for the TeX Live subdirectory libs/mpfr/ ## configure options and TL libraries required for mpfr @@ -7473,6 +7530,12 @@ if test -x $srcdir/xpdf/configure; then else echo 'tldbg:_KPSE_RECURSE skipping subdir, no (executable) configure: '"$srcdir"'/xpdf/configure' >&5 fi +if test -x $srcdir/mpfi/configure; then + test "x$with_system_mpfi" != xyes && test "x$need_mpfi" = xyes && MAKE_SUBDIRS="mpfi $MAKE_SUBDIRS" + CONF_SUBDIRS="mpfi $CONF_SUBDIRS" +else + echo 'tldbg:_KPSE_RECURSE skipping subdir, no (executable) configure: '"$srcdir"'/mpfi/configure' >&5 +fi if test -x $srcdir/mpfr/configure; then test "x$with_system_mpfr" != xyes && test "x$need_mpfr" = xyes && MAKE_SUBDIRS="mpfr $MAKE_SUBDIRS" CONF_SUBDIRS="mpfr $CONF_SUBDIRS" diff --git a/Build/source/libs/gmp/ChangeLog b/Build/source/libs/gmp/ChangeLog index 410d40c906d..a3ad2162b67 100644 --- a/Build/source/libs/gmp/ChangeLog +++ b/Build/source/libs/gmp/ChangeLog @@ -1,3 +1,9 @@ +2024-02-01 Luigi Scarso + + * Makefile.am (mpn_sources): move mod_1.c from mpn_unused. + (mpz_sources): move cdiv_qr_ui.c et al. from mpz_unused. + This is to support libs/mpfi and interval arithmetic in mpost. + 2020-11-15 Akira Kakuto Import gmp-6.2.1. diff --git a/Build/source/libs/gmp/Makefile.am b/Build/source/libs/gmp/Makefile.am index 5b9cb947714..89914202611 100644 --- a/Build/source/libs/gmp/Makefile.am +++ b/Build/source/libs/gmp/Makefile.am @@ -1,7 +1,7 @@ ## $Id$ ## Proxy Makefile.am to build GNU MP for TeX Live. ## -## Copyright 2016-2017 Karl Berry +## Copyright 2016-2024 Karl Berry ## Copyright 2014-2015 Peter Breitenlohner ## Copyright 2014 Taco Hoekwater ## @@ -121,6 +121,7 @@ mpn_sources = \ @GMP_TREE@/mpn/generic/lshiftc.c \ @GMP_TREE@/mpn/generic/matrix22_mul.c \ @GMP_TREE@/mpn/generic/matrix22_mul1_inverse_vector.c \ + @GMP_TREE@/mpn/generic/mod_1.c \ @GMP_TREE@/mpn/generic/mu_bdiv_q.c \ @GMP_TREE@/mpn/generic/mu_div_q.c \ @GMP_TREE@/mpn/generic/mu_div_qr.c \ @@ -229,7 +230,6 @@ mpn_unused = \ @GMP_TREE@/mpn/generic/jacbase.c \ @GMP_TREE@/mpn/generic/jacobi.c \ @GMP_TREE@/mpn/generic/jacobi_2.c \ - @GMP_TREE@/mpn/generic/mod_1.c \ @GMP_TREE@/mpn/generic/mod_1_1.c \ @GMP_TREE@/mpn/generic/mod_1_2.c \ @GMP_TREE@/mpn/generic/mod_1_3.c \ @@ -273,6 +273,8 @@ mpz_sources = \ @GMP_TREE@/mpz/add_ui.c \ @GMP_TREE@/mpz/aorsmul.c \ @GMP_TREE@/mpz/aorsmul_i.c \ + @GMP_TREE@/mpz/cdiv_qr_ui.c \ + @GMP_TREE@/mpz/cdiv_q_ui.c \ @GMP_TREE@/mpz/cfdiv_q_2exp.c \ @GMP_TREE@/mpz/clear.c \ @GMP_TREE@/mpz/cmp.c \ @@ -281,6 +283,7 @@ mpz_sources = \ @GMP_TREE@/mpz/divexact.c \ @GMP_TREE@/mpz/fdiv_q.c \ @GMP_TREE@/mpz/fdiv_q_ui.c \ + @GMP_TREE@/mpz/fdiv_r_ui.c \ @GMP_TREE@/mpz/fdiv_qr.c \ @GMP_TREE@/mpz/fits_slong.c \ @GMP_TREE@/mpz/gcdext.c \ @@ -298,6 +301,7 @@ mpz_sources = \ @GMP_TREE@/mpz/mul_ui.c \ @GMP_TREE@/mpz/n_pow_ui.c \ @GMP_TREE@/mpz/neg.c \ + @GMP_TREE@/mpz/pow_ui.c \ @GMP_TREE@/mpz/powm.c \ @GMP_TREE@/mpz/powm_ui.c \ @GMP_TREE@/mpz/realloc.c \ @@ -328,9 +332,7 @@ mpz_unused = \ @GMP_TREE@/mpz/bin_ui.c \ @GMP_TREE@/mpz/bin_uiui.c \ @GMP_TREE@/mpz/cdiv_q.c \ - @GMP_TREE@/mpz/cdiv_q_ui.c \ @GMP_TREE@/mpz/cdiv_qr.c \ - @GMP_TREE@/mpz/cdiv_qr_ui.c \ @GMP_TREE@/mpz/cdiv_r.c \ @GMP_TREE@/mpz/cdiv_r_ui.c \ @GMP_TREE@/mpz/cdiv_ui.c \ @@ -356,7 +358,6 @@ mpz_unused = \ @GMP_TREE@/mpz/fac_ui.c \ @GMP_TREE@/mpz/fdiv_qr_ui.c \ @GMP_TREE@/mpz/fdiv_r.c \ - @GMP_TREE@/mpz/fdiv_r_ui.c \ @GMP_TREE@/mpz/fdiv_ui.c \ @GMP_TREE@/mpz/fib2_ui.c \ @GMP_TREE@/mpz/fib_ui.c \ @@ -402,7 +403,6 @@ mpz_unused = \ @GMP_TREE@/mpz/perfpow.c \ @GMP_TREE@/mpz/perfsqr.c \ @GMP_TREE@/mpz/popcount.c \ - @GMP_TREE@/mpz/pow_ui.c \ @GMP_TREE@/mpz/powm_sec.c \ @GMP_TREE@/mpz/pprime_p.c \ @GMP_TREE@/mpz/primorial_ui.c \ diff --git a/Build/source/libs/gmp/Makefile.in b/Build/source/libs/gmp/Makefile.in index aa1b50a2c7e..4695e448f31 100644 --- a/Build/source/libs/gmp/Makefile.in +++ b/Build/source/libs/gmp/Makefile.in @@ -172,6 +172,7 @@ am__objects_2 = mp_bases.$(OBJEXT) popcount.$(OBJEXT) \ @GMP_TREE@/mpn/generic/lshiftc.$(OBJEXT) \ @GMP_TREE@/mpn/generic/matrix22_mul.$(OBJEXT) \ @GMP_TREE@/mpn/generic/matrix22_mul1_inverse_vector.$(OBJEXT) \ + @GMP_TREE@/mpn/generic/mod_1.$(OBJEXT) \ @GMP_TREE@/mpn/generic/mu_bdiv_q.$(OBJEXT) \ @GMP_TREE@/mpn/generic/mu_div_q.$(OBJEXT) \ @GMP_TREE@/mpn/generic/mu_div_qr.$(OBJEXT) \ @@ -244,6 +245,8 @@ am__objects_3 = @GMP_TREE@/mpz/abs.$(OBJEXT) \ @GMP_TREE@/mpz/add.$(OBJEXT) @GMP_TREE@/mpz/add_ui.$(OBJEXT) \ @GMP_TREE@/mpz/aorsmul.$(OBJEXT) \ @GMP_TREE@/mpz/aorsmul_i.$(OBJEXT) \ + @GMP_TREE@/mpz/cdiv_qr_ui.$(OBJEXT) \ + @GMP_TREE@/mpz/cdiv_q_ui.$(OBJEXT) \ @GMP_TREE@/mpz/cfdiv_q_2exp.$(OBJEXT) \ @GMP_TREE@/mpz/clear.$(OBJEXT) @GMP_TREE@/mpz/cmp.$(OBJEXT) \ @GMP_TREE@/mpz/cmp_ui.$(OBJEXT) \ @@ -251,6 +254,7 @@ am__objects_3 = @GMP_TREE@/mpz/abs.$(OBJEXT) \ @GMP_TREE@/mpz/divexact.$(OBJEXT) \ @GMP_TREE@/mpz/fdiv_q.$(OBJEXT) \ @GMP_TREE@/mpz/fdiv_q_ui.$(OBJEXT) \ + @GMP_TREE@/mpz/fdiv_r_ui.$(OBJEXT) \ @GMP_TREE@/mpz/fdiv_qr.$(OBJEXT) \ @GMP_TREE@/mpz/fits_slong.$(OBJEXT) \ @GMP_TREE@/mpz/gcdext.$(OBJEXT) \ @@ -263,7 +267,8 @@ am__objects_3 = @GMP_TREE@/mpz/abs.$(OBJEXT) \ @GMP_TREE@/mpz/mul_si.$(OBJEXT) \ @GMP_TREE@/mpz/mul_ui.$(OBJEXT) \ @GMP_TREE@/mpz/n_pow_ui.$(OBJEXT) @GMP_TREE@/mpz/neg.$(OBJEXT) \ - @GMP_TREE@/mpz/powm.$(OBJEXT) @GMP_TREE@/mpz/powm_ui.$(OBJEXT) \ + @GMP_TREE@/mpz/pow_ui.$(OBJEXT) @GMP_TREE@/mpz/powm.$(OBJEXT) \ + @GMP_TREE@/mpz/powm_ui.$(OBJEXT) \ @GMP_TREE@/mpz/realloc.$(OBJEXT) \ @GMP_TREE@/mpz/realloc2.$(OBJEXT) \ @GMP_TREE@/mpz/scan0.$(OBJEXT) @GMP_TREE@/mpz/scan1.$(OBJEXT) \ @@ -359,6 +364,7 @@ am__depfiles_remade = ./$(DEPDIR)/gmptest-gmptest.Po \ @GMP_TREE@/mpn/generic/$(DEPDIR)/lshiftc.Po \ @GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul.Po \ @GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul1_inverse_vector.Po \ + @GMP_TREE@/mpn/generic/$(DEPDIR)/mod_1.Po \ @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_bdiv_q.Po \ @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_q.Po \ @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_qr.Po \ @@ -432,6 +438,8 @@ am__depfiles_remade = ./$(DEPDIR)/gmptest-gmptest.Po \ @GMP_TREE@/mpz/$(DEPDIR)/add_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/aorsmul.Po \ @GMP_TREE@/mpz/$(DEPDIR)/aorsmul_i.Po \ + @GMP_TREE@/mpz/$(DEPDIR)/cdiv_q_ui.Po \ + @GMP_TREE@/mpz/$(DEPDIR)/cdiv_qr_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/cfdiv_q_2exp.Po \ @GMP_TREE@/mpz/$(DEPDIR)/clear.Po \ @GMP_TREE@/mpz/$(DEPDIR)/cmp.Po \ @@ -441,6 +449,7 @@ am__depfiles_remade = ./$(DEPDIR)/gmptest-gmptest.Po \ @GMP_TREE@/mpz/$(DEPDIR)/fdiv_q.Po \ @GMP_TREE@/mpz/$(DEPDIR)/fdiv_q_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/fdiv_qr.Po \ + @GMP_TREE@/mpz/$(DEPDIR)/fdiv_r_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/fits_slong.Po \ @GMP_TREE@/mpz/$(DEPDIR)/gcdext.Po \ @GMP_TREE@/mpz/$(DEPDIR)/get_si.Po \ @@ -457,6 +466,7 @@ am__depfiles_remade = ./$(DEPDIR)/gmptest-gmptest.Po \ @GMP_TREE@/mpz/$(DEPDIR)/mul_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/n_pow_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/neg.Po \ + @GMP_TREE@/mpz/$(DEPDIR)/pow_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/powm.Po \ @GMP_TREE@/mpz/$(DEPDIR)/powm_ui.Po \ @GMP_TREE@/mpz/$(DEPDIR)/realloc.Po \ @@ -997,6 +1007,7 @@ mpn_sources = \ @GMP_TREE@/mpn/generic/lshiftc.c \ @GMP_TREE@/mpn/generic/matrix22_mul.c \ @GMP_TREE@/mpn/generic/matrix22_mul1_inverse_vector.c \ + @GMP_TREE@/mpn/generic/mod_1.c \ @GMP_TREE@/mpn/generic/mu_bdiv_q.c \ @GMP_TREE@/mpn/generic/mu_div_q.c \ @GMP_TREE@/mpn/generic/mu_div_qr.c \ @@ -1105,7 +1116,6 @@ mpn_unused = \ @GMP_TREE@/mpn/generic/jacbase.c \ @GMP_TREE@/mpn/generic/jacobi.c \ @GMP_TREE@/mpn/generic/jacobi_2.c \ - @GMP_TREE@/mpn/generic/mod_1.c \ @GMP_TREE@/mpn/generic/mod_1_1.c \ @GMP_TREE@/mpn/generic/mod_1_2.c \ @GMP_TREE@/mpn/generic/mod_1_3.c \ @@ -1149,6 +1159,8 @@ mpz_sources = \ @GMP_TREE@/mpz/add_ui.c \ @GMP_TREE@/mpz/aorsmul.c \ @GMP_TREE@/mpz/aorsmul_i.c \ + @GMP_TREE@/mpz/cdiv_qr_ui.c \ + @GMP_TREE@/mpz/cdiv_q_ui.c \ @GMP_TREE@/mpz/cfdiv_q_2exp.c \ @GMP_TREE@/mpz/clear.c \ @GMP_TREE@/mpz/cmp.c \ @@ -1157,6 +1169,7 @@ mpz_sources = \ @GMP_TREE@/mpz/divexact.c \ @GMP_TREE@/mpz/fdiv_q.c \ @GMP_TREE@/mpz/fdiv_q_ui.c \ + @GMP_TREE@/mpz/fdiv_r_ui.c \ @GMP_TREE@/mpz/fdiv_qr.c \ @GMP_TREE@/mpz/fits_slong.c \ @GMP_TREE@/mpz/gcdext.c \ @@ -1174,6 +1187,7 @@ mpz_sources = \ @GMP_TREE@/mpz/mul_ui.c \ @GMP_TREE@/mpz/n_pow_ui.c \ @GMP_TREE@/mpz/neg.c \ + @GMP_TREE@/mpz/pow_ui.c \ @GMP_TREE@/mpz/powm.c \ @GMP_TREE@/mpz/powm_ui.c \ @GMP_TREE@/mpz/realloc.c \ @@ -1204,9 +1218,7 @@ mpz_unused = \ @GMP_TREE@/mpz/bin_ui.c \ @GMP_TREE@/mpz/bin_uiui.c \ @GMP_TREE@/mpz/cdiv_q.c \ - @GMP_TREE@/mpz/cdiv_q_ui.c \ @GMP_TREE@/mpz/cdiv_qr.c \ - @GMP_TREE@/mpz/cdiv_qr_ui.c \ @GMP_TREE@/mpz/cdiv_r.c \ @GMP_TREE@/mpz/cdiv_r_ui.c \ @GMP_TREE@/mpz/cdiv_ui.c \ @@ -1232,7 +1244,6 @@ mpz_unused = \ @GMP_TREE@/mpz/fac_ui.c \ @GMP_TREE@/mpz/fdiv_qr_ui.c \ @GMP_TREE@/mpz/fdiv_r.c \ - @GMP_TREE@/mpz/fdiv_r_ui.c \ @GMP_TREE@/mpz/fdiv_ui.c \ @GMP_TREE@/mpz/fib2_ui.c \ @GMP_TREE@/mpz/fib_ui.c \ @@ -1278,7 +1289,6 @@ mpz_unused = \ @GMP_TREE@/mpz/perfpow.c \ @GMP_TREE@/mpz/perfsqr.c \ @GMP_TREE@/mpz/popcount.c \ - @GMP_TREE@/mpz/pow_ui.c \ @GMP_TREE@/mpz/powm_sec.c \ @GMP_TREE@/mpz/pprime_p.c \ @GMP_TREE@/mpz/primorial_ui.c \ @@ -1549,6 +1559,9 @@ clean-noinstLIBRARIES: @GMP_TREE@/mpn/generic/matrix22_mul1_inverse_vector.$(OBJEXT): \ @GMP_TREE@/mpn/generic/$(am__dirstamp) \ @GMP_TREE@/mpn/generic/$(DEPDIR)/$(am__dirstamp) +@GMP_TREE@/mpn/generic/mod_1.$(OBJEXT): \ + @GMP_TREE@/mpn/generic/$(am__dirstamp) \ + @GMP_TREE@/mpn/generic/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpn/generic/mu_bdiv_q.$(OBJEXT): \ @GMP_TREE@/mpn/generic/$(am__dirstamp) \ @GMP_TREE@/mpn/generic/$(DEPDIR)/$(am__dirstamp) @@ -1769,6 +1782,10 @@ clean-noinstLIBRARIES: @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/aorsmul_i.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) +@GMP_TREE@/mpz/cdiv_qr_ui.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ + @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) +@GMP_TREE@/mpz/cdiv_q_ui.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ + @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/cfdiv_q_2exp.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/clear.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @@ -1785,6 +1802,8 @@ clean-noinstLIBRARIES: @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/fdiv_q_ui.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) +@GMP_TREE@/mpz/fdiv_r_ui.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ + @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/fdiv_qr.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/fits_slong.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @@ -1819,6 +1838,8 @@ clean-noinstLIBRARIES: @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/neg.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) +@GMP_TREE@/mpz/pow_ui.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ + @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/powm.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @GMP_TREE@/mpz/$(DEPDIR)/$(am__dirstamp) @GMP_TREE@/mpz/powm_ui.$(OBJEXT): @GMP_TREE@/mpz/$(am__dirstamp) \ @@ -1942,6 +1963,7 @@ distclean-compile: @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/lshiftc.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul1_inverse_vector.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/mod_1.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/mu_bdiv_q.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_q.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_qr.Po@am__quote@ # am--include-marker @@ -2015,6 +2037,8 @@ distclean-compile: @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/add_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/aorsmul.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/aorsmul_i.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/cdiv_q_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/cdiv_qr_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/cfdiv_q_2exp.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/clear.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/cmp.Po@am__quote@ # am--include-marker @@ -2024,6 +2048,7 @@ distclean-compile: @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/fdiv_q.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/fdiv_q_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/fdiv_qr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/fdiv_r_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/fits_slong.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/gcdext.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/get_si.Po@am__quote@ # am--include-marker @@ -2040,6 +2065,7 @@ distclean-compile: @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/mul_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/n_pow_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/neg.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/pow_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/powm.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/powm_ui.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@GMP_TREE@/mpz/$(DEPDIR)/realloc.Po@am__quote@ # am--include-marker @@ -2676,6 +2702,7 @@ distclean: distclean-recursive -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/lshiftc.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul1_inverse_vector.Po + -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mod_1.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_bdiv_q.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_q.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_qr.Po @@ -2749,6 +2776,8 @@ distclean: distclean-recursive -rm -f @GMP_TREE@/mpz/$(DEPDIR)/add_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/aorsmul.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/aorsmul_i.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cdiv_q_ui.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cdiv_qr_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cfdiv_q_2exp.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/clear.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cmp.Po @@ -2758,6 +2787,7 @@ distclean: distclean-recursive -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_q.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_q_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_qr.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_r_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fits_slong.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/gcdext.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/get_si.Po @@ -2774,6 +2804,7 @@ distclean: distclean-recursive -rm -f @GMP_TREE@/mpz/$(DEPDIR)/mul_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/n_pow_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/neg.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/pow_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/powm.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/powm_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/realloc.Po @@ -2903,6 +2934,7 @@ maintainer-clean: maintainer-clean-recursive -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/lshiftc.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/matrix22_mul1_inverse_vector.Po + -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mod_1.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_bdiv_q.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_q.Po -rm -f @GMP_TREE@/mpn/generic/$(DEPDIR)/mu_div_qr.Po @@ -2976,6 +3008,8 @@ maintainer-clean: maintainer-clean-recursive -rm -f @GMP_TREE@/mpz/$(DEPDIR)/add_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/aorsmul.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/aorsmul_i.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cdiv_q_ui.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cdiv_qr_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cfdiv_q_2exp.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/clear.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/cmp.Po @@ -2985,6 +3019,7 @@ maintainer-clean: maintainer-clean-recursive -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_q.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_q_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_qr.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fdiv_r_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/fits_slong.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/gcdext.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/get_si.Po @@ -3001,6 +3036,7 @@ maintainer-clean: maintainer-clean-recursive -rm -f @GMP_TREE@/mpz/$(DEPDIR)/mul_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/n_pow_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/neg.Po + -rm -f @GMP_TREE@/mpz/$(DEPDIR)/pow_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/powm.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/powm_ui.Po -rm -f @GMP_TREE@/mpz/$(DEPDIR)/realloc.Po diff --git a/Build/source/libs/mpfi/ChangeLog b/Build/source/libs/mpfi/ChangeLog new file mode 100644 index 00000000000..9e613ce66db --- /dev/null +++ b/Build/source/libs/mpfi/ChangeLog @@ -0,0 +1,3 @@ +2024-02-01 Luigi Scarso + + * import mpfi-1.5.4, first integration into TL/mpost. diff --git a/Build/source/libs/mpfi/Makefile.am b/Build/source/libs/mpfi/Makefile.am new file mode 100644 index 00000000000..87504ff2ee0 --- /dev/null +++ b/Build/source/libs/mpfi/Makefile.am @@ -0,0 +1,219 @@ +## $Id$ +## Proxy Makefile.am to build MPFI for TeX Live. +## +## Copyright 2022-2024 Luigi Scarso +## +## This file is free software; the copyright holder +## gives unlimited permission to copy and/or distribute it, +## with or without modifications, as long as this notice is preserved. +## +## We want to re-distribute the whole MPFI source tree. +## +EXTRA_DIST = $(MPFI_TREE) + +## Changes applied to the original source tree +## +EXTRA_DIST += TLpatches + +# Files not to be distributed +include $(srcdir)/../../am/dist_hook.am +NEVER_NAMES += $(NEVER_NAMES_SUB) + +SUBDIRS = . include + +AM_CPPFLAGS = -I$(srcdir)/$(MPFI_TREE)/src $(MPFR_INCLUDES) $(GMP_INCLUDES) +AM_CFLAGS = $(VISIBILITY_CFLAGS) # $(WARNING_CFLAGS) + +noinst_LIBRARIES = libmpfi.a +$(libmpfi_a_OBJECTS): $(GMP_DEPEND) +nodist_libmpfi_a_SOURCES = \ + @MPFI_TREE@/src/abs.c \ + @MPFI_TREE@/src/acos.c \ + @MPFI_TREE@/src/acosh.c \ + @MPFI_TREE@/src/add.c \ + @MPFI_TREE@/src/add_d.c \ + @MPFI_TREE@/src/add_fr.c \ + @MPFI_TREE@/src/add_q.c \ + @MPFI_TREE@/src/add_si.c \ + @MPFI_TREE@/src/add_ui.c \ + @MPFI_TREE@/src/add_z.c \ + @MPFI_TREE@/src/alea.c \ + @MPFI_TREE@/src/asin.c \ + @MPFI_TREE@/src/asinh.c \ + @MPFI_TREE@/src/atan.c \ + @MPFI_TREE@/src/atan2.c \ + @MPFI_TREE@/src/atanh.c \ + @MPFI_TREE@/src/bisect.c \ + @MPFI_TREE@/src/blow.c \ + @MPFI_TREE@/src/cbrt.c \ + @MPFI_TREE@/src/clear.c \ + @MPFI_TREE@/src/clears.c \ + @MPFI_TREE@/src/cmp.c \ + @MPFI_TREE@/src/cmp_sym_pi.c \ + @MPFI_TREE@/src/constants.c \ + @MPFI_TREE@/src/cos.c \ + @MPFI_TREE@/src/cosh.c \ + @MPFI_TREE@/src/cot.c \ + @MPFI_TREE@/src/coth.c \ + @MPFI_TREE@/src/csc.c \ + @MPFI_TREE@/src/csch.c \ + @MPFI_TREE@/src/d_div.c \ + @MPFI_TREE@/src/d_sub.c \ + @MPFI_TREE@/src/diam.c \ + @MPFI_TREE@/src/div.c \ + @MPFI_TREE@/src/div_2exp.c \ + @MPFI_TREE@/src/div_2si.c \ + @MPFI_TREE@/src/div_2ui.c \ + @MPFI_TREE@/src/div_d.c \ + @MPFI_TREE@/src/div_ext.c \ + @MPFI_TREE@/src/div_fr.c \ + @MPFI_TREE@/src/div_q.c \ + @MPFI_TREE@/src/div_si.c \ + @MPFI_TREE@/src/div_ui.c \ + @MPFI_TREE@/src/div_z.c \ + @MPFI_TREE@/src/erandom.c \ + @MPFI_TREE@/src/error.c \ + @MPFI_TREE@/src/exp.c \ + @MPFI_TREE@/src/exp10.c \ + @MPFI_TREE@/src/exp10m1.c \ + @MPFI_TREE@/src/exp2.c \ + @MPFI_TREE@/src/exp2m1.c \ + @MPFI_TREE@/src/expm1.c \ + @MPFI_TREE@/src/fr_div.c \ + @MPFI_TREE@/src/fr_sub.c \ + @MPFI_TREE@/src/get_d.c \ + @MPFI_TREE@/src/get_endpoints.c \ + @MPFI_TREE@/src/get_fr.c \ + @MPFI_TREE@/src/get_prec.c \ + @MPFI_TREE@/src/get_version.c \ + @MPFI_TREE@/src/has_zero.c \ + @MPFI_TREE@/src/hypot.c \ + @MPFI_TREE@/src/increase.c \ + @MPFI_TREE@/src/init.c \ + @MPFI_TREE@/src/init2.c \ + @MPFI_TREE@/src/inits.c \ + @MPFI_TREE@/src/inits2.c \ + @MPFI_TREE@/src/inp_str.c \ + @MPFI_TREE@/src/intersect.c \ + @MPFI_TREE@/src/interv_d.c \ + @MPFI_TREE@/src/interv_fr.c \ + @MPFI_TREE@/src/interv_q.c \ + @MPFI_TREE@/src/interv_si.c \ + @MPFI_TREE@/src/interv_ui.c \ + @MPFI_TREE@/src/interv_z.c \ + @MPFI_TREE@/src/inv.c \ + @MPFI_TREE@/src/is_empty.c \ + @MPFI_TREE@/src/is_inside.c \ + @MPFI_TREE@/src/log.c \ + @MPFI_TREE@/src/log10.c \ + @MPFI_TREE@/src/log10p1.c \ + @MPFI_TREE@/src/log1p.c \ + @MPFI_TREE@/src/log2.c \ + @MPFI_TREE@/src/log2p1.c \ + @MPFI_TREE@/src/mag.c \ + @MPFI_TREE@/src/mid.c \ + @MPFI_TREE@/src/mig.c \ + @MPFI_TREE@/src/mpfi-impl.h \ + @MPFI_TREE@/src/mpfi.h \ + @MPFI_TREE@/src/mpfi_io.h \ + @MPFI_TREE@/src/mul.c \ + @MPFI_TREE@/src/mul_2exp.c \ + @MPFI_TREE@/src/mul_2si.c \ + @MPFI_TREE@/src/mul_2ui.c \ + @MPFI_TREE@/src/mul_d.c \ + @MPFI_TREE@/src/mul_fr.c \ + @MPFI_TREE@/src/mul_q.c \ + @MPFI_TREE@/src/mul_si.c \ + @MPFI_TREE@/src/mul_ui.c \ + @MPFI_TREE@/src/mul_z.c \ + @MPFI_TREE@/src/neg.c \ + @MPFI_TREE@/src/nrandom.c \ + @MPFI_TREE@/src/out_str.c \ + @MPFI_TREE@/src/predicates.c \ + @MPFI_TREE@/src/print_binary.c \ + @MPFI_TREE@/src/put.c \ + @MPFI_TREE@/src/put_d.c \ + @MPFI_TREE@/src/put_fr.c \ + @MPFI_TREE@/src/put_q.c \ + @MPFI_TREE@/src/put_si.c \ + @MPFI_TREE@/src/put_ui.c \ + @MPFI_TREE@/src/put_z.c \ + @MPFI_TREE@/src/q_div.c \ + @MPFI_TREE@/src/q_sub.c \ + @MPFI_TREE@/src/quadrant.c \ + @MPFI_TREE@/src/rec_sqrt.c \ + @MPFI_TREE@/src/revert_if_needed.c \ + @MPFI_TREE@/src/round_prec.c \ + @MPFI_TREE@/src/sec.c \ + @MPFI_TREE@/src/sech.c \ + @MPFI_TREE@/src/set.c \ + @MPFI_TREE@/src/set_d.c \ + @MPFI_TREE@/src/set_flt.c \ + @MPFI_TREE@/src/set_fr.c \ + @MPFI_TREE@/src/set_ld.c \ + @MPFI_TREE@/src/set_prec.c \ + @MPFI_TREE@/src/set_q.c \ + @MPFI_TREE@/src/set_si.c \ + @MPFI_TREE@/src/set_str.c \ + @MPFI_TREE@/src/set_ui.c \ + @MPFI_TREE@/src/set_z.c \ + @MPFI_TREE@/src/si_div.c \ + @MPFI_TREE@/src/si_sub.c \ + @MPFI_TREE@/src/sign.c \ + @MPFI_TREE@/src/sin.c \ + @MPFI_TREE@/src/sinh.c \ + @MPFI_TREE@/src/sqr.c \ + @MPFI_TREE@/src/sqrt.c \ + @MPFI_TREE@/src/sub.c \ + @MPFI_TREE@/src/sub_d.c \ + @MPFI_TREE@/src/sub_fr.c \ + @MPFI_TREE@/src/sub_q.c \ + @MPFI_TREE@/src/sub_si.c \ + @MPFI_TREE@/src/sub_ui.c \ + @MPFI_TREE@/src/sub_z.c \ + @MPFI_TREE@/src/swap.c \ + @MPFI_TREE@/src/tan.c \ + @MPFI_TREE@/src/tanh.c \ + @MPFI_TREE@/src/ui_div.c \ + @MPFI_TREE@/src/ui_sub.c \ + @MPFI_TREE@/src/union.c \ + @MPFI_TREE@/src/urandom.c \ + @MPFI_TREE@/src/z_div.c \ + @MPFI_TREE@/src/z_sub.c + +##unused_sources = \ + +if build +check_PROGRAMS = mpfitest +dist_check_SCRIPTS = mpfi.test +TESTS = mpfi.test +endif build +mpfi.log: mpfitest$(EXEEXT) + +mpfitest_SOURCES = mpfitest.c + +mpfitest_CPPFLAGS = -Iinclude $(MPFR_INCLUDES) $(GMP_INCLUDES) + +LDADD = libmpfi.a $(MPFR_LIBS) $(GMP_LIBS) + +## Rebuild libgmp +@GMP_RULE@ + +## Rebuild libmpfr +@MPFR_RULE@ + + + +# Reconfig +reconfig_prereq = $(MPFR_DEPEND) $(GMP_DEPEND) +DISTCLEANFILES = + +include $(srcdir)/../../am/reconfig.am + +# Rebuild +rebuild_prereq = +rebuild_target = all +CLEANFILES = + +include $(srcdir)/../../am/rebuild.am + diff --git a/Build/source/libs/mpfi/Makefile.in b/Build/source/libs/mpfi/Makefile.in new file mode 100644 index 00000000000..2e3774a50f5 --- /dev/null +++ b/Build/source/libs/mpfi/Makefile.in @@ -0,0 +1,2548 @@ +# Makefile.in generated by automake 1.16.5 from Makefile.am. +# @configure_input@ + +# Copyright (C) 1994-2021 Free Software Foundation, Inc. + +# This Makefile.in is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +@SET_MAKE@ + +VPATH = @srcdir@ +am__is_gnu_make = { \ + if test -z '$(MAKELEVEL)'; then \ + false; \ + elif test -n '$(MAKE_HOST)'; then \ + true; \ + elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \ + true; \ + else \ + false; \ + fi; \ +} +am__make_running_with_option = \ + case $${target_option-} in \ + ?) ;; \ + *) echo "am__make_running_with_option: internal error: invalid" \ + "target option '$${target_option-}' specified" >&2; \ + exit 1;; \ + esac; \ + has_opt=no; \ + sane_makeflags=$$MAKEFLAGS; \ + if $(am__is_gnu_make); then \ + sane_makeflags=$$MFLAGS; \ + else \ + case $$MAKEFLAGS in \ + *\\[\ \ ]*) \ + bs=\\; \ + sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \ + | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \ + esac; \ + fi; \ + skip_next=no; \ + strip_trailopt () \ + { \ + flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \ + }; \ + for flg in $$sane_makeflags; do \ + test $$skip_next = yes && { skip_next=no; continue; }; \ + case $$flg in \ + *=*|--*) continue;; \ + -*I) strip_trailopt 'I'; skip_next=yes;; \ + -*I?*) strip_trailopt 'I';; \ + -*O) strip_trailopt 'O'; skip_next=yes;; \ + -*O?*) strip_trailopt 'O';; \ + -*l) strip_trailopt 'l'; skip_next=yes;; \ + -*l?*) strip_trailopt 'l';; \ + -[dEDm]) skip_next=yes;; \ + -[JT]) skip_next=yes;; \ + esac; \ + case $$flg in \ + *$$target_option*) has_opt=yes; break;; \ + esac; \ + done; \ + test $$has_opt = yes +am__make_dryrun = (target_option=n; $(am__make_running_with_option)) +am__make_keepgoing = (target_option=k; $(am__make_running_with_option)) +pkgdatadir = $(datadir)/@PACKAGE@ +pkgincludedir = $(includedir)/@PACKAGE@ +pkglibdir = $(libdir)/@PACKAGE@ +pkglibexecdir = $(libexecdir)/@PACKAGE@ +am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd +install_sh_DATA = $(install_sh) -c -m 644 +install_sh_PROGRAM = $(install_sh) -c +install_sh_SCRIPT = $(install_sh) -c +INSTALL_HEADER = $(INSTALL_DATA) +transform = $(program_transform_name) +NORMAL_INSTALL = : +PRE_INSTALL = : +POST_INSTALL = : +NORMAL_UNINSTALL = : +PRE_UNINSTALL = : +POST_UNINSTALL = : +build_triplet = @build@ +host_triplet = @host@ +@build_TRUE@check_PROGRAMS = mpfitest$(EXEEXT) +subdir = . +ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 +am__aclocal_m4_deps = $(top_srcdir)/../../m4/kpse-common.m4 \ + $(top_srcdir)/../../m4/kpse-gmp-flags.m4 \ + $(top_srcdir)/../../m4/kpse-mpfr-flags.m4 \ + $(top_srcdir)/../../m4/kpse-visibility.m4 \ + $(top_srcdir)/../../m4/kpse-warnings.m4 \ + $(top_srcdir)/version.ac $(top_srcdir)/configure.ac +am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ + $(ACLOCAL_M4) +DIST_COMMON = $(srcdir)/Makefile.am $(top_srcdir)/configure \ + $(am__configure_deps) $(am__dist_check_SCRIPTS_DIST) \ + $(am__DIST_COMMON) +am__CONFIG_DISTCLEAN_FILES = config.status config.cache config.log \ + configure.lineno config.status.lineno +mkinstalldirs = $(install_sh) -d +CONFIG_HEADER = mpfi_config.h +CONFIG_CLEAN_FILES = +CONFIG_CLEAN_VPATH_FILES = +LIBRARIES = $(noinst_LIBRARIES) +AR = ar +ARFLAGS = cru +AM_V_AR = $(am__v_AR_@AM_V@) +am__v_AR_ = $(am__v_AR_@AM_DEFAULT_V@) +am__v_AR_0 = @echo " AR " $@; +am__v_AR_1 = +libmpfi_a_AR = $(AR) $(ARFLAGS) +libmpfi_a_LIBADD = +am__dirstamp = $(am__leading_dot)dirstamp +nodist_libmpfi_a_OBJECTS = @MPFI_TREE@/src/abs.$(OBJEXT) \ + @MPFI_TREE@/src/acos.$(OBJEXT) @MPFI_TREE@/src/acosh.$(OBJEXT) \ + @MPFI_TREE@/src/add.$(OBJEXT) @MPFI_TREE@/src/add_d.$(OBJEXT) \ + @MPFI_TREE@/src/add_fr.$(OBJEXT) \ + @MPFI_TREE@/src/add_q.$(OBJEXT) \ + @MPFI_TREE@/src/add_si.$(OBJEXT) \ + @MPFI_TREE@/src/add_ui.$(OBJEXT) \ + @MPFI_TREE@/src/add_z.$(OBJEXT) @MPFI_TREE@/src/alea.$(OBJEXT) \ + @MPFI_TREE@/src/asin.$(OBJEXT) @MPFI_TREE@/src/asinh.$(OBJEXT) \ + @MPFI_TREE@/src/atan.$(OBJEXT) @MPFI_TREE@/src/atan2.$(OBJEXT) \ + @MPFI_TREE@/src/atanh.$(OBJEXT) \ + @MPFI_TREE@/src/bisect.$(OBJEXT) \ + @MPFI_TREE@/src/blow.$(OBJEXT) @MPFI_TREE@/src/cbrt.$(OBJEXT) \ + @MPFI_TREE@/src/clear.$(OBJEXT) \ + @MPFI_TREE@/src/clears.$(OBJEXT) @MPFI_TREE@/src/cmp.$(OBJEXT) \ + @MPFI_TREE@/src/cmp_sym_pi.$(OBJEXT) \ + @MPFI_TREE@/src/constants.$(OBJEXT) \ + @MPFI_TREE@/src/cos.$(OBJEXT) @MPFI_TREE@/src/cosh.$(OBJEXT) \ + @MPFI_TREE@/src/cot.$(OBJEXT) @MPFI_TREE@/src/coth.$(OBJEXT) \ + @MPFI_TREE@/src/csc.$(OBJEXT) @MPFI_TREE@/src/csch.$(OBJEXT) \ + @MPFI_TREE@/src/d_div.$(OBJEXT) \ + @MPFI_TREE@/src/d_sub.$(OBJEXT) @MPFI_TREE@/src/diam.$(OBJEXT) \ + @MPFI_TREE@/src/div.$(OBJEXT) \ + @MPFI_TREE@/src/div_2exp.$(OBJEXT) \ + @MPFI_TREE@/src/div_2si.$(OBJEXT) \ + @MPFI_TREE@/src/div_2ui.$(OBJEXT) \ + @MPFI_TREE@/src/div_d.$(OBJEXT) \ + @MPFI_TREE@/src/div_ext.$(OBJEXT) \ + @MPFI_TREE@/src/div_fr.$(OBJEXT) \ + @MPFI_TREE@/src/div_q.$(OBJEXT) \ + @MPFI_TREE@/src/div_si.$(OBJEXT) \ + @MPFI_TREE@/src/div_ui.$(OBJEXT) \ + @MPFI_TREE@/src/div_z.$(OBJEXT) \ + @MPFI_TREE@/src/erandom.$(OBJEXT) \ + @MPFI_TREE@/src/error.$(OBJEXT) @MPFI_TREE@/src/exp.$(OBJEXT) \ + @MPFI_TREE@/src/exp10.$(OBJEXT) \ + @MPFI_TREE@/src/exp10m1.$(OBJEXT) \ + @MPFI_TREE@/src/exp2.$(OBJEXT) \ + @MPFI_TREE@/src/exp2m1.$(OBJEXT) \ + @MPFI_TREE@/src/expm1.$(OBJEXT) \ + @MPFI_TREE@/src/fr_div.$(OBJEXT) \ + @MPFI_TREE@/src/fr_sub.$(OBJEXT) \ + @MPFI_TREE@/src/get_d.$(OBJEXT) \ + @MPFI_TREE@/src/get_endpoints.$(OBJEXT) \ + @MPFI_TREE@/src/get_fr.$(OBJEXT) \ + @MPFI_TREE@/src/get_prec.$(OBJEXT) \ + @MPFI_TREE@/src/get_version.$(OBJEXT) \ + @MPFI_TREE@/src/has_zero.$(OBJEXT) \ + @MPFI_TREE@/src/hypot.$(OBJEXT) \ + @MPFI_TREE@/src/increase.$(OBJEXT) \ + @MPFI_TREE@/src/init.$(OBJEXT) @MPFI_TREE@/src/init2.$(OBJEXT) \ + @MPFI_TREE@/src/inits.$(OBJEXT) \ + @MPFI_TREE@/src/inits2.$(OBJEXT) \ + @MPFI_TREE@/src/inp_str.$(OBJEXT) \ + @MPFI_TREE@/src/intersect.$(OBJEXT) \ + @MPFI_TREE@/src/interv_d.$(OBJEXT) \ + @MPFI_TREE@/src/interv_fr.$(OBJEXT) \ + @MPFI_TREE@/src/interv_q.$(OBJEXT) \ + @MPFI_TREE@/src/interv_si.$(OBJEXT) \ + @MPFI_TREE@/src/interv_ui.$(OBJEXT) \ + @MPFI_TREE@/src/interv_z.$(OBJEXT) \ + @MPFI_TREE@/src/inv.$(OBJEXT) \ + @MPFI_TREE@/src/is_empty.$(OBJEXT) \ + @MPFI_TREE@/src/is_inside.$(OBJEXT) \ + @MPFI_TREE@/src/log.$(OBJEXT) @MPFI_TREE@/src/log10.$(OBJEXT) \ + @MPFI_TREE@/src/log10p1.$(OBJEXT) \ + @MPFI_TREE@/src/log1p.$(OBJEXT) @MPFI_TREE@/src/log2.$(OBJEXT) \ + @MPFI_TREE@/src/log2p1.$(OBJEXT) @MPFI_TREE@/src/mag.$(OBJEXT) \ + @MPFI_TREE@/src/mid.$(OBJEXT) @MPFI_TREE@/src/mig.$(OBJEXT) \ + @MPFI_TREE@/src/mul.$(OBJEXT) \ + @MPFI_TREE@/src/mul_2exp.$(OBJEXT) \ + @MPFI_TREE@/src/mul_2si.$(OBJEXT) \ + @MPFI_TREE@/src/mul_2ui.$(OBJEXT) \ + @MPFI_TREE@/src/mul_d.$(OBJEXT) \ + @MPFI_TREE@/src/mul_fr.$(OBJEXT) \ + @MPFI_TREE@/src/mul_q.$(OBJEXT) \ + @MPFI_TREE@/src/mul_si.$(OBJEXT) \ + @MPFI_TREE@/src/mul_ui.$(OBJEXT) \ + @MPFI_TREE@/src/mul_z.$(OBJEXT) @MPFI_TREE@/src/neg.$(OBJEXT) \ + @MPFI_TREE@/src/nrandom.$(OBJEXT) \ + @MPFI_TREE@/src/out_str.$(OBJEXT) \ + @MPFI_TREE@/src/predicates.$(OBJEXT) \ + @MPFI_TREE@/src/print_binary.$(OBJEXT) \ + @MPFI_TREE@/src/put.$(OBJEXT) @MPFI_TREE@/src/put_d.$(OBJEXT) \ + @MPFI_TREE@/src/put_fr.$(OBJEXT) \ + @MPFI_TREE@/src/put_q.$(OBJEXT) \ + @MPFI_TREE@/src/put_si.$(OBJEXT) \ + @MPFI_TREE@/src/put_ui.$(OBJEXT) \ + @MPFI_TREE@/src/put_z.$(OBJEXT) \ + @MPFI_TREE@/src/q_div.$(OBJEXT) \ + @MPFI_TREE@/src/q_sub.$(OBJEXT) \ + @MPFI_TREE@/src/quadrant.$(OBJEXT) \ + @MPFI_TREE@/src/rec_sqrt.$(OBJEXT) \ + @MPFI_TREE@/src/revert_if_needed.$(OBJEXT) \ + @MPFI_TREE@/src/round_prec.$(OBJEXT) \ + @MPFI_TREE@/src/sec.$(OBJEXT) @MPFI_TREE@/src/sech.$(OBJEXT) \ + @MPFI_TREE@/src/set.$(OBJEXT) @MPFI_TREE@/src/set_d.$(OBJEXT) \ + @MPFI_TREE@/src/set_flt.$(OBJEXT) \ + @MPFI_TREE@/src/set_fr.$(OBJEXT) \ + @MPFI_TREE@/src/set_ld.$(OBJEXT) \ + @MPFI_TREE@/src/set_prec.$(OBJEXT) \ + @MPFI_TREE@/src/set_q.$(OBJEXT) \ + @MPFI_TREE@/src/set_si.$(OBJEXT) \ + @MPFI_TREE@/src/set_str.$(OBJEXT) \ + @MPFI_TREE@/src/set_ui.$(OBJEXT) \ + @MPFI_TREE@/src/set_z.$(OBJEXT) \ + @MPFI_TREE@/src/si_div.$(OBJEXT) \ + @MPFI_TREE@/src/si_sub.$(OBJEXT) \ + @MPFI_TREE@/src/sign.$(OBJEXT) @MPFI_TREE@/src/sin.$(OBJEXT) \ + @MPFI_TREE@/src/sinh.$(OBJEXT) @MPFI_TREE@/src/sqr.$(OBJEXT) \ + @MPFI_TREE@/src/sqrt.$(OBJEXT) @MPFI_TREE@/src/sub.$(OBJEXT) \ + @MPFI_TREE@/src/sub_d.$(OBJEXT) \ + @MPFI_TREE@/src/sub_fr.$(OBJEXT) \ + @MPFI_TREE@/src/sub_q.$(OBJEXT) \ + @MPFI_TREE@/src/sub_si.$(OBJEXT) \ + @MPFI_TREE@/src/sub_ui.$(OBJEXT) \ + @MPFI_TREE@/src/sub_z.$(OBJEXT) @MPFI_TREE@/src/swap.$(OBJEXT) \ + @MPFI_TREE@/src/tan.$(OBJEXT) @MPFI_TREE@/src/tanh.$(OBJEXT) \ + @MPFI_TREE@/src/ui_div.$(OBJEXT) \ + @MPFI_TREE@/src/ui_sub.$(OBJEXT) \ + @MPFI_TREE@/src/union.$(OBJEXT) \ + @MPFI_TREE@/src/urandom.$(OBJEXT) \ + @MPFI_TREE@/src/z_div.$(OBJEXT) \ + @MPFI_TREE@/src/z_sub.$(OBJEXT) +libmpfi_a_OBJECTS = $(nodist_libmpfi_a_OBJECTS) +am_mpfitest_OBJECTS = mpfitest-mpfitest.$(OBJEXT) +mpfitest_OBJECTS = $(am_mpfitest_OBJECTS) +mpfitest_LDADD = $(LDADD) +am__DEPENDENCIES_1 = +mpfitest_DEPENDENCIES = libmpfi.a $(am__DEPENDENCIES_1) \ + $(am__DEPENDENCIES_1) +am__dist_check_SCRIPTS_DIST = mpfi.test +AM_V_P = $(am__v_P_@AM_V@) +am__v_P_ = $(am__v_P_@AM_DEFAULT_V@) +am__v_P_0 = false +am__v_P_1 = : +AM_V_GEN = $(am__v_GEN_@AM_V@) +am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@) +am__v_GEN_0 = @echo " GEN " $@; +am__v_GEN_1 = +AM_V_at = $(am__v_at_@AM_V@) +am__v_at_ = $(am__v_at_@AM_DEFAULT_V@) +am__v_at_0 = @ +am__v_at_1 = +DEFAULT_INCLUDES = -I.@am__isrc@ +depcomp = $(SHELL) $(top_srcdir)/../../build-aux/depcomp +am__maybe_remake_depfiles = depfiles +am__depfiles_remade = ./$(DEPDIR)/mpfitest-mpfitest.Po \ + @MPFI_TREE@/src/$(DEPDIR)/abs.Po \ + @MPFI_TREE@/src/$(DEPDIR)/acos.Po \ + @MPFI_TREE@/src/$(DEPDIR)/acosh.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/add_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/alea.Po \ + @MPFI_TREE@/src/$(DEPDIR)/asin.Po \ + @MPFI_TREE@/src/$(DEPDIR)/asinh.Po \ + @MPFI_TREE@/src/$(DEPDIR)/atan.Po \ + @MPFI_TREE@/src/$(DEPDIR)/atan2.Po \ + @MPFI_TREE@/src/$(DEPDIR)/atanh.Po \ + @MPFI_TREE@/src/$(DEPDIR)/bisect.Po \ + @MPFI_TREE@/src/$(DEPDIR)/blow.Po \ + @MPFI_TREE@/src/$(DEPDIR)/cbrt.Po \ + @MPFI_TREE@/src/$(DEPDIR)/clear.Po \ + @MPFI_TREE@/src/$(DEPDIR)/clears.Po \ + @MPFI_TREE@/src/$(DEPDIR)/cmp.Po \ + @MPFI_TREE@/src/$(DEPDIR)/cmp_sym_pi.Po \ + @MPFI_TREE@/src/$(DEPDIR)/constants.Po \ + @MPFI_TREE@/src/$(DEPDIR)/cos.Po \ + @MPFI_TREE@/src/$(DEPDIR)/cosh.Po \ + @MPFI_TREE@/src/$(DEPDIR)/cot.Po \ + @MPFI_TREE@/src/$(DEPDIR)/coth.Po \ + @MPFI_TREE@/src/$(DEPDIR)/csc.Po \ + @MPFI_TREE@/src/$(DEPDIR)/csch.Po \ + @MPFI_TREE@/src/$(DEPDIR)/d_div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/d_sub.Po \ + @MPFI_TREE@/src/$(DEPDIR)/diam.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_2exp.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_2si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_2ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_ext.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/div_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/erandom.Po \ + @MPFI_TREE@/src/$(DEPDIR)/error.Po \ + @MPFI_TREE@/src/$(DEPDIR)/exp.Po \ + @MPFI_TREE@/src/$(DEPDIR)/exp10.Po \ + @MPFI_TREE@/src/$(DEPDIR)/exp10m1.Po \ + @MPFI_TREE@/src/$(DEPDIR)/exp2.Po \ + @MPFI_TREE@/src/$(DEPDIR)/exp2m1.Po \ + @MPFI_TREE@/src/$(DEPDIR)/expm1.Po \ + @MPFI_TREE@/src/$(DEPDIR)/fr_div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/fr_sub.Po \ + @MPFI_TREE@/src/$(DEPDIR)/get_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/get_endpoints.Po \ + @MPFI_TREE@/src/$(DEPDIR)/get_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/get_prec.Po \ + @MPFI_TREE@/src/$(DEPDIR)/get_version.Po \ + @MPFI_TREE@/src/$(DEPDIR)/has_zero.Po \ + @MPFI_TREE@/src/$(DEPDIR)/hypot.Po \ + @MPFI_TREE@/src/$(DEPDIR)/increase.Po \ + @MPFI_TREE@/src/$(DEPDIR)/init.Po \ + @MPFI_TREE@/src/$(DEPDIR)/init2.Po \ + @MPFI_TREE@/src/$(DEPDIR)/inits.Po \ + @MPFI_TREE@/src/$(DEPDIR)/inits2.Po \ + @MPFI_TREE@/src/$(DEPDIR)/inp_str.Po \ + @MPFI_TREE@/src/$(DEPDIR)/intersect.Po \ + @MPFI_TREE@/src/$(DEPDIR)/interv_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/interv_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/interv_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/interv_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/interv_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/interv_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/inv.Po \ + @MPFI_TREE@/src/$(DEPDIR)/is_empty.Po \ + @MPFI_TREE@/src/$(DEPDIR)/is_inside.Po \ + @MPFI_TREE@/src/$(DEPDIR)/log.Po \ + @MPFI_TREE@/src/$(DEPDIR)/log10.Po \ + @MPFI_TREE@/src/$(DEPDIR)/log10p1.Po \ + @MPFI_TREE@/src/$(DEPDIR)/log1p.Po \ + @MPFI_TREE@/src/$(DEPDIR)/log2.Po \ + @MPFI_TREE@/src/$(DEPDIR)/log2p1.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mag.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mid.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mig.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_2exp.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_2si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_2ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/mul_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/neg.Po \ + @MPFI_TREE@/src/$(DEPDIR)/nrandom.Po \ + @MPFI_TREE@/src/$(DEPDIR)/out_str.Po \ + @MPFI_TREE@/src/$(DEPDIR)/predicates.Po \ + @MPFI_TREE@/src/$(DEPDIR)/print_binary.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/put_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/q_div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/q_sub.Po \ + @MPFI_TREE@/src/$(DEPDIR)/quadrant.Po \ + @MPFI_TREE@/src/$(DEPDIR)/rec_sqrt.Po \ + @MPFI_TREE@/src/$(DEPDIR)/revert_if_needed.Po \ + @MPFI_TREE@/src/$(DEPDIR)/round_prec.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sec.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sech.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_flt.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_ld.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_prec.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_str.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/set_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/si_div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/si_sub.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sign.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sin.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sinh.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sqr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sqrt.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub_d.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub_fr.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub_q.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub_si.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub_ui.Po \ + @MPFI_TREE@/src/$(DEPDIR)/sub_z.Po \ + @MPFI_TREE@/src/$(DEPDIR)/swap.Po \ + @MPFI_TREE@/src/$(DEPDIR)/tan.Po \ + @MPFI_TREE@/src/$(DEPDIR)/tanh.Po \ + @MPFI_TREE@/src/$(DEPDIR)/ui_div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/ui_sub.Po \ + @MPFI_TREE@/src/$(DEPDIR)/union.Po \ + @MPFI_TREE@/src/$(DEPDIR)/urandom.Po \ + @MPFI_TREE@/src/$(DEPDIR)/z_div.Po \ + @MPFI_TREE@/src/$(DEPDIR)/z_sub.Po +am__mv = mv -f +AM_V_lt = $(am__v_lt_@AM_V@) +am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@) +am__v_lt_0 = --silent +am__v_lt_1 = +COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \ + $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) +AM_V_CC = $(am__v_CC_@AM_V@) +am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@) +am__v_CC_0 = @echo " CC " $@; +am__v_CC_1 = +CCLD = $(CC) +LINK = $(CCLD) $(AM_CFLAGS) $(CFLAGS) $(AM_LDFLAGS) $(LDFLAGS) -o $@ +AM_V_CCLD = $(am__v_CCLD_@AM_V@) +am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@) +am__v_CCLD_0 = @echo " CCLD " $@; +am__v_CCLD_1 = +SOURCES = $(nodist_libmpfi_a_SOURCES) $(mpfitest_SOURCES) +DIST_SOURCES = $(mpfitest_SOURCES) +RECURSIVE_TARGETS = all-recursive check-recursive cscopelist-recursive \ + ctags-recursive dvi-recursive html-recursive info-recursive \ + install-data-recursive install-dvi-recursive \ + install-exec-recursive install-html-recursive \ + install-info-recursive install-pdf-recursive \ + install-ps-recursive install-recursive installcheck-recursive \ + installdirs-recursive pdf-recursive ps-recursive \ + tags-recursive uninstall-recursive +am__can_run_installinfo = \ + case $$AM_UPDATE_INFO_DIR in \ + n|no|NO) false;; \ + *) (install-info --version) >/dev/null 2>&1;; \ + esac +RECURSIVE_CLEAN_TARGETS = mostlyclean-recursive clean-recursive \ + distclean-recursive maintainer-clean-recursive +am__recursive_targets = \ + $(RECURSIVE_TARGETS) \ + $(RECURSIVE_CLEAN_TARGETS) \ + $(am__extra_recursive_targets) +AM_RECURSIVE_TARGETS = $(am__recursive_targets:-recursive=) TAGS CTAGS \ + cscope check recheck distdir distdir-am dist dist-all \ + distcheck +am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP) \ + mpfi_config.h.in +# Read a list of newline-separated strings from the standard input, +# and print each of them once, without duplicates. Input order is +# *not* preserved. +am__uniquify_input = $(AWK) '\ + BEGIN { nonempty = 0; } \ + { items[$$0] = 1; nonempty = 1; } \ + END { if (nonempty) { for (i in items) print i; }; } \ +' +# Make sure the list of sources is unique. This is necessary because, +# e.g., the same source file might be shared among _SOURCES variables +# for different programs/libraries. +am__define_uniq_tagged_files = \ + list='$(am__tagged_files)'; \ + unique=`for i in $$list; do \ + if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \ + done | $(am__uniquify_input)` +am__tty_colors_dummy = \ + mgn= red= grn= lgn= blu= brg= std=; \ + am__color_tests=no +am__tty_colors = { \ + $(am__tty_colors_dummy); \ + if test "X$(AM_COLOR_TESTS)" = Xno; then \ + am__color_tests=no; \ + elif test "X$(AM_COLOR_TESTS)" = Xalways; then \ + am__color_tests=yes; \ + elif test "X$$TERM" != Xdumb && { test -t 1; } 2>/dev/null; then \ + am__color_tests=yes; \ + fi; \ + if test $$am__color_tests = yes; then \ + red=''; \ + grn=''; \ + lgn=''; \ + blu=''; \ + mgn=''; \ + brg=''; \ + std=''; \ + fi; \ +} +am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; +am__vpath_adj = case $$p in \ + $(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \ + *) f=$$p;; \ + esac; +am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`; +am__install_max = 40 +am__nobase_strip_setup = \ + srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'` +am__nobase_strip = \ + for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||" +am__nobase_list = $(am__nobase_strip_setup); \ + for p in $$list; do echo "$$p $$p"; done | \ + sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \ + $(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \ + if (++n[$$2] == $(am__install_max)) \ + { print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \ + END { for (dir in files) print dir, files[dir] }' +am__base_list = \ + sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \ + sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g' +am__uninstall_files_from_dir = { \ + test -z "$$files" \ + || { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \ + || { echo " ( cd '$$dir' && rm -f" $$files ")"; \ + $(am__cd) "$$dir" && rm -f $$files; }; \ + } +am__recheck_rx = ^[ ]*:recheck:[ ]* +am__global_test_result_rx = ^[ ]*:global-test-result:[ ]* +am__copy_in_global_log_rx = ^[ ]*:copy-in-global-log:[ ]* +# A command that, given a newline-separated list of test names on the +# standard input, print the name of the tests that are to be re-run +# upon "make recheck". +am__list_recheck_tests = $(AWK) '{ \ + recheck = 1; \ + while ((rc = (getline line < ($$0 ".trs"))) != 0) \ + { \ + if (rc < 0) \ + { \ + if ((getline line2 < ($$0 ".log")) < 0) \ + recheck = 0; \ + break; \ + } \ + else if (line ~ /$(am__recheck_rx)[nN][Oo]/) \ + { \ + recheck = 0; \ + break; \ + } \ + else if (line ~ /$(am__recheck_rx)[yY][eE][sS]/) \ + { \ + break; \ + } \ + }; \ + if (recheck) \ + print $$0; \ + close ($$0 ".trs"); \ + close ($$0 ".log"); \ +}' +# A command that, given a newline-separated list of test names on the +# standard input, create the global log from their .trs and .log files. +am__create_global_log = $(AWK) ' \ +function fatal(msg) \ +{ \ + print "fatal: making $@: " msg | "cat >&2"; \ + exit 1; \ +} \ +function rst_section(header) \ +{ \ + print header; \ + len = length(header); \ + for (i = 1; i <= len; i = i + 1) \ + printf "="; \ + printf "\n\n"; \ +} \ +{ \ + copy_in_global_log = 1; \ + global_test_result = "RUN"; \ + while ((rc = (getline line < ($$0 ".trs"))) != 0) \ + { \ + if (rc < 0) \ + fatal("failed to read from " $$0 ".trs"); \ + if (line ~ /$(am__global_test_result_rx)/) \ + { \ + sub("$(am__global_test_result_rx)", "", line); \ + sub("[ ]*$$", "", line); \ + global_test_result = line; \ + } \ + else if (line ~ /$(am__copy_in_global_log_rx)[nN][oO]/) \ + copy_in_global_log = 0; \ + }; \ + if (copy_in_global_log) \ + { \ + rst_section(global_test_result ": " $$0); \ + while ((rc = (getline line < ($$0 ".log"))) != 0) \ + { \ + if (rc < 0) \ + fatal("failed to read from " $$0 ".log"); \ + print line; \ + }; \ + printf "\n"; \ + }; \ + close ($$0 ".trs"); \ + close ($$0 ".log"); \ +}' +# Restructured Text title. +am__rst_title = { sed 's/.*/ & /;h;s/./=/g;p;x;s/ *$$//;p;g' && echo; } +# Solaris 10 'make', and several other traditional 'make' implementations, +# pass "-e" to $(SHELL), and POSIX 2008 even requires this. Work around it +# by disabling -e (using the XSI extension "set +e") if it's set. +am__sh_e_setup = case $$- in *e*) set +e;; esac +# Default flags passed to test drivers. +am__common_driver_flags = \ + --color-tests "$$am__color_tests" \ + --enable-hard-errors "$$am__enable_hard_errors" \ + --expect-failure "$$am__expect_failure" +# To be inserted before the command running the test. Creates the +# directory for the log if needed. Stores in $dir the directory +# containing $f, in $tst the test, in $log the log. Executes the +# developer- defined test setup AM_TESTS_ENVIRONMENT (if any), and +# passes TESTS_ENVIRONMENT. Set up options for the wrapper that +# will run the test scripts (or their associated LOG_COMPILER, if +# thy have one). +am__check_pre = \ +$(am__sh_e_setup); \ +$(am__vpath_adj_setup) $(am__vpath_adj) \ +$(am__tty_colors); \ +srcdir=$(srcdir); export srcdir; \ +case "$@" in \ + */*) am__odir=`echo "./$@" | sed 's|/[^/]*$$||'`;; \ + *) am__odir=.;; \ +esac; \ +test "x$$am__odir" = x"." || test -d "$$am__odir" \ + || $(MKDIR_P) "$$am__odir" || exit $$?; \ +if test -f "./$$f"; then dir=./; \ +elif test -f "$$f"; then dir=; \ +else dir="$(srcdir)/"; fi; \ +tst=$$dir$$f; log='$@'; \ +if test -n '$(DISABLE_HARD_ERRORS)'; then \ + am__enable_hard_errors=no; \ +else \ + am__enable_hard_errors=yes; \ +fi; \ +case " $(XFAIL_TESTS) " in \ + *[\ \ ]$$f[\ \ ]* | *[\ \ ]$$dir$$f[\ \ ]*) \ + am__expect_failure=yes;; \ + *) \ + am__expect_failure=no;; \ +esac; \ +$(AM_TESTS_ENVIRONMENT) $(TESTS_ENVIRONMENT) +# A shell command to get the names of the tests scripts with any registered +# extension removed (i.e., equivalently, the names of the test logs, with +# the '.log' extension removed). The result is saved in the shell variable +# '$bases'. This honors runtime overriding of TESTS and TEST_LOGS. Sadly, +# we cannot use something simpler, involving e.g., "$(TEST_LOGS:.log=)", +# since that might cause problem with VPATH rewrites for suffix-less tests. +# See also 'test-harness-vpath-rewrite.sh' and 'test-trs-basic.sh'. +am__set_TESTS_bases = \ + bases='$(TEST_LOGS)'; \ + bases=`for i in $$bases; do echo $$i; done | sed 's/\.log$$//'`; \ + bases=`echo $$bases` +AM_TESTSUITE_SUMMARY_HEADER = ' for $(PACKAGE_STRING)' +RECHECK_LOGS = $(TEST_LOGS) +TEST_SUITE_LOG = test-suite.log +TEST_EXTENSIONS = @EXEEXT@ .test +am__test_logs1 = $(TESTS:=.log) +am__test_logs2 = $(am__test_logs1:@EXEEXT@.log=.log) +TEST_LOGS = $(am__test_logs2:.test.log=.log) +TEST_LOG_DRIVER = $(SHELL) $(top_srcdir)/../../build-aux/test-driver +TEST_LOG_COMPILE = $(TEST_LOG_COMPILER) $(AM_TEST_LOG_FLAGS) \ + $(TEST_LOG_FLAGS) +am__set_b = \ + case '$@' in \ + */*) \ + case '$*' in \ + */*) b='$*';; \ + *) b=`echo '$@' | sed 's/\.log$$//'`; \ + esac;; \ + *) \ + b='$*';; \ + esac +DIST_SUBDIRS = $(SUBDIRS) +am__DIST_COMMON = $(srcdir)/../../am/dist_hook.am \ + $(srcdir)/../../am/rebuild.am $(srcdir)/../../am/reconfig.am \ + $(srcdir)/Makefile.in $(srcdir)/mpfi_config.h.in \ + $(top_srcdir)/../../build-aux/compile \ + $(top_srcdir)/../../build-aux/config.guess \ + $(top_srcdir)/../../build-aux/config.sub \ + $(top_srcdir)/../../build-aux/depcomp \ + $(top_srcdir)/../../build-aux/install-sh \ + $(top_srcdir)/../../build-aux/missing \ + $(top_srcdir)/../../build-aux/test-driver \ + ../../build-aux/ar-lib ../../build-aux/compile \ + ../../build-aux/config.guess ../../build-aux/config.sub \ + ../../build-aux/depcomp ../../build-aux/install-sh \ + ../../build-aux/ltmain.sh ../../build-aux/missing \ + ../../build-aux/texinfo.tex ../../build-aux/ylwrap +DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) +distdir = $(PACKAGE)-$(VERSION) +top_distdir = $(distdir) +am__remove_distdir = \ + if test -d "$(distdir)"; then \ + find "$(distdir)" -type d ! -perm -200 -exec chmod u+w {} ';' \ + && rm -rf "$(distdir)" \ + || { sleep 5 && rm -rf "$(distdir)"; }; \ + else :; fi +am__post_remove_distdir = $(am__remove_distdir) +am__relativize = \ + dir0=`pwd`; \ + sed_first='s,^\([^/]*\)/.*$$,\1,'; \ + sed_rest='s,^[^/]*/*,,'; \ + sed_last='s,^.*/\([^/]*\)$$,\1,'; \ + sed_butlast='s,/*[^/]*$$,,'; \ + while test -n "$$dir1"; do \ + first=`echo "$$dir1" | sed -e "$$sed_first"`; \ + if test "$$first" != "."; then \ + if test "$$first" = ".."; then \ + dir2=`echo "$$dir0" | sed -e "$$sed_last"`/"$$dir2"; \ + dir0=`echo "$$dir0" | sed -e "$$sed_butlast"`; \ + else \ + first2=`echo "$$dir2" | sed -e "$$sed_first"`; \ + if test "$$first2" = "$$first"; then \ + dir2=`echo "$$dir2" | sed -e "$$sed_rest"`; \ + else \ + dir2="../$$dir2"; \ + fi; \ + dir0="$$dir0"/"$$first"; \ + fi; \ + fi; \ + dir1=`echo "$$dir1" | sed -e "$$sed_rest"`; \ + done; \ + reldir="$$dir2" +DIST_ARCHIVES = $(distdir).tar.gz +GZIP_ENV = --best +DIST_TARGETS = dist-gzip +# Exists only to be overridden by the user if desired. +AM_DISTCHECK_DVI_TARGET = dvi +distuninstallcheck_listfiles = find . -type f -print +am__distuninstallcheck_listfiles = $(distuninstallcheck_listfiles) \ + | sed 's|^\./|$(prefix)/|' | grep -v '$(infodir)/dir$$' +distcleancheck_listfiles = find . -type f -print +ACLOCAL = @ACLOCAL@ +AMTAR = @AMTAR@ +AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@ +AUTOCONF = @AUTOCONF@ +AUTOHEADER = @AUTOHEADER@ +AUTOMAKE = @AUTOMAKE@ +AWK = @AWK@ +CC = @CC@ +CCDEPMODE = @CCDEPMODE@ +CFLAGS = @CFLAGS@ +CPPFLAGS = @CPPFLAGS@ +CSCOPE = @CSCOPE@ +CTAGS = @CTAGS@ +CYGPATH_W = @CYGPATH_W@ +DEFS = @DEFS@ +DEPDIR = @DEPDIR@ +ECHO_C = @ECHO_C@ +ECHO_N = @ECHO_N@ +ECHO_T = @ECHO_T@ +ETAGS = @ETAGS@ +EXEEXT = @EXEEXT@ +GMP_DEPEND = @GMP_DEPEND@ +GMP_INCLUDES = @GMP_INCLUDES@ +GMP_LIBS = @GMP_LIBS@ +INSTALL = @INSTALL@ +INSTALL_DATA = @INSTALL_DATA@ +INSTALL_PROGRAM = @INSTALL_PROGRAM@ +INSTALL_SCRIPT = @INSTALL_SCRIPT@ +INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ +LDFLAGS = @LDFLAGS@ +LIBOBJS = @LIBOBJS@ +LIBS = @LIBS@ +LN_S = @LN_S@ +LTLIBOBJS = @LTLIBOBJS@ +MAINT = @MAINT@ +MAKEINFO = @MAKEINFO@ +MKDIR_P = @MKDIR_P@ +MPFI_TREE = @MPFI_TREE@ +MPFR_DEPEND = @MPFR_DEPEND@ +MPFR_INCLUDES = @MPFR_INCLUDES@ +MPFR_LIBS = @MPFR_LIBS@ +OBJEXT = @OBJEXT@ +PACKAGE = @PACKAGE@ +PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ +PACKAGE_NAME = @PACKAGE_NAME@ +PACKAGE_STRING = @PACKAGE_STRING@ +PACKAGE_TARNAME = @PACKAGE_TARNAME@ +PACKAGE_URL = @PACKAGE_URL@ +PACKAGE_VERSION = @PACKAGE_VERSION@ +PATH_SEPARATOR = @PATH_SEPARATOR@ +RANLIB = @RANLIB@ +SET_MAKE = @SET_MAKE@ +SHELL = @SHELL@ +STRIP = @STRIP@ +VERSION = @VERSION@ +VISIBILITY_CFLAGS = @VISIBILITY_CFLAGS@ +WARNING_CFLAGS = @WARNING_CFLAGS@ +abs_builddir = @abs_builddir@ +abs_srcdir = @abs_srcdir@ +abs_top_builddir = @abs_top_builddir@ +abs_top_srcdir = @abs_top_srcdir@ +ac_ct_CC = @ac_ct_CC@ +am__include = @am__include@ +am__leading_dot = @am__leading_dot@ +am__quote = @am__quote@ +am__tar = @am__tar@ +am__untar = @am__untar@ +bindir = @bindir@ +build = @build@ +build_alias = @build_alias@ +build_cpu = @build_cpu@ +build_os = @build_os@ +build_vendor = @build_vendor@ +builddir = @builddir@ +datadir = @datadir@ +datarootdir = @datarootdir@ +docdir = @docdir@ +dvidir = @dvidir@ +exec_prefix = @exec_prefix@ +host = @host@ +host_alias = @host_alias@ +host_cpu = @host_cpu@ +host_os = @host_os@ +host_vendor = @host_vendor@ +htmldir = @htmldir@ +includedir = @includedir@ +infodir = @infodir@ +install_sh = @install_sh@ +libdir = @libdir@ +libexecdir = @libexecdir@ +localedir = @localedir@ +localstatedir = @localstatedir@ +mandir = @mandir@ +mkdir_p = @mkdir_p@ +oldincludedir = @oldincludedir@ +pdfdir = @pdfdir@ +prefix = @prefix@ +program_transform_name = @program_transform_name@ +psdir = @psdir@ +runstatedir = @runstatedir@ +sbindir = @sbindir@ +sharedstatedir = @sharedstatedir@ +srcdir = @srcdir@ +sysconfdir = @sysconfdir@ +target_alias = @target_alias@ +top_build_prefix = @top_build_prefix@ +top_builddir = @top_builddir@ +top_srcdir = @top_srcdir@ +EXTRA_DIST = $(MPFI_TREE) TLpatches +NEVER_DIST = `find . $(NEVER_NAMES)` + +# Files not to be distributed +NEVER_NAMES = -name .svn $(NEVER_NAMES_SUB) +NEVER_NAMES_SUB = -o -name .deps -o -name .dirstamp -o -name '*.$(OBJEXT)' +NEVER_NAMES_LT = -o -name .libs -o -name '*.lo' +SUBDIRS = . include +AM_CPPFLAGS = -I$(srcdir)/$(MPFI_TREE)/src $(MPFR_INCLUDES) $(GMP_INCLUDES) +AM_CFLAGS = $(VISIBILITY_CFLAGS) # $(WARNING_CFLAGS) +noinst_LIBRARIES = libmpfi.a +nodist_libmpfi_a_SOURCES = \ + @MPFI_TREE@/src/abs.c \ + @MPFI_TREE@/src/acos.c \ + @MPFI_TREE@/src/acosh.c \ + @MPFI_TREE@/src/add.c \ + @MPFI_TREE@/src/add_d.c \ + @MPFI_TREE@/src/add_fr.c \ + @MPFI_TREE@/src/add_q.c \ + @MPFI_TREE@/src/add_si.c \ + @MPFI_TREE@/src/add_ui.c \ + @MPFI_TREE@/src/add_z.c \ + @MPFI_TREE@/src/alea.c \ + @MPFI_TREE@/src/asin.c \ + @MPFI_TREE@/src/asinh.c \ + @MPFI_TREE@/src/atan.c \ + @MPFI_TREE@/src/atan2.c \ + @MPFI_TREE@/src/atanh.c \ + @MPFI_TREE@/src/bisect.c \ + @MPFI_TREE@/src/blow.c \ + @MPFI_TREE@/src/cbrt.c \ + @MPFI_TREE@/src/clear.c \ + @MPFI_TREE@/src/clears.c \ + @MPFI_TREE@/src/cmp.c \ + @MPFI_TREE@/src/cmp_sym_pi.c \ + @MPFI_TREE@/src/constants.c \ + @MPFI_TREE@/src/cos.c \ + @MPFI_TREE@/src/cosh.c \ + @MPFI_TREE@/src/cot.c \ + @MPFI_TREE@/src/coth.c \ + @MPFI_TREE@/src/csc.c \ + @MPFI_TREE@/src/csch.c \ + @MPFI_TREE@/src/d_div.c \ + @MPFI_TREE@/src/d_sub.c \ + @MPFI_TREE@/src/diam.c \ + @MPFI_TREE@/src/div.c \ + @MPFI_TREE@/src/div_2exp.c \ + @MPFI_TREE@/src/div_2si.c \ + @MPFI_TREE@/src/div_2ui.c \ + @MPFI_TREE@/src/div_d.c \ + @MPFI_TREE@/src/div_ext.c \ + @MPFI_TREE@/src/div_fr.c \ + @MPFI_TREE@/src/div_q.c \ + @MPFI_TREE@/src/div_si.c \ + @MPFI_TREE@/src/div_ui.c \ + @MPFI_TREE@/src/div_z.c \ + @MPFI_TREE@/src/erandom.c \ + @MPFI_TREE@/src/error.c \ + @MPFI_TREE@/src/exp.c \ + @MPFI_TREE@/src/exp10.c \ + @MPFI_TREE@/src/exp10m1.c \ + @MPFI_TREE@/src/exp2.c \ + @MPFI_TREE@/src/exp2m1.c \ + @MPFI_TREE@/src/expm1.c \ + @MPFI_TREE@/src/fr_div.c \ + @MPFI_TREE@/src/fr_sub.c \ + @MPFI_TREE@/src/get_d.c \ + @MPFI_TREE@/src/get_endpoints.c \ + @MPFI_TREE@/src/get_fr.c \ + @MPFI_TREE@/src/get_prec.c \ + @MPFI_TREE@/src/get_version.c \ + @MPFI_TREE@/src/has_zero.c \ + @MPFI_TREE@/src/hypot.c \ + @MPFI_TREE@/src/increase.c \ + @MPFI_TREE@/src/init.c \ + @MPFI_TREE@/src/init2.c \ + @MPFI_TREE@/src/inits.c \ + @MPFI_TREE@/src/inits2.c \ + @MPFI_TREE@/src/inp_str.c \ + @MPFI_TREE@/src/intersect.c \ + @MPFI_TREE@/src/interv_d.c \ + @MPFI_TREE@/src/interv_fr.c \ + @MPFI_TREE@/src/interv_q.c \ + @MPFI_TREE@/src/interv_si.c \ + @MPFI_TREE@/src/interv_ui.c \ + @MPFI_TREE@/src/interv_z.c \ + @MPFI_TREE@/src/inv.c \ + @MPFI_TREE@/src/is_empty.c \ + @MPFI_TREE@/src/is_inside.c \ + @MPFI_TREE@/src/log.c \ + @MPFI_TREE@/src/log10.c \ + @MPFI_TREE@/src/log10p1.c \ + @MPFI_TREE@/src/log1p.c \ + @MPFI_TREE@/src/log2.c \ + @MPFI_TREE@/src/log2p1.c \ + @MPFI_TREE@/src/mag.c \ + @MPFI_TREE@/src/mid.c \ + @MPFI_TREE@/src/mig.c \ + @MPFI_TREE@/src/mpfi-impl.h \ + @MPFI_TREE@/src/mpfi.h \ + @MPFI_TREE@/src/mpfi_io.h \ + @MPFI_TREE@/src/mul.c \ + @MPFI_TREE@/src/mul_2exp.c \ + @MPFI_TREE@/src/mul_2si.c \ + @MPFI_TREE@/src/mul_2ui.c \ + @MPFI_TREE@/src/mul_d.c \ + @MPFI_TREE@/src/mul_fr.c \ + @MPFI_TREE@/src/mul_q.c \ + @MPFI_TREE@/src/mul_si.c \ + @MPFI_TREE@/src/mul_ui.c \ + @MPFI_TREE@/src/mul_z.c \ + @MPFI_TREE@/src/neg.c \ + @MPFI_TREE@/src/nrandom.c \ + @MPFI_TREE@/src/out_str.c \ + @MPFI_TREE@/src/predicates.c \ + @MPFI_TREE@/src/print_binary.c \ + @MPFI_TREE@/src/put.c \ + @MPFI_TREE@/src/put_d.c \ + @MPFI_TREE@/src/put_fr.c \ + @MPFI_TREE@/src/put_q.c \ + @MPFI_TREE@/src/put_si.c \ + @MPFI_TREE@/src/put_ui.c \ + @MPFI_TREE@/src/put_z.c \ + @MPFI_TREE@/src/q_div.c \ + @MPFI_TREE@/src/q_sub.c \ + @MPFI_TREE@/src/quadrant.c \ + @MPFI_TREE@/src/rec_sqrt.c \ + @MPFI_TREE@/src/revert_if_needed.c \ + @MPFI_TREE@/src/round_prec.c \ + @MPFI_TREE@/src/sec.c \ + @MPFI_TREE@/src/sech.c \ + @MPFI_TREE@/src/set.c \ + @MPFI_TREE@/src/set_d.c \ + @MPFI_TREE@/src/set_flt.c \ + @MPFI_TREE@/src/set_fr.c \ + @MPFI_TREE@/src/set_ld.c \ + @MPFI_TREE@/src/set_prec.c \ + @MPFI_TREE@/src/set_q.c \ + @MPFI_TREE@/src/set_si.c \ + @MPFI_TREE@/src/set_str.c \ + @MPFI_TREE@/src/set_ui.c \ + @MPFI_TREE@/src/set_z.c \ + @MPFI_TREE@/src/si_div.c \ + @MPFI_TREE@/src/si_sub.c \ + @MPFI_TREE@/src/sign.c \ + @MPFI_TREE@/src/sin.c \ + @MPFI_TREE@/src/sinh.c \ + @MPFI_TREE@/src/sqr.c \ + @MPFI_TREE@/src/sqrt.c \ + @MPFI_TREE@/src/sub.c \ + @MPFI_TREE@/src/sub_d.c \ + @MPFI_TREE@/src/sub_fr.c \ + @MPFI_TREE@/src/sub_q.c \ + @MPFI_TREE@/src/sub_si.c \ + @MPFI_TREE@/src/sub_ui.c \ + @MPFI_TREE@/src/sub_z.c \ + @MPFI_TREE@/src/swap.c \ + @MPFI_TREE@/src/tan.c \ + @MPFI_TREE@/src/tanh.c \ + @MPFI_TREE@/src/ui_div.c \ + @MPFI_TREE@/src/ui_sub.c \ + @MPFI_TREE@/src/union.c \ + @MPFI_TREE@/src/urandom.c \ + @MPFI_TREE@/src/z_div.c \ + @MPFI_TREE@/src/z_sub.c + +@build_TRUE@dist_check_SCRIPTS = mpfi.test +@build_TRUE@TESTS = mpfi.test +mpfitest_SOURCES = mpfitest.c +mpfitest_CPPFLAGS = -Iinclude $(MPFR_INCLUDES) $(GMP_INCLUDES) +LDADD = libmpfi.a $(MPFR_LIBS) $(GMP_LIBS) + +# Reconfig +reconfig_prereq = $(MPFR_DEPEND) $(GMP_DEPEND) +DISTCLEANFILES = config.force + +# Rebuild +rebuild_prereq = +rebuild_target = all +CLEANFILES = rebuild.stamp +all: mpfi_config.h + $(MAKE) $(AM_MAKEFLAGS) all-recursive + +.SUFFIXES: +.SUFFIXES: .c .log .o .obj .test .test$(EXEEXT) .trs +am--refresh: Makefile + @: +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(srcdir)/../../am/dist_hook.am $(srcdir)/../../am/reconfig.am $(srcdir)/../../am/rebuild.am $(am__configure_deps) + @for dep in $?; do \ + case '$(am__configure_deps)' in \ + *$$dep*) \ + echo ' cd $(srcdir) && $(AUTOMAKE) --foreign'; \ + $(am__cd) $(srcdir) && $(AUTOMAKE) --foreign \ + && exit 0; \ + exit 1;; \ + esac; \ + done; \ + echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign Makefile'; \ + $(am__cd) $(top_srcdir) && \ + $(AUTOMAKE) --foreign Makefile +Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status + @case '$?' in \ + *config.status*) \ + echo ' $(SHELL) ./config.status'; \ + $(SHELL) ./config.status;; \ + *) \ + echo ' cd $(top_builddir) && $(SHELL) ./config.status $@ $(am__maybe_remake_depfiles)'; \ + cd $(top_builddir) && $(SHELL) ./config.status $@ $(am__maybe_remake_depfiles);; \ + esac; +$(srcdir)/../../am/dist_hook.am $(srcdir)/../../am/reconfig.am $(srcdir)/../../am/rebuild.am $(am__empty): + +$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) + $(SHELL) ./config.status --recheck + +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + $(am__cd) $(srcdir) && $(AUTOCONF) +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) + $(am__cd) $(srcdir) && $(ACLOCAL) $(ACLOCAL_AMFLAGS) +$(am__aclocal_m4_deps): + +mpfi_config.h: stamp-h1 + @test -f $@ || rm -f stamp-h1 + @test -f $@ || $(MAKE) $(AM_MAKEFLAGS) stamp-h1 + +stamp-h1: $(srcdir)/mpfi_config.h.in $(top_builddir)/config.status + @rm -f stamp-h1 + cd $(top_builddir) && $(SHELL) ./config.status mpfi_config.h +$(srcdir)/mpfi_config.h.in: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + ($(am__cd) $(top_srcdir) && $(AUTOHEADER)) + rm -f stamp-h1 + touch $@ + +distclean-hdr: + -rm -f mpfi_config.h stamp-h1 + +clean-checkPROGRAMS: + -test -z "$(check_PROGRAMS)" || rm -f $(check_PROGRAMS) + +clean-noinstLIBRARIES: + -test -z "$(noinst_LIBRARIES)" || rm -f $(noinst_LIBRARIES) +@MPFI_TREE@/src/$(am__dirstamp): + @$(MKDIR_P) @MPFI_TREE@/src + @: > @MPFI_TREE@/src/$(am__dirstamp) +@MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp): + @$(MKDIR_P) @MPFI_TREE@/src/$(DEPDIR) + @: > @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/abs.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/acos.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/acosh.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/add_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/alea.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/asin.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/asinh.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/atan.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/atan2.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/atanh.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/bisect.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/blow.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/cbrt.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/clear.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/clears.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/cmp.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/cmp_sym_pi.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/constants.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/cos.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/cosh.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/cot.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/coth.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/csc.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/csch.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/d_div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/d_sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/diam.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_2exp.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_2si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_2ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_ext.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/div_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/erandom.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/error.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/exp.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/exp10.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/exp10m1.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/exp2.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/exp2m1.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/expm1.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/fr_div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/fr_sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/get_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/get_endpoints.$(OBJEXT): \ + @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/get_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/get_prec.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/get_version.$(OBJEXT): \ + @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/has_zero.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/hypot.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/increase.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/init.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/init2.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/inits.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/inits2.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/inp_str.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/intersect.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/interv_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/interv_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/interv_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/interv_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/interv_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/interv_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/inv.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/is_empty.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/is_inside.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/log.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/log10.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/log10p1.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/log1p.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/log2.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/log2p1.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mag.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mid.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mig.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_2exp.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_2si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_2ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/mul_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/neg.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/nrandom.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/out_str.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/predicates.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/print_binary.$(OBJEXT): \ + @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/put_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/q_div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/q_sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/quadrant.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/rec_sqrt.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/revert_if_needed.$(OBJEXT): \ + @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/round_prec.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sec.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sech.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_flt.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_ld.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_prec.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_str.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/set_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/si_div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/si_sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sign.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sin.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sinh.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sqr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sqrt.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub_d.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub_fr.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub_q.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub_si.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub_ui.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/sub_z.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/swap.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/tan.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/tanh.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/ui_div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/ui_sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/union.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/urandom.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/z_div.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFI_TREE@/src/z_sub.$(OBJEXT): @MPFI_TREE@/src/$(am__dirstamp) \ + @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) + +libmpfi.a: $(libmpfi_a_OBJECTS) $(libmpfi_a_DEPENDENCIES) $(EXTRA_libmpfi_a_DEPENDENCIES) + $(AM_V_at)-rm -f libmpfi.a + $(AM_V_AR)$(libmpfi_a_AR) libmpfi.a $(libmpfi_a_OBJECTS) $(libmpfi_a_LIBADD) + $(AM_V_at)$(RANLIB) libmpfi.a + +mpfitest$(EXEEXT): $(mpfitest_OBJECTS) $(mpfitest_DEPENDENCIES) $(EXTRA_mpfitest_DEPENDENCIES) + @rm -f mpfitest$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(mpfitest_OBJECTS) $(mpfitest_LDADD) $(LIBS) + +mostlyclean-compile: + -rm -f *.$(OBJEXT) + -rm -f @MPFI_TREE@/src/*.$(OBJEXT) + +distclean-compile: + -rm -f *.tab.c + +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mpfitest-mpfitest.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/abs.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/acos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/acosh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/add_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/alea.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/asin.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/asinh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/atan.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/atan2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/atanh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/bisect.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/blow.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/cbrt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/clear.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/clears.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/cmp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/cmp_sym_pi.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/constants.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/cos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/cosh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/cot.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/coth.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/csc.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/csch.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/d_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/d_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/diam.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_2exp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_2si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_2ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_ext.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/div_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/erandom.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/error.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/exp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/exp10.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/exp10m1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/exp2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/exp2m1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/expm1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/fr_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/fr_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/get_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/get_endpoints.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/get_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/get_prec.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/get_version.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/has_zero.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/hypot.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/increase.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/init.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/init2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/inits.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/inits2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/inp_str.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/intersect.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/interv_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/interv_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/interv_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/interv_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/interv_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/interv_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/inv.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/is_empty.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/is_inside.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/log.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/log10.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/log10p1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/log1p.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/log2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/log2p1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mag.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mid.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mig.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_2exp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_2si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_2ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/mul_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/neg.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/nrandom.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/out_str.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/predicates.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/print_binary.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/put_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/q_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/q_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/quadrant.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/rec_sqrt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/revert_if_needed.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/round_prec.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sec.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sech.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_flt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_ld.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_prec.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_str.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/set_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/si_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/si_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sign.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sin.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sinh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sqr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sqrt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/sub_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/swap.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/tan.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/tanh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/ui_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/ui_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/union.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/urandom.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/z_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFI_TREE@/src/$(DEPDIR)/z_sub.Po@am__quote@ # am--include-marker + +$(am__depfiles_remade): + @$(MKDIR_P) $(@D) + @echo '# dummy' >$@-t && $(am__mv) $@-t $@ + +am--depfiles: $(am__depfiles_remade) + +.c.o: +@am__fastdepCC_TRUE@ $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.o$$||'`;\ +@am__fastdepCC_TRUE@ $(COMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ $< &&\ +@am__fastdepCC_TRUE@ $(am__mv) $$depbase.Tpo $$depbase.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ $< + +.c.obj: +@am__fastdepCC_TRUE@ $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.obj$$||'`;\ +@am__fastdepCC_TRUE@ $(COMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ `$(CYGPATH_W) '$<'` &&\ +@am__fastdepCC_TRUE@ $(am__mv) $$depbase.Tpo $$depbase.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ `$(CYGPATH_W) '$<'` + +mpfitest-mpfitest.o: mpfitest.c +@am__fastdepCC_TRUE@ $(AM_V_CC)$(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(mpfitest_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -MT mpfitest-mpfitest.o -MD -MP -MF $(DEPDIR)/mpfitest-mpfitest.Tpo -c -o mpfitest-mpfitest.o `test -f 'mpfitest.c' || echo '$(srcdir)/'`mpfitest.c +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/mpfitest-mpfitest.Tpo $(DEPDIR)/mpfitest-mpfitest.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='mpfitest.c' object='mpfitest-mpfitest.o' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(mpfitest_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -c -o mpfitest-mpfitest.o `test -f 'mpfitest.c' || echo '$(srcdir)/'`mpfitest.c + +mpfitest-mpfitest.obj: mpfitest.c +@am__fastdepCC_TRUE@ $(AM_V_CC)$(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(mpfitest_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -MT mpfitest-mpfitest.obj -MD -MP -MF $(DEPDIR)/mpfitest-mpfitest.Tpo -c -o mpfitest-mpfitest.obj `if test -f 'mpfitest.c'; then $(CYGPATH_W) 'mpfitest.c'; else $(CYGPATH_W) '$(srcdir)/mpfitest.c'; fi` +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/mpfitest-mpfitest.Tpo $(DEPDIR)/mpfitest-mpfitest.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='mpfitest.c' object='mpfitest-mpfitest.obj' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(mpfitest_CPPFLAGS) $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) -c -o mpfitest-mpfitest.obj `if test -f 'mpfitest.c'; then $(CYGPATH_W) 'mpfitest.c'; else $(CYGPATH_W) '$(srcdir)/mpfitest.c'; fi` + +# This directory's subdirectories are mostly independent; you can cd +# into them and run 'make' without going through this Makefile. +# To change the values of 'make' variables: instead of editing Makefiles, +# (1) if the variable is set in 'config.status', edit 'config.status' +# (which will cause the Makefiles to be regenerated when you run 'make'); +# (2) otherwise, pass the desired values on the 'make' command line. +$(am__recursive_targets): + @fail=; \ + if $(am__make_keepgoing); then \ + failcom='fail=yes'; \ + else \ + failcom='exit 1'; \ + fi; \ + dot_seen=no; \ + target=`echo $@ | sed s/-recursive//`; \ + case "$@" in \ + distclean-* | maintainer-clean-*) list='$(DIST_SUBDIRS)' ;; \ + *) list='$(SUBDIRS)' ;; \ + esac; \ + for subdir in $$list; do \ + echo "Making $$target in $$subdir"; \ + if test "$$subdir" = "."; then \ + dot_seen=yes; \ + local_target="$$target-am"; \ + else \ + local_target="$$target"; \ + fi; \ + ($(am__cd) $$subdir && $(MAKE) $(AM_MAKEFLAGS) $$local_target) \ + || eval $$failcom; \ + done; \ + if test "$$dot_seen" = "no"; then \ + $(MAKE) $(AM_MAKEFLAGS) "$$target-am" || exit 1; \ + fi; test -z "$$fail" + +ID: $(am__tagged_files) + $(am__define_uniq_tagged_files); mkid -fID $$unique +tags: tags-recursive +TAGS: tags + +tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) + set x; \ + here=`pwd`; \ + if ($(ETAGS) --etags-include --version) >/dev/null 2>&1; then \ + include_option=--etags-include; \ + empty_fix=.; \ + else \ + include_option=--include; \ + empty_fix=; \ + fi; \ + list='$(SUBDIRS)'; for subdir in $$list; do \ + if test "$$subdir" = .; then :; else \ + test ! -f $$subdir/TAGS || \ + set "$$@" "$$include_option=$$here/$$subdir/TAGS"; \ + fi; \ + done; \ + $(am__define_uniq_tagged_files); \ + shift; \ + if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \ + test -n "$$unique" || unique=$$empty_fix; \ + if test $$# -gt 0; then \ + $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ + "$$@" $$unique; \ + else \ + $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ + $$unique; \ + fi; \ + fi +ctags: ctags-recursive + +CTAGS: ctags +ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) + $(am__define_uniq_tagged_files); \ + test -z "$(CTAGS_ARGS)$$unique" \ + || $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \ + $$unique + +GTAGS: + here=`$(am__cd) $(top_builddir) && pwd` \ + && $(am__cd) $(top_srcdir) \ + && gtags -i $(GTAGS_ARGS) "$$here" +cscope: cscope.files + test ! -s cscope.files \ + || $(CSCOPE) -b -q $(AM_CSCOPEFLAGS) $(CSCOPEFLAGS) -i cscope.files $(CSCOPE_ARGS) +clean-cscope: + -rm -f cscope.files +cscope.files: clean-cscope cscopelist +cscopelist: cscopelist-recursive + +cscopelist-am: $(am__tagged_files) + list='$(am__tagged_files)'; \ + case "$(srcdir)" in \ + [\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \ + *) sdir=$(subdir)/$(srcdir) ;; \ + esac; \ + for i in $$list; do \ + if test -f "$$i"; then \ + echo "$(subdir)/$$i"; \ + else \ + echo "$$sdir/$$i"; \ + fi; \ + done >> $(top_builddir)/cscope.files + +distclean-tags: + -rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags + -rm -f cscope.out cscope.in.out cscope.po.out cscope.files + +# Recover from deleted '.trs' file; this should ensure that +# "rm -f foo.log; make foo.trs" re-run 'foo.test', and re-create +# both 'foo.log' and 'foo.trs'. Break the recipe in two subshells +# to avoid problems with "make -n". +.log.trs: + rm -f $< $@ + $(MAKE) $(AM_MAKEFLAGS) $< + +# Leading 'am--fnord' is there to ensure the list of targets does not +# expand to empty, as could happen e.g. with make check TESTS=''. +am--fnord $(TEST_LOGS) $(TEST_LOGS:.log=.trs): $(am__force_recheck) +am--force-recheck: + @: + +$(TEST_SUITE_LOG): $(TEST_LOGS) + @$(am__set_TESTS_bases); \ + am__f_ok () { test -f "$$1" && test -r "$$1"; }; \ + redo_bases=`for i in $$bases; do \ + am__f_ok $$i.trs && am__f_ok $$i.log || echo $$i; \ + done`; \ + if test -n "$$redo_bases"; then \ + redo_logs=`for i in $$redo_bases; do echo $$i.log; done`; \ + redo_results=`for i in $$redo_bases; do echo $$i.trs; done`; \ + if $(am__make_dryrun); then :; else \ + rm -f $$redo_logs && rm -f $$redo_results || exit 1; \ + fi; \ + fi; \ + if test -n "$$am__remaking_logs"; then \ + echo "fatal: making $(TEST_SUITE_LOG): possible infinite" \ + "recursion detected" >&2; \ + elif test -n "$$redo_logs"; then \ + am__remaking_logs=yes $(MAKE) $(AM_MAKEFLAGS) $$redo_logs; \ + fi; \ + if $(am__make_dryrun); then :; else \ + st=0; \ + errmsg="fatal: making $(TEST_SUITE_LOG): failed to create"; \ + for i in $$redo_bases; do \ + test -f $$i.trs && test -r $$i.trs \ + || { echo "$$errmsg $$i.trs" >&2; st=1; }; \ + test -f $$i.log && test -r $$i.log \ + || { echo "$$errmsg $$i.log" >&2; st=1; }; \ + done; \ + test $$st -eq 0 || exit 1; \ + fi + @$(am__sh_e_setup); $(am__tty_colors); $(am__set_TESTS_bases); \ + ws='[ ]'; \ + results=`for b in $$bases; do echo $$b.trs; done`; \ + test -n "$$results" || results=/dev/null; \ + all=` grep "^$$ws*:test-result:" $$results | wc -l`; \ + pass=` grep "^$$ws*:test-result:$$ws*PASS" $$results | wc -l`; \ + fail=` grep "^$$ws*:test-result:$$ws*FAIL" $$results | wc -l`; \ + skip=` grep "^$$ws*:test-result:$$ws*SKIP" $$results | wc -l`; \ + xfail=`grep "^$$ws*:test-result:$$ws*XFAIL" $$results | wc -l`; \ + xpass=`grep "^$$ws*:test-result:$$ws*XPASS" $$results | wc -l`; \ + error=`grep "^$$ws*:test-result:$$ws*ERROR" $$results | wc -l`; \ + if test `expr $$fail + $$xpass + $$error` -eq 0; then \ + success=true; \ + else \ + success=false; \ + fi; \ + br='==================='; br=$$br$$br$$br$$br; \ + result_count () \ + { \ + if test x"$$1" = x"--maybe-color"; then \ + maybe_colorize=yes; \ + elif test x"$$1" = x"--no-color"; then \ + maybe_colorize=no; \ + else \ + echo "$@: invalid 'result_count' usage" >&2; exit 4; \ + fi; \ + shift; \ + desc=$$1 count=$$2; \ + if test $$maybe_colorize = yes && test $$count -gt 0; then \ + color_start=$$3 color_end=$$std; \ + else \ + color_start= color_end=; \ + fi; \ + echo "$${color_start}# $$desc $$count$${color_end}"; \ + }; \ + create_testsuite_report () \ + { \ + result_count $$1 "TOTAL:" $$all "$$brg"; \ + result_count $$1 "PASS: " $$pass "$$grn"; \ + result_count $$1 "SKIP: " $$skip "$$blu"; \ + result_count $$1 "XFAIL:" $$xfail "$$lgn"; \ + result_count $$1 "FAIL: " $$fail "$$red"; \ + result_count $$1 "XPASS:" $$xpass "$$red"; \ + result_count $$1 "ERROR:" $$error "$$mgn"; \ + }; \ + { \ + echo "$(PACKAGE_STRING): $(subdir)/$(TEST_SUITE_LOG)" | \ + $(am__rst_title); \ + create_testsuite_report --no-color; \ + echo; \ + echo ".. contents:: :depth: 2"; \ + echo; \ + for b in $$bases; do echo $$b; done \ + | $(am__create_global_log); \ + } >$(TEST_SUITE_LOG).tmp || exit 1; \ + mv $(TEST_SUITE_LOG).tmp $(TEST_SUITE_LOG); \ + if $$success; then \ + col="$$grn"; \ + else \ + col="$$red"; \ + test x"$$VERBOSE" = x || cat $(TEST_SUITE_LOG); \ + fi; \ + echo "$${col}$$br$${std}"; \ + echo "$${col}Testsuite summary"$(AM_TESTSUITE_SUMMARY_HEADER)"$${std}"; \ + echo "$${col}$$br$${std}"; \ + create_testsuite_report --maybe-color; \ + echo "$$col$$br$$std"; \ + if $$success; then :; else \ + echo "$${col}See $(subdir)/$(TEST_SUITE_LOG)$${std}"; \ + if test -n "$(PACKAGE_BUGREPORT)"; then \ + echo "$${col}Please report to $(PACKAGE_BUGREPORT)$${std}"; \ + fi; \ + echo "$$col$$br$$std"; \ + fi; \ + $$success || exit 1 + +check-TESTS: $(check_PROGRAMS) $(dist_check_SCRIPTS) + @list='$(RECHECK_LOGS)'; test -z "$$list" || rm -f $$list + @list='$(RECHECK_LOGS:.log=.trs)'; test -z "$$list" || rm -f $$list + @test -z "$(TEST_SUITE_LOG)" || rm -f $(TEST_SUITE_LOG) + @set +e; $(am__set_TESTS_bases); \ + log_list=`for i in $$bases; do echo $$i.log; done`; \ + trs_list=`for i in $$bases; do echo $$i.trs; done`; \ + log_list=`echo $$log_list`; trs_list=`echo $$trs_list`; \ + $(MAKE) $(AM_MAKEFLAGS) $(TEST_SUITE_LOG) TEST_LOGS="$$log_list"; \ + exit $$?; +recheck: all $(check_PROGRAMS) $(dist_check_SCRIPTS) + @test -z "$(TEST_SUITE_LOG)" || rm -f $(TEST_SUITE_LOG) + @set +e; $(am__set_TESTS_bases); \ + bases=`for i in $$bases; do echo $$i; done \ + | $(am__list_recheck_tests)` || exit 1; \ + log_list=`for i in $$bases; do echo $$i.log; done`; \ + log_list=`echo $$log_list`; \ + $(MAKE) $(AM_MAKEFLAGS) $(TEST_SUITE_LOG) \ + am__force_recheck=am--force-recheck \ + TEST_LOGS="$$log_list"; \ + exit $$? +.test.log: + @p='$<'; \ + $(am__set_b); \ + $(am__check_pre) $(TEST_LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_TEST_LOG_DRIVER_FLAGS) $(TEST_LOG_DRIVER_FLAGS) -- $(TEST_LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +@am__EXEEXT_TRUE@.test$(EXEEXT).log: +@am__EXEEXT_TRUE@ @p='$<'; \ +@am__EXEEXT_TRUE@ $(am__set_b); \ +@am__EXEEXT_TRUE@ $(am__check_pre) $(TEST_LOG_DRIVER) --test-name "$$f" \ +@am__EXEEXT_TRUE@ --log-file $$b.log --trs-file $$b.trs \ +@am__EXEEXT_TRUE@ $(am__common_driver_flags) $(AM_TEST_LOG_DRIVER_FLAGS) $(TEST_LOG_DRIVER_FLAGS) -- $(TEST_LOG_COMPILE) \ +@am__EXEEXT_TRUE@ "$$tst" $(AM_TESTS_FD_REDIRECT) +distdir: $(BUILT_SOURCES) + $(MAKE) $(AM_MAKEFLAGS) distdir-am + +distdir-am: $(DISTFILES) + $(am__remove_distdir) + test -d "$(distdir)" || mkdir "$(distdir)" + @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + list='$(DISTFILES)'; \ + dist_files=`for file in $$list; do echo $$file; done | \ + sed -e "s|^$$srcdirstrip/||;t" \ + -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ + case $$dist_files in \ + */*) $(MKDIR_P) `echo "$$dist_files" | \ + sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ + sort -u` ;; \ + esac; \ + for file in $$dist_files; do \ + if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ + if test -d $$d/$$file; then \ + dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ + if test -d "$(distdir)/$$file"; then \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ + cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ + else \ + test -f "$(distdir)/$$file" \ + || cp -p $$d/$$file "$(distdir)/$$file" \ + || exit 1; \ + fi; \ + done + @list='$(DIST_SUBDIRS)'; for subdir in $$list; do \ + if test "$$subdir" = .; then :; else \ + $(am__make_dryrun) \ + || test -d "$(distdir)/$$subdir" \ + || $(MKDIR_P) "$(distdir)/$$subdir" \ + || exit 1; \ + dir1=$$subdir; dir2="$(distdir)/$$subdir"; \ + $(am__relativize); \ + new_distdir=$$reldir; \ + dir1=$$subdir; dir2="$(top_distdir)"; \ + $(am__relativize); \ + new_top_distdir=$$reldir; \ + echo " (cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) top_distdir="$$new_top_distdir" distdir="$$new_distdir" \\"; \ + echo " am__remove_distdir=: am__skip_length_check=: am__skip_mode_fix=: distdir)"; \ + ($(am__cd) $$subdir && \ + $(MAKE) $(AM_MAKEFLAGS) \ + top_distdir="$$new_top_distdir" \ + distdir="$$new_distdir" \ + am__remove_distdir=: \ + am__skip_length_check=: \ + am__skip_mode_fix=: \ + distdir) \ + || exit 1; \ + fi; \ + done + $(MAKE) $(AM_MAKEFLAGS) \ + top_distdir="$(top_distdir)" distdir="$(distdir)" \ + dist-hook + -test -n "$(am__skip_mode_fix)" \ + || find "$(distdir)" -type d ! -perm -755 \ + -exec chmod u+rwx,go+rx {} \; -o \ + ! -type d ! -perm -444 -links 1 -exec chmod a+r {} \; -o \ + ! -type d ! -perm -400 -exec chmod a+r {} \; -o \ + ! -type d ! -perm -444 -exec $(install_sh) -c -m a+r {} {} \; \ + || chmod -R a+r "$(distdir)" +dist-gzip: distdir + tardir=$(distdir) && $(am__tar) | eval GZIP= gzip $(GZIP_ENV) -c >$(distdir).tar.gz + $(am__post_remove_distdir) + +dist-bzip2: distdir + tardir=$(distdir) && $(am__tar) | BZIP2=$${BZIP2--9} bzip2 -c >$(distdir).tar.bz2 + $(am__post_remove_distdir) + +dist-lzip: distdir + tardir=$(distdir) && $(am__tar) | lzip -c $${LZIP_OPT--9} >$(distdir).tar.lz + $(am__post_remove_distdir) + +dist-xz: distdir + tardir=$(distdir) && $(am__tar) | XZ_OPT=$${XZ_OPT--e} xz -c >$(distdir).tar.xz + $(am__post_remove_distdir) + +dist-zstd: distdir + tardir=$(distdir) && $(am__tar) | zstd -c $${ZSTD_CLEVEL-$${ZSTD_OPT--19}} >$(distdir).tar.zst + $(am__post_remove_distdir) + +dist-tarZ: distdir + @echo WARNING: "Support for distribution archives compressed with" \ + "legacy program 'compress' is deprecated." >&2 + @echo WARNING: "It will be removed altogether in Automake 2.0" >&2 + tardir=$(distdir) && $(am__tar) | compress -c >$(distdir).tar.Z + $(am__post_remove_distdir) + +dist-shar: distdir + @echo WARNING: "Support for shar distribution archives is" \ + "deprecated." >&2 + @echo WARNING: "It will be removed altogether in Automake 2.0" >&2 + shar $(distdir) | eval GZIP= gzip $(GZIP_ENV) -c >$(distdir).shar.gz + $(am__post_remove_distdir) + +dist-zip: distdir + -rm -f $(distdir).zip + zip -rq $(distdir).zip $(distdir) + $(am__post_remove_distdir) + +dist dist-all: + $(MAKE) $(AM_MAKEFLAGS) $(DIST_TARGETS) am__post_remove_distdir='@:' + $(am__post_remove_distdir) + +# This target untars the dist file and tries a VPATH configuration. Then +# it guarantees that the distribution is self-contained by making another +# tarfile. +distcheck: dist + case '$(DIST_ARCHIVES)' in \ + *.tar.gz*) \ + eval GZIP= gzip $(GZIP_ENV) -dc $(distdir).tar.gz | $(am__untar) ;;\ + *.tar.bz2*) \ + bzip2 -dc $(distdir).tar.bz2 | $(am__untar) ;;\ + *.tar.lz*) \ + lzip -dc $(distdir).tar.lz | $(am__untar) ;;\ + *.tar.xz*) \ + xz -dc $(distdir).tar.xz | $(am__untar) ;;\ + *.tar.Z*) \ + uncompress -c $(distdir).tar.Z | $(am__untar) ;;\ + *.shar.gz*) \ + eval GZIP= gzip $(GZIP_ENV) -dc $(distdir).shar.gz | unshar ;;\ + *.zip*) \ + unzip $(distdir).zip ;;\ + *.tar.zst*) \ + zstd -dc $(distdir).tar.zst | $(am__untar) ;;\ + esac + chmod -R a-w $(distdir) + chmod u+w $(distdir) + mkdir $(distdir)/_build $(distdir)/_build/sub $(distdir)/_inst + chmod a-w $(distdir) + test -d $(distdir)/_build || exit 0; \ + dc_install_base=`$(am__cd) $(distdir)/_inst && pwd | sed -e 's,^[^:\\/]:[\\/],/,'` \ + && dc_destdir="$${TMPDIR-/tmp}/am-dc-$$$$/" \ + && am__cwd=`pwd` \ + && $(am__cd) $(distdir)/_build/sub \ + && ../../configure \ + $(AM_DISTCHECK_CONFIGURE_FLAGS) \ + $(DISTCHECK_CONFIGURE_FLAGS) \ + --srcdir=../.. --prefix="$$dc_install_base" \ + && $(MAKE) $(AM_MAKEFLAGS) \ + && $(MAKE) $(AM_MAKEFLAGS) $(AM_DISTCHECK_DVI_TARGET) \ + && $(MAKE) $(AM_MAKEFLAGS) check \ + && $(MAKE) $(AM_MAKEFLAGS) install \ + && $(MAKE) $(AM_MAKEFLAGS) installcheck \ + && $(MAKE) $(AM_MAKEFLAGS) uninstall \ + && $(MAKE) $(AM_MAKEFLAGS) distuninstallcheck_dir="$$dc_install_base" \ + distuninstallcheck \ + && chmod -R a-w "$$dc_install_base" \ + && ({ \ + (cd ../.. && umask 077 && mkdir "$$dc_destdir") \ + && $(MAKE) $(AM_MAKEFLAGS) DESTDIR="$$dc_destdir" install \ + && $(MAKE) $(AM_MAKEFLAGS) DESTDIR="$$dc_destdir" uninstall \ + && $(MAKE) $(AM_MAKEFLAGS) DESTDIR="$$dc_destdir" \ + distuninstallcheck_dir="$$dc_destdir" distuninstallcheck; \ + } || { rm -rf "$$dc_destdir"; exit 1; }) \ + && rm -rf "$$dc_destdir" \ + && $(MAKE) $(AM_MAKEFLAGS) dist \ + && rm -rf $(DIST_ARCHIVES) \ + && $(MAKE) $(AM_MAKEFLAGS) distcleancheck \ + && cd "$$am__cwd" \ + || exit 1 + $(am__post_remove_distdir) + @(echo "$(distdir) archives ready for distribution: "; \ + list='$(DIST_ARCHIVES)'; for i in $$list; do echo $$i; done) | \ + sed -e 1h -e 1s/./=/g -e 1p -e 1x -e '$$p' -e '$$x' +distuninstallcheck: + @test -n '$(distuninstallcheck_dir)' || { \ + echo 'ERROR: trying to run $@ with an empty' \ + '$$(distuninstallcheck_dir)' >&2; \ + exit 1; \ + }; \ + $(am__cd) '$(distuninstallcheck_dir)' || { \ + echo 'ERROR: cannot chdir into $(distuninstallcheck_dir)' >&2; \ + exit 1; \ + }; \ + test `$(am__distuninstallcheck_listfiles) | wc -l` -eq 0 \ + || { echo "ERROR: files left after uninstall:" ; \ + if test -n "$(DESTDIR)"; then \ + echo " (check DESTDIR support)"; \ + fi ; \ + $(distuninstallcheck_listfiles) ; \ + exit 1; } >&2 +distcleancheck: distclean + @if test '$(srcdir)' = . ; then \ + echo "ERROR: distcleancheck can only run from a VPATH build" ; \ + exit 1 ; \ + fi + @test `$(distcleancheck_listfiles) | wc -l` -eq 0 \ + || { echo "ERROR: files left in build directory after distclean:" ; \ + $(distcleancheck_listfiles) ; \ + exit 1; } >&2 +check-am: all-am + $(MAKE) $(AM_MAKEFLAGS) $(check_PROGRAMS) \ + $(dist_check_SCRIPTS) + $(MAKE) $(AM_MAKEFLAGS) check-TESTS +check: check-recursive +all-am: Makefile $(LIBRARIES) mpfi_config.h +installdirs: installdirs-recursive +installdirs-am: +install: install-recursive +install-exec: install-exec-recursive +install-data: install-data-recursive +uninstall: uninstall-recursive + +install-am: all-am + @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am + +installcheck: installcheck-recursive +install-strip: + if test -z '$(STRIP)'; then \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + install; \ + else \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \ + fi +mostlyclean-generic: + -test -z "$(TEST_LOGS)" || rm -f $(TEST_LOGS) + -test -z "$(TEST_LOGS:.log=.trs)" || rm -f $(TEST_LOGS:.log=.trs) + -test -z "$(TEST_SUITE_LOG)" || rm -f $(TEST_SUITE_LOG) + +clean-generic: + -test -z "$(CLEANFILES)" || rm -f $(CLEANFILES) + +distclean-generic: + -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) + -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + -rm -f @MPFI_TREE@/src/$(DEPDIR)/$(am__dirstamp) + -rm -f @MPFI_TREE@/src/$(am__dirstamp) + -test -z "$(DISTCLEANFILES)" || rm -f $(DISTCLEANFILES) + +maintainer-clean-generic: + @echo "This command is intended for maintainers to use" + @echo "it deletes files that may require special tools to rebuild." +clean: clean-recursive + +clean-am: clean-checkPROGRAMS clean-generic clean-noinstLIBRARIES \ + mostlyclean-am + +distclean: distclean-recursive + -rm -f $(am__CONFIG_DISTCLEAN_FILES) + -rm -f ./$(DEPDIR)/mpfitest-mpfitest.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/abs.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/acos.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/acosh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/alea.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/asin.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/asinh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/atan.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/atan2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/atanh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/bisect.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/blow.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cbrt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/clear.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/clears.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cmp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cmp_sym_pi.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/constants.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cos.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cosh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cot.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/coth.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/csc.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/csch.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/d_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/d_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/diam.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_2exp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_2si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_2ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_ext.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/erandom.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/error.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp10.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp10m1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp2m1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/expm1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/fr_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/fr_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_endpoints.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_prec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_version.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/has_zero.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/hypot.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/increase.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/init.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/init2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inits.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inits2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inp_str.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/intersect.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inv.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/is_empty.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/is_inside.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log10.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log10p1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log1p.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log2p1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mag.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mid.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mig.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_2exp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_2si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_2ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/neg.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/nrandom.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/out_str.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/predicates.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/print_binary.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/q_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/q_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/quadrant.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/rec_sqrt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/revert_if_needed.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/round_prec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sech.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_flt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_ld.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_prec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_str.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/si_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/si_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sign.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sin.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sinh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sqr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sqrt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/swap.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/tan.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/tanh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/ui_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/ui_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/union.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/urandom.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/z_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/z_sub.Po + -rm -f Makefile +distclean-am: clean-am distclean-compile distclean-generic \ + distclean-hdr distclean-tags + +dvi: dvi-recursive + +dvi-am: + +html: html-recursive + +html-am: + +info: info-recursive + +info-am: + +install-data-am: + +install-dvi: install-dvi-recursive + +install-dvi-am: + +install-exec-am: + +install-html: install-html-recursive + +install-html-am: + +install-info: install-info-recursive + +install-info-am: + +install-man: + +install-pdf: install-pdf-recursive + +install-pdf-am: + +install-ps: install-ps-recursive + +install-ps-am: + +installcheck-am: + +maintainer-clean: maintainer-clean-recursive + -rm -f $(am__CONFIG_DISTCLEAN_FILES) + -rm -rf $(top_srcdir)/autom4te.cache + -rm -f ./$(DEPDIR)/mpfitest-mpfitest.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/abs.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/acos.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/acosh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/add_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/alea.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/asin.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/asinh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/atan.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/atan2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/atanh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/bisect.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/blow.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cbrt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/clear.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/clears.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cmp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cmp_sym_pi.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/constants.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cos.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cosh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/cot.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/coth.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/csc.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/csch.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/d_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/d_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/diam.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_2exp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_2si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_2ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_ext.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/div_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/erandom.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/error.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp10.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp10m1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/exp2m1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/expm1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/fr_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/fr_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_endpoints.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_prec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/get_version.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/has_zero.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/hypot.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/increase.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/init.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/init2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inits.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inits2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inp_str.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/intersect.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/interv_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/inv.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/is_empty.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/is_inside.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log10.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log10p1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log1p.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log2.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/log2p1.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mag.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mid.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mig.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_2exp.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_2si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_2ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/mul_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/neg.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/nrandom.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/out_str.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/predicates.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/print_binary.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/put_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/q_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/q_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/quadrant.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/rec_sqrt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/revert_if_needed.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/round_prec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sech.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_flt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_ld.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_prec.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_str.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/set_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/si_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/si_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sign.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sin.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sinh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sqr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sqrt.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_d.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_fr.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_q.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_si.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_ui.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/sub_z.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/swap.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/tan.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/tanh.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/ui_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/ui_sub.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/union.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/urandom.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/z_div.Po + -rm -f @MPFI_TREE@/src/$(DEPDIR)/z_sub.Po + -rm -f Makefile +maintainer-clean-am: distclean-am maintainer-clean-generic + +mostlyclean: mostlyclean-recursive + +mostlyclean-am: mostlyclean-compile mostlyclean-generic + +pdf: pdf-recursive + +pdf-am: + +ps: ps-recursive + +ps-am: + +uninstall-am: + +.MAKE: $(am__recursive_targets) all check-am install-am install-strip + +.PHONY: $(am__recursive_targets) CTAGS GTAGS TAGS all all-am \ + am--depfiles am--refresh check check-TESTS check-am clean \ + clean-checkPROGRAMS clean-cscope clean-generic \ + clean-noinstLIBRARIES cscope cscopelist-am ctags ctags-am dist \ + dist-all dist-bzip2 dist-gzip dist-hook dist-lzip dist-shar \ + dist-tarZ dist-xz dist-zip dist-zstd distcheck distclean \ + distclean-compile distclean-generic distclean-hdr \ + distclean-tags distcleancheck distdir distuninstallcheck dvi \ + dvi-am html html-am info info-am install install-am \ + install-data install-data-am install-dvi install-dvi-am \ + install-exec install-exec-am install-html install-html-am \ + install-info install-info-am install-man install-pdf \ + install-pdf-am install-ps install-ps-am install-strip \ + installcheck installcheck-am installdirs installdirs-am \ + maintainer-clean maintainer-clean-generic mostlyclean \ + mostlyclean-compile mostlyclean-generic pdf pdf-am ps ps-am \ + recheck tags tags-am uninstall uninstall-am + +.PRECIOUS: Makefile + +dist-hook: + cd "$(distdir)" && rm -rf $(NEVER_DIST) +$(libmpfi_a_OBJECTS): $(GMP_DEPEND) +mpfi.log: mpfitest$(EXEEXT) + +@GMP_RULE@ + +@MPFR_RULE@ +config.force: $(reconfig_prereq) + @if test -f $@; then :; else \ + trap 'rm -rf reconfig.lock' 1 2 13 15; \ + if mkdir reconfig.lock 2>/dev/null; then \ + echo timestamp >$@; \ + $(SHELL) ./config.status --recheck; \ + rmdir reconfig.lock; \ + else \ + while test -d rebuild.lock && test -z "$$dry"; do sleep 1; done; \ + test -f $@; \ + fi; \ + fi +rebuild.stamp: $(rebuild_target) + echo timestamp >$@ + +.PHONY: rebuild +rebuild: $(rebuild_prereq) + @dry=; for f in x $$MAKEFLAGS; do \ + case $$f in \ + *=*|--*);; \ + *n*) dry=:;; \ + esac; \ + done; \ + if test -f rebuild.stamp; then :; else \ + $$dry trap 'rm -rf rebuild.lock' 1 2 13 15; \ + if $$dry mkdir rebuild.lock 2>/dev/null; then \ + $(MAKE) $(AM_MAKEFLAGS) rebuild.stamp; \ + $$dry rmdir rebuild.lock; \ + else \ + while test -d rebuild.lock && test -z "$$dry"; do sleep 1; done; \ + fi; \ + $$dry test -f rebuild.stamp; exit $$?; \ + fi + +# Tell versions [3.59,3.63) of GNU make to not export all variables. +# Otherwise a system limit (for SysV at least) may be exceeded. +.NOEXPORT: diff --git a/Build/source/libs/mpfi/TLpatches/TL-Changes b/Build/source/libs/mpfi/TLpatches/TL-Changes new file mode 100644 index 00000000000..a5296cde638 --- /dev/null +++ b/Build/source/libs/mpfi/TLpatches/TL-Changes @@ -0,0 +1,7 @@ +Changes applied to the mpfi source tree as obtained from: + https://perso.ens-lyon.fr/nathalie.revol/software.html#download + +Removed: + COPYING COPYING.LESSER INSTALL Makefile.in aclocal.m4 ar-lib compile + config.guess config.sub configure depcomp install-sh ltmain.sh missing + test-driver diff --git a/Build/source/libs/mpfi/ac/withenable.ac b/Build/source/libs/mpfi/ac/withenable.ac new file mode 100644 index 00000000000..6d4a2450a1b --- /dev/null +++ b/Build/source/libs/mpfi/ac/withenable.ac @@ -0,0 +1,7 @@ +## libs/mpfi/ac/withenable.ac: configure.ac fragment for the TeX Live subdirectory libs/mpfi/ +dnl +dnl Copyright (C) 2022 Luigi Scarso +dnl You may freely use, modify and/or distribute this file. +dnl +## configure options and TL libraries required for mpfi +KPSE_WITH_LIB([mpfi], [mpfr], [gmp]) diff --git a/Build/source/libs/mpfi/aclocal.m4 b/Build/source/libs/mpfi/aclocal.m4 new file mode 100644 index 00000000000..25a303fe5bf --- /dev/null +++ b/Build/source/libs/mpfi/aclocal.m4 @@ -0,0 +1,1191 @@ +# generated automatically by aclocal 1.16.5 -*- Autoconf -*- + +# Copyright (C) 1996-2021 Free Software Foundation, Inc. + +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +m4_ifndef([AC_CONFIG_MACRO_DIRS], [m4_defun([_AM_CONFIG_MACRO_DIRS], [])m4_defun([AC_CONFIG_MACRO_DIRS], [_AM_CONFIG_MACRO_DIRS($@)])]) +m4_ifndef([AC_AUTOCONF_VERSION], + [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl +m4_if(m4_defn([AC_AUTOCONF_VERSION]), [2.72],, +[m4_warning([this file was generated for autoconf 2.72. +You have another version of autoconf. It may work, but is not guaranteed to. +If you have problems, you may need to regenerate the build system entirely. +To do so, use the procedure documented by the package, typically 'autoreconf'.])]) + +# Copyright (C) 2002-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_AUTOMAKE_VERSION(VERSION) +# ---------------------------- +# Automake X.Y traces this macro to ensure aclocal.m4 has been +# generated from the m4 files accompanying Automake X.Y. +# (This private macro should not be called outside this file.) +AC_DEFUN([AM_AUTOMAKE_VERSION], +[am__api_version='1.16' +dnl Some users find AM_AUTOMAKE_VERSION and mistake it for a way to +dnl require some minimum version. Point them to the right macro. +m4_if([$1], [1.16.5], [], + [AC_FATAL([Do not call $0, use AM_INIT_AUTOMAKE([$1]).])])dnl +]) + +# _AM_AUTOCONF_VERSION(VERSION) +# ----------------------------- +# aclocal traces this macro to find the Autoconf version. +# This is a private macro too. Using m4_define simplifies +# the logic in aclocal, which can simply ignore this definition. +m4_define([_AM_AUTOCONF_VERSION], []) + +# AM_SET_CURRENT_AUTOMAKE_VERSION +# ------------------------------- +# Call AM_AUTOMAKE_VERSION and AM_AUTOMAKE_VERSION so they can be traced. +# This function is AC_REQUIREd by AM_INIT_AUTOMAKE. +AC_DEFUN([AM_SET_CURRENT_AUTOMAKE_VERSION], +[AM_AUTOMAKE_VERSION([1.16.5])dnl +m4_ifndef([AC_AUTOCONF_VERSION], + [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl +_AM_AUTOCONF_VERSION(m4_defn([AC_AUTOCONF_VERSION]))]) + +# AM_AUX_DIR_EXPAND -*- Autoconf -*- + +# Copyright (C) 2001-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# For projects using AC_CONFIG_AUX_DIR([foo]), Autoconf sets +# $ac_aux_dir to '$srcdir/foo'. In other projects, it is set to +# '$srcdir', '$srcdir/..', or '$srcdir/../..'. +# +# Of course, Automake must honor this variable whenever it calls a +# tool from the auxiliary directory. The problem is that $srcdir (and +# therefore $ac_aux_dir as well) can be either absolute or relative, +# depending on how configure is run. This is pretty annoying, since +# it makes $ac_aux_dir quite unusable in subdirectories: in the top +# source directory, any form will work fine, but in subdirectories a +# relative path needs to be adjusted first. +# +# $ac_aux_dir/missing +# fails when called from a subdirectory if $ac_aux_dir is relative +# $top_srcdir/$ac_aux_dir/missing +# fails if $ac_aux_dir is absolute, +# fails when called from a subdirectory in a VPATH build with +# a relative $ac_aux_dir +# +# The reason of the latter failure is that $top_srcdir and $ac_aux_dir +# are both prefixed by $srcdir. In an in-source build this is usually +# harmless because $srcdir is '.', but things will broke when you +# start a VPATH build or use an absolute $srcdir. +# +# So we could use something similar to $top_srcdir/$ac_aux_dir/missing, +# iff we strip the leading $srcdir from $ac_aux_dir. That would be: +# am_aux_dir='\$(top_srcdir)/'`expr "$ac_aux_dir" : "$srcdir//*\(.*\)"` +# and then we would define $MISSING as +# MISSING="\${SHELL} $am_aux_dir/missing" +# This will work as long as MISSING is not called from configure, because +# unfortunately $(top_srcdir) has no meaning in configure. +# However there are other variables, like CC, which are often used in +# configure, and could therefore not use this "fixed" $ac_aux_dir. +# +# Another solution, used here, is to always expand $ac_aux_dir to an +# absolute PATH. The drawback is that using absolute paths prevent a +# configured tree to be moved without reconfiguration. + +AC_DEFUN([AM_AUX_DIR_EXPAND], +[AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT])dnl +# Expand $ac_aux_dir to an absolute path. +am_aux_dir=`cd "$ac_aux_dir" && pwd` +]) + +# AM_CONDITIONAL -*- Autoconf -*- + +# Copyright (C) 1997-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_CONDITIONAL(NAME, SHELL-CONDITION) +# ------------------------------------- +# Define a conditional. +AC_DEFUN([AM_CONDITIONAL], +[AC_PREREQ([2.52])dnl + m4_if([$1], [TRUE], [AC_FATAL([$0: invalid condition: $1])], + [$1], [FALSE], [AC_FATAL([$0: invalid condition: $1])])dnl +AC_SUBST([$1_TRUE])dnl +AC_SUBST([$1_FALSE])dnl +_AM_SUBST_NOTMAKE([$1_TRUE])dnl +_AM_SUBST_NOTMAKE([$1_FALSE])dnl +m4_define([_AM_COND_VALUE_$1], [$2])dnl +if $2; then + $1_TRUE= + $1_FALSE='#' +else + $1_TRUE='#' + $1_FALSE= +fi +AC_CONFIG_COMMANDS_PRE( +[if test -z "${$1_TRUE}" && test -z "${$1_FALSE}"; then + AC_MSG_ERROR([[conditional "$1" was never defined. +Usually this means the macro was only invoked conditionally.]]) +fi])]) + +# Copyright (C) 1999-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + + +# There are a few dirty hacks below to avoid letting 'AC_PROG_CC' be +# written in clear, in which case automake, when reading aclocal.m4, +# will think it sees a *use*, and therefore will trigger all it's +# C support machinery. Also note that it means that autoscan, seeing +# CC etc. in the Makefile, will ask for an AC_PROG_CC use... + + +# _AM_DEPENDENCIES(NAME) +# ---------------------- +# See how the compiler implements dependency checking. +# NAME is "CC", "CXX", "OBJC", "OBJCXX", "UPC", or "GJC". +# We try a few techniques and use that to set a single cache variable. +# +# We don't AC_REQUIRE the corresponding AC_PROG_CC since the latter was +# modified to invoke _AM_DEPENDENCIES(CC); we would have a circular +# dependency, and given that the user is not expected to run this macro, +# just rely on AC_PROG_CC. +AC_DEFUN([_AM_DEPENDENCIES], +[AC_REQUIRE([AM_SET_DEPDIR])dnl +AC_REQUIRE([AM_OUTPUT_DEPENDENCY_COMMANDS])dnl +AC_REQUIRE([AM_MAKE_INCLUDE])dnl +AC_REQUIRE([AM_DEP_TRACK])dnl + +m4_if([$1], [CC], [depcc="$CC" am_compiler_list=], + [$1], [CXX], [depcc="$CXX" am_compiler_list=], + [$1], [OBJC], [depcc="$OBJC" am_compiler_list='gcc3 gcc'], + [$1], [OBJCXX], [depcc="$OBJCXX" am_compiler_list='gcc3 gcc'], + [$1], [UPC], [depcc="$UPC" am_compiler_list=], + [$1], [GCJ], [depcc="$GCJ" am_compiler_list='gcc3 gcc'], + [depcc="$$1" am_compiler_list=]) + +AC_CACHE_CHECK([dependency style of $depcc], + [am_cv_$1_dependencies_compiler_type], +[if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then + # We make a subdir and do the tests there. Otherwise we can end up + # making bogus files that we don't know about and never remove. For + # instance it was reported that on HP-UX the gcc test will end up + # making a dummy file named 'D' -- because '-MD' means "put the output + # in D". + rm -rf conftest.dir + mkdir conftest.dir + # Copy depcomp to subdir because otherwise we won't find it if we're + # using a relative directory. + cp "$am_depcomp" conftest.dir + cd conftest.dir + # We will build objects and dependencies in a subdirectory because + # it helps to detect inapplicable dependency modes. For instance + # both Tru64's cc and ICC support -MD to output dependencies as a + # side effect of compilation, but ICC will put the dependencies in + # the current directory while Tru64 will put them in the object + # directory. + mkdir sub + + am_cv_$1_dependencies_compiler_type=none + if test "$am_compiler_list" = ""; then + am_compiler_list=`sed -n ['s/^#*\([a-zA-Z0-9]*\))$/\1/p'] < ./depcomp` + fi + am__universal=false + m4_case([$1], [CC], + [case " $depcc " in #( + *\ -arch\ *\ -arch\ *) am__universal=true ;; + esac], + [CXX], + [case " $depcc " in #( + *\ -arch\ *\ -arch\ *) am__universal=true ;; + esac]) + + for depmode in $am_compiler_list; do + # Setup a source with many dependencies, because some compilers + # like to wrap large dependency lists on column 80 (with \), and + # we should not choose a depcomp mode which is confused by this. + # + # We need to recreate these files for each test, as the compiler may + # overwrite some of them when testing with obscure command lines. + # This happens at least with the AIX C compiler. + : > sub/conftest.c + for i in 1 2 3 4 5 6; do + echo '#include "conftst'$i'.h"' >> sub/conftest.c + # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with + # Solaris 10 /bin/sh. + echo '/* dummy */' > sub/conftst$i.h + done + echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf + + # We check with '-c' and '-o' for the sake of the "dashmstdout" + # mode. It turns out that the SunPro C++ compiler does not properly + # handle '-M -o', and we need to detect this. Also, some Intel + # versions had trouble with output in subdirs. + am__obj=sub/conftest.${OBJEXT-o} + am__minus_obj="-o $am__obj" + case $depmode in + gcc) + # This depmode causes a compiler race in universal mode. + test "$am__universal" = false || continue + ;; + nosideeffect) + # After this tag, mechanisms are not by side-effect, so they'll + # only be used when explicitly requested. + if test "x$enable_dependency_tracking" = xyes; then + continue + else + break + fi + ;; + msvc7 | msvc7msys | msvisualcpp | msvcmsys) + # This compiler won't grok '-c -o', but also, the minuso test has + # not run yet. These depmodes are late enough in the game, and + # so weak that their functioning should not be impacted. + am__obj=conftest.${OBJEXT-o} + am__minus_obj= + ;; + none) break ;; + esac + if depmode=$depmode \ + source=sub/conftest.c object=$am__obj \ + depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ + $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ + >/dev/null 2>conftest.err && + grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && + grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && + grep $am__obj sub/conftest.Po > /dev/null 2>&1 && + ${MAKE-make} -s -f confmf > /dev/null 2>&1; then + # icc doesn't choke on unknown options, it will just issue warnings + # or remarks (even with -Werror). So we grep stderr for any message + # that says an option was ignored or not supported. + # When given -MP, icc 7.0 and 7.1 complain thusly: + # icc: Command line warning: ignoring option '-M'; no argument required + # The diagnosis changed in icc 8.0: + # icc: Command line remark: option '-MP' not supported + if (grep 'ignoring option' conftest.err || + grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else + am_cv_$1_dependencies_compiler_type=$depmode + break + fi + fi + done + + cd .. + rm -rf conftest.dir +else + am_cv_$1_dependencies_compiler_type=none +fi +]) +AC_SUBST([$1DEPMODE], [depmode=$am_cv_$1_dependencies_compiler_type]) +AM_CONDITIONAL([am__fastdep$1], [ + test "x$enable_dependency_tracking" != xno \ + && test "$am_cv_$1_dependencies_compiler_type" = gcc3]) +]) + + +# AM_SET_DEPDIR +# ------------- +# Choose a directory name for dependency files. +# This macro is AC_REQUIREd in _AM_DEPENDENCIES. +AC_DEFUN([AM_SET_DEPDIR], +[AC_REQUIRE([AM_SET_LEADING_DOT])dnl +AC_SUBST([DEPDIR], ["${am__leading_dot}deps"])dnl +]) + + +# AM_DEP_TRACK +# ------------ +AC_DEFUN([AM_DEP_TRACK], +[AC_ARG_ENABLE([dependency-tracking], [dnl +AS_HELP_STRING( + [--enable-dependency-tracking], + [do not reject slow dependency extractors]) +AS_HELP_STRING( + [--disable-dependency-tracking], + [speeds up one-time build])]) +if test "x$enable_dependency_tracking" != xno; then + am_depcomp="$ac_aux_dir/depcomp" + AMDEPBACKSLASH='\' + am__nodep='_no' +fi +AM_CONDITIONAL([AMDEP], [test "x$enable_dependency_tracking" != xno]) +AC_SUBST([AMDEPBACKSLASH])dnl +_AM_SUBST_NOTMAKE([AMDEPBACKSLASH])dnl +AC_SUBST([am__nodep])dnl +_AM_SUBST_NOTMAKE([am__nodep])dnl +]) + +# Generate code to set up dependency tracking. -*- Autoconf -*- + +# Copyright (C) 1999-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# _AM_OUTPUT_DEPENDENCY_COMMANDS +# ------------------------------ +AC_DEFUN([_AM_OUTPUT_DEPENDENCY_COMMANDS], +[{ + # Older Autoconf quotes --file arguments for eval, but not when files + # are listed without --file. Let's play safe and only enable the eval + # if we detect the quoting. + # TODO: see whether this extra hack can be removed once we start + # requiring Autoconf 2.70 or later. + AS_CASE([$CONFIG_FILES], + [*\'*], [eval set x "$CONFIG_FILES"], + [*], [set x $CONFIG_FILES]) + shift + # Used to flag and report bootstrapping failures. + am_rc=0 + for am_mf + do + # Strip MF so we end up with the name of the file. + am_mf=`AS_ECHO(["$am_mf"]) | sed -e 's/:.*$//'` + # Check whether this is an Automake generated Makefile which includes + # dependency-tracking related rules and includes. + # Grep'ing the whole file directly is not great: AIX grep has a line + # limit of 2048, but all sed's we know have understand at least 4000. + sed -n 's,^am--depfiles:.*,X,p' "$am_mf" | grep X >/dev/null 2>&1 \ + || continue + am_dirpart=`AS_DIRNAME(["$am_mf"])` + am_filepart=`AS_BASENAME(["$am_mf"])` + AM_RUN_LOG([cd "$am_dirpart" \ + && sed -e '/# am--include-marker/d' "$am_filepart" \ + | $MAKE -f - am--depfiles]) || am_rc=$? + done + if test $am_rc -ne 0; then + AC_MSG_FAILURE([Something went wrong bootstrapping makefile fragments + for automatic dependency tracking. If GNU make was not used, consider + re-running the configure script with MAKE="gmake" (or whatever is + necessary). You can also try re-running configure with the + '--disable-dependency-tracking' option to at least be able to build + the package (albeit without support for automatic dependency tracking).]) + fi + AS_UNSET([am_dirpart]) + AS_UNSET([am_filepart]) + AS_UNSET([am_mf]) + AS_UNSET([am_rc]) + rm -f conftest-deps.mk +} +])# _AM_OUTPUT_DEPENDENCY_COMMANDS + + +# AM_OUTPUT_DEPENDENCY_COMMANDS +# ----------------------------- +# This macro should only be invoked once -- use via AC_REQUIRE. +# +# This code is only required when automatic dependency tracking is enabled. +# This creates each '.Po' and '.Plo' makefile fragment that we'll need in +# order to bootstrap the dependency handling code. +AC_DEFUN([AM_OUTPUT_DEPENDENCY_COMMANDS], +[AC_CONFIG_COMMANDS([depfiles], + [test x"$AMDEP_TRUE" != x"" || _AM_OUTPUT_DEPENDENCY_COMMANDS], + [AMDEP_TRUE="$AMDEP_TRUE" MAKE="${MAKE-make}"])]) + +# Do all the work for Automake. -*- Autoconf -*- + +# Copyright (C) 1996-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This macro actually does too much. Some checks are only needed if +# your package does certain things. But this isn't really a big deal. + +dnl Redefine AC_PROG_CC to automatically invoke _AM_PROG_CC_C_O. +m4_define([AC_PROG_CC], +m4_defn([AC_PROG_CC]) +[_AM_PROG_CC_C_O +]) + +# AM_INIT_AUTOMAKE(PACKAGE, VERSION, [NO-DEFINE]) +# AM_INIT_AUTOMAKE([OPTIONS]) +# ----------------------------------------------- +# The call with PACKAGE and VERSION arguments is the old style +# call (pre autoconf-2.50), which is being phased out. PACKAGE +# and VERSION should now be passed to AC_INIT and removed from +# the call to AM_INIT_AUTOMAKE. +# We support both call styles for the transition. After +# the next Automake release, Autoconf can make the AC_INIT +# arguments mandatory, and then we can depend on a new Autoconf +# release and drop the old call support. +AC_DEFUN([AM_INIT_AUTOMAKE], +[AC_PREREQ([2.65])dnl +m4_ifdef([_$0_ALREADY_INIT], + [m4_fatal([$0 expanded multiple times +]m4_defn([_$0_ALREADY_INIT]))], + [m4_define([_$0_ALREADY_INIT], m4_expansion_stack)])dnl +dnl Autoconf wants to disallow AM_ names. We explicitly allow +dnl the ones we care about. +m4_pattern_allow([^AM_[A-Z]+FLAGS$])dnl +AC_REQUIRE([AM_SET_CURRENT_AUTOMAKE_VERSION])dnl +AC_REQUIRE([AC_PROG_INSTALL])dnl +if test "`cd $srcdir && pwd`" != "`pwd`"; then + # Use -I$(srcdir) only when $(srcdir) != ., so that make's output + # is not polluted with repeated "-I." + AC_SUBST([am__isrc], [' -I$(srcdir)'])_AM_SUBST_NOTMAKE([am__isrc])dnl + # test to see if srcdir already configured + if test -f $srcdir/config.status; then + AC_MSG_ERROR([source directory already configured; run "make distclean" there first]) + fi +fi + +# test whether we have cygpath +if test -z "$CYGPATH_W"; then + if (cygpath --version) >/dev/null 2>/dev/null; then + CYGPATH_W='cygpath -w' + else + CYGPATH_W=echo + fi +fi +AC_SUBST([CYGPATH_W]) + +# Define the identity of the package. +dnl Distinguish between old-style and new-style calls. +m4_ifval([$2], +[AC_DIAGNOSE([obsolete], + [$0: two- and three-arguments forms are deprecated.]) +m4_ifval([$3], [_AM_SET_OPTION([no-define])])dnl + AC_SUBST([PACKAGE], [$1])dnl + AC_SUBST([VERSION], [$2])], +[_AM_SET_OPTIONS([$1])dnl +dnl Diagnose old-style AC_INIT with new-style AM_AUTOMAKE_INIT. +m4_if( + m4_ifset([AC_PACKAGE_NAME], [ok]):m4_ifset([AC_PACKAGE_VERSION], [ok]), + [ok:ok],, + [m4_fatal([AC_INIT should be called with package and version arguments])])dnl + AC_SUBST([PACKAGE], ['AC_PACKAGE_TARNAME'])dnl + AC_SUBST([VERSION], ['AC_PACKAGE_VERSION'])])dnl + +_AM_IF_OPTION([no-define],, +[AC_DEFINE_UNQUOTED([PACKAGE], ["$PACKAGE"], [Name of package]) + AC_DEFINE_UNQUOTED([VERSION], ["$VERSION"], [Version number of package])])dnl + +# Some tools Automake needs. +AC_REQUIRE([AM_SANITY_CHECK])dnl +AC_REQUIRE([AC_ARG_PROGRAM])dnl +AM_MISSING_PROG([ACLOCAL], [aclocal-${am__api_version}]) +AM_MISSING_PROG([AUTOCONF], [autoconf]) +AM_MISSING_PROG([AUTOMAKE], [automake-${am__api_version}]) +AM_MISSING_PROG([AUTOHEADER], [autoheader]) +AM_MISSING_PROG([MAKEINFO], [makeinfo]) +AC_REQUIRE([AM_PROG_INSTALL_SH])dnl +AC_REQUIRE([AM_PROG_INSTALL_STRIP])dnl +AC_REQUIRE([AC_PROG_MKDIR_P])dnl +# For better backward compatibility. To be removed once Automake 1.9.x +# dies out for good. For more background, see: +# +# +AC_SUBST([mkdir_p], ['$(MKDIR_P)']) +# We need awk for the "check" target (and possibly the TAP driver). The +# system "awk" is bad on some platforms. +AC_REQUIRE([AC_PROG_AWK])dnl +AC_REQUIRE([AC_PROG_MAKE_SET])dnl +AC_REQUIRE([AM_SET_LEADING_DOT])dnl +_AM_IF_OPTION([tar-ustar], [_AM_PROG_TAR([ustar])], + [_AM_IF_OPTION([tar-pax], [_AM_PROG_TAR([pax])], + [_AM_PROG_TAR([v7])])]) +_AM_IF_OPTION([no-dependencies],, +[AC_PROVIDE_IFELSE([AC_PROG_CC], + [_AM_DEPENDENCIES([CC])], + [m4_define([AC_PROG_CC], + m4_defn([AC_PROG_CC])[_AM_DEPENDENCIES([CC])])])dnl +AC_PROVIDE_IFELSE([AC_PROG_CXX], + [_AM_DEPENDENCIES([CXX])], + [m4_define([AC_PROG_CXX], + m4_defn([AC_PROG_CXX])[_AM_DEPENDENCIES([CXX])])])dnl +AC_PROVIDE_IFELSE([AC_PROG_OBJC], + [_AM_DEPENDENCIES([OBJC])], + [m4_define([AC_PROG_OBJC], + m4_defn([AC_PROG_OBJC])[_AM_DEPENDENCIES([OBJC])])])dnl +AC_PROVIDE_IFELSE([AC_PROG_OBJCXX], + [_AM_DEPENDENCIES([OBJCXX])], + [m4_define([AC_PROG_OBJCXX], + m4_defn([AC_PROG_OBJCXX])[_AM_DEPENDENCIES([OBJCXX])])])dnl +]) +# Variables for tags utilities; see am/tags.am +if test -z "$CTAGS"; then + CTAGS=ctags +fi +AC_SUBST([CTAGS]) +if test -z "$ETAGS"; then + ETAGS=etags +fi +AC_SUBST([ETAGS]) +if test -z "$CSCOPE"; then + CSCOPE=cscope +fi +AC_SUBST([CSCOPE]) + +AC_REQUIRE([AM_SILENT_RULES])dnl +dnl The testsuite driver may need to know about EXEEXT, so add the +dnl 'am__EXEEXT' conditional if _AM_COMPILER_EXEEXT was seen. This +dnl macro is hooked onto _AC_COMPILER_EXEEXT early, see below. +AC_CONFIG_COMMANDS_PRE(dnl +[m4_provide_if([_AM_COMPILER_EXEEXT], + [AM_CONDITIONAL([am__EXEEXT], [test -n "$EXEEXT"])])])dnl + +# POSIX will say in a future version that running "rm -f" with no argument +# is OK; and we want to be able to make that assumption in our Makefile +# recipes. So use an aggressive probe to check that the usage we want is +# actually supported "in the wild" to an acceptable degree. +# See automake bug#10828. +# To make any issue more visible, cause the running configure to be aborted +# by default if the 'rm' program in use doesn't match our expectations; the +# user can still override this though. +if rm -f && rm -fr && rm -rf; then : OK; else + cat >&2 <<'END' +Oops! + +Your 'rm' program seems unable to run without file operands specified +on the command line, even when the '-f' option is present. This is contrary +to the behaviour of most rm programs out there, and not conforming with +the upcoming POSIX standard: + +Please tell bug-automake@gnu.org about your system, including the value +of your $PATH and any error possibly output before this message. This +can help us improve future automake versions. + +END + if test x"$ACCEPT_INFERIOR_RM_PROGRAM" = x"yes"; then + echo 'Configuration will proceed anyway, since you have set the' >&2 + echo 'ACCEPT_INFERIOR_RM_PROGRAM variable to "yes"' >&2 + echo >&2 + else + cat >&2 <<'END' +Aborting the configuration process, to ensure you take notice of the issue. + +You can download and install GNU coreutils to get an 'rm' implementation +that behaves properly: . + +If you want to complete the configuration process using your problematic +'rm' anyway, export the environment variable ACCEPT_INFERIOR_RM_PROGRAM +to "yes", and re-run configure. + +END + AC_MSG_ERROR([Your 'rm' program is bad, sorry.]) + fi +fi +dnl The trailing newline in this macro's definition is deliberate, for +dnl backward compatibility and to allow trailing 'dnl'-style comments +dnl after the AM_INIT_AUTOMAKE invocation. See automake bug#16841. +]) + +dnl Hook into '_AC_COMPILER_EXEEXT' early to learn its expansion. Do not +dnl add the conditional right here, as _AC_COMPILER_EXEEXT may be further +dnl mangled by Autoconf and run in a shell conditional statement. +m4_define([_AC_COMPILER_EXEEXT], +m4_defn([_AC_COMPILER_EXEEXT])[m4_provide([_AM_COMPILER_EXEEXT])]) + +# When config.status generates a header, we must update the stamp-h file. +# This file resides in the same directory as the config header +# that is generated. The stamp files are numbered to have different names. + +# Autoconf calls _AC_AM_CONFIG_HEADER_HOOK (when defined) in the +# loop where config.status creates the headers, so we can generate +# our stamp files there. +AC_DEFUN([_AC_AM_CONFIG_HEADER_HOOK], +[# Compute $1's index in $config_headers. +_am_arg=$1 +_am_stamp_count=1 +for _am_header in $config_headers :; do + case $_am_header in + $_am_arg | $_am_arg:* ) + break ;; + * ) + _am_stamp_count=`expr $_am_stamp_count + 1` ;; + esac +done +echo "timestamp for $_am_arg" >`AS_DIRNAME(["$_am_arg"])`/stamp-h[]$_am_stamp_count]) + +# Copyright (C) 2001-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_PROG_INSTALL_SH +# ------------------ +# Define $install_sh. +AC_DEFUN([AM_PROG_INSTALL_SH], +[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl +if test x"${install_sh+set}" != xset; then + case $am_aux_dir in + *\ * | *\ *) + install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;; + *) + install_sh="\${SHELL} $am_aux_dir/install-sh" + esac +fi +AC_SUBST([install_sh])]) + +# Copyright (C) 2003-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# Check whether the underlying file-system supports filenames +# with a leading dot. For instance MS-DOS doesn't. +AC_DEFUN([AM_SET_LEADING_DOT], +[rm -rf .tst 2>/dev/null +mkdir .tst 2>/dev/null +if test -d .tst; then + am__leading_dot=. +else + am__leading_dot=_ +fi +rmdir .tst 2>/dev/null +AC_SUBST([am__leading_dot])]) + +# Add --enable-maintainer-mode option to configure. -*- Autoconf -*- +# From Jim Meyering + +# Copyright (C) 1996-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_MAINTAINER_MODE([DEFAULT-MODE]) +# ---------------------------------- +# Control maintainer-specific portions of Makefiles. +# Default is to disable them, unless 'enable' is passed literally. +# For symmetry, 'disable' may be passed as well. Anyway, the user +# can override the default with the --enable/--disable switch. +AC_DEFUN([AM_MAINTAINER_MODE], +[m4_case(m4_default([$1], [disable]), + [enable], [m4_define([am_maintainer_other], [disable])], + [disable], [m4_define([am_maintainer_other], [enable])], + [m4_define([am_maintainer_other], [enable]) + m4_warn([syntax], [unexpected argument to AM@&t@_MAINTAINER_MODE: $1])]) +AC_MSG_CHECKING([whether to enable maintainer-specific portions of Makefiles]) + dnl maintainer-mode's default is 'disable' unless 'enable' is passed + AC_ARG_ENABLE([maintainer-mode], + [AS_HELP_STRING([--]am_maintainer_other[-maintainer-mode], + am_maintainer_other[ make rules and dependencies not useful + (and sometimes confusing) to the casual installer])], + [USE_MAINTAINER_MODE=$enableval], + [USE_MAINTAINER_MODE=]m4_if(am_maintainer_other, [enable], [no], [yes])) + AC_MSG_RESULT([$USE_MAINTAINER_MODE]) + AM_CONDITIONAL([MAINTAINER_MODE], [test $USE_MAINTAINER_MODE = yes]) + MAINT=$MAINTAINER_MODE_TRUE + AC_SUBST([MAINT])dnl +] +) + +# Check to see how 'make' treats includes. -*- Autoconf -*- + +# Copyright (C) 2001-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_MAKE_INCLUDE() +# ----------------- +# Check whether make has an 'include' directive that can support all +# the idioms we need for our automatic dependency tracking code. +AC_DEFUN([AM_MAKE_INCLUDE], +[AC_MSG_CHECKING([whether ${MAKE-make} supports the include directive]) +cat > confinc.mk << 'END' +am__doit: + @echo this is the am__doit target >confinc.out +.PHONY: am__doit +END +am__include="#" +am__quote= +# BSD make does it like this. +echo '.include "confinc.mk" # ignored' > confmf.BSD +# Other make implementations (GNU, Solaris 10, AIX) do it like this. +echo 'include confinc.mk # ignored' > confmf.GNU +_am_result=no +for s in GNU BSD; do + AM_RUN_LOG([${MAKE-make} -f confmf.$s && cat confinc.out]) + AS_CASE([$?:`cat confinc.out 2>/dev/null`], + ['0:this is the am__doit target'], + [AS_CASE([$s], + [BSD], [am__include='.include' am__quote='"'], + [am__include='include' am__quote=''])]) + if test "$am__include" != "#"; then + _am_result="yes ($s style)" + break + fi +done +rm -f confinc.* confmf.* +AC_MSG_RESULT([${_am_result}]) +AC_SUBST([am__include])]) +AC_SUBST([am__quote])]) + +# Fake the existence of programs that GNU maintainers use. -*- Autoconf -*- + +# Copyright (C) 1997-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_MISSING_PROG(NAME, PROGRAM) +# ------------------------------ +AC_DEFUN([AM_MISSING_PROG], +[AC_REQUIRE([AM_MISSING_HAS_RUN]) +$1=${$1-"${am_missing_run}$2"} +AC_SUBST($1)]) + +# AM_MISSING_HAS_RUN +# ------------------ +# Define MISSING if not defined so far and test if it is modern enough. +# If it is, set am_missing_run to use it, otherwise, to nothing. +AC_DEFUN([AM_MISSING_HAS_RUN], +[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl +AC_REQUIRE_AUX_FILE([missing])dnl +if test x"${MISSING+set}" != xset; then + MISSING="\${SHELL} '$am_aux_dir/missing'" +fi +# Use eval to expand $SHELL +if eval "$MISSING --is-lightweight"; then + am_missing_run="$MISSING " +else + am_missing_run= + AC_MSG_WARN(['missing' script is too old or missing]) +fi +]) + +# Helper functions for option handling. -*- Autoconf -*- + +# Copyright (C) 2001-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# _AM_MANGLE_OPTION(NAME) +# ----------------------- +AC_DEFUN([_AM_MANGLE_OPTION], +[[_AM_OPTION_]m4_bpatsubst($1, [[^a-zA-Z0-9_]], [_])]) + +# _AM_SET_OPTION(NAME) +# -------------------- +# Set option NAME. Presently that only means defining a flag for this option. +AC_DEFUN([_AM_SET_OPTION], +[m4_define(_AM_MANGLE_OPTION([$1]), [1])]) + +# _AM_SET_OPTIONS(OPTIONS) +# ------------------------ +# OPTIONS is a space-separated list of Automake options. +AC_DEFUN([_AM_SET_OPTIONS], +[m4_foreach_w([_AM_Option], [$1], [_AM_SET_OPTION(_AM_Option)])]) + +# _AM_IF_OPTION(OPTION, IF-SET, [IF-NOT-SET]) +# ------------------------------------------- +# Execute IF-SET if OPTION is set, IF-NOT-SET otherwise. +AC_DEFUN([_AM_IF_OPTION], +[m4_ifset(_AM_MANGLE_OPTION([$1]), [$2], [$3])]) + +# Copyright (C) 1999-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# _AM_PROG_CC_C_O +# --------------- +# Like AC_PROG_CC_C_O, but changed for automake. We rewrite AC_PROG_CC +# to automatically call this. +AC_DEFUN([_AM_PROG_CC_C_O], +[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl +AC_REQUIRE_AUX_FILE([compile])dnl +AC_LANG_PUSH([C])dnl +AC_CACHE_CHECK( + [whether $CC understands -c and -o together], + [am_cv_prog_cc_c_o], + [AC_LANG_CONFTEST([AC_LANG_PROGRAM([])]) + # Make sure it works both with $CC and with simple cc. + # Following AC_PROG_CC_C_O, we do the test twice because some + # compilers refuse to overwrite an existing .o file with -o, + # though they will create one. + am_cv_prog_cc_c_o=yes + for am_i in 1 2; do + if AM_RUN_LOG([$CC -c conftest.$ac_ext -o conftest2.$ac_objext]) \ + && test -f conftest2.$ac_objext; then + : OK + else + am_cv_prog_cc_c_o=no + break + fi + done + rm -f core conftest* + unset am_i]) +if test "$am_cv_prog_cc_c_o" != yes; then + # Losing compiler, so override with the script. + # FIXME: It is wrong to rewrite CC. + # But if we don't then we get into trouble of one sort or another. + # A longer-term fix would be to have automake use am__CC in this case, + # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" + CC="$am_aux_dir/compile $CC" +fi +AC_LANG_POP([C])]) + +# For backward compatibility. +AC_DEFUN_ONCE([AM_PROG_CC_C_O], [AC_REQUIRE([AC_PROG_CC])]) + +# Copyright (C) 2001-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_RUN_LOG(COMMAND) +# ------------------- +# Run COMMAND, save the exit status in ac_status, and log it. +# (This has been adapted from Autoconf's _AC_RUN_LOG macro.) +AC_DEFUN([AM_RUN_LOG], +[{ echo "$as_me:$LINENO: $1" >&AS_MESSAGE_LOG_FD + ($1) >&AS_MESSAGE_LOG_FD 2>&AS_MESSAGE_LOG_FD + ac_status=$? + echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD + (exit $ac_status); }]) + +# Check to make sure that the build environment is sane. -*- Autoconf -*- + +# Copyright (C) 1996-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_SANITY_CHECK +# --------------- +AC_DEFUN([AM_SANITY_CHECK], +[AC_MSG_CHECKING([whether build environment is sane]) +# Reject unsafe characters in $srcdir or the absolute working directory +# name. Accept space and tab only in the latter. +am_lf=' +' +case `pwd` in + *[[\\\"\#\$\&\'\`$am_lf]]*) + AC_MSG_ERROR([unsafe absolute working directory name]);; +esac +case $srcdir in + *[[\\\"\#\$\&\'\`$am_lf\ \ ]]*) + AC_MSG_ERROR([unsafe srcdir value: '$srcdir']);; +esac + +# Do 'set' in a subshell so we don't clobber the current shell's +# arguments. Must try -L first in case configure is actually a +# symlink; some systems play weird games with the mod time of symlinks +# (eg FreeBSD returns the mod time of the symlink's containing +# directory). +if ( + am_has_slept=no + for am_try in 1 2; do + echo "timestamp, slept: $am_has_slept" > conftest.file + set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null` + if test "$[*]" = "X"; then + # -L didn't work. + set X `ls -t "$srcdir/configure" conftest.file` + fi + if test "$[*]" != "X $srcdir/configure conftest.file" \ + && test "$[*]" != "X conftest.file $srcdir/configure"; then + + # If neither matched, then we have a broken ls. This can happen + # if, for instance, CONFIG_SHELL is bash and it inherits a + # broken ls alias from the environment. This has actually + # happened. Such a system could not be considered "sane". + AC_MSG_ERROR([ls -t appears to fail. Make sure there is not a broken + alias in your environment]) + fi + if test "$[2]" = conftest.file || test $am_try -eq 2; then + break + fi + # Just in case. + sleep 1 + am_has_slept=yes + done + test "$[2]" = conftest.file + ) +then + # Ok. + : +else + AC_MSG_ERROR([newly created file is older than distributed files! +Check your system clock]) +fi +AC_MSG_RESULT([yes]) +# If we didn't sleep, we still need to ensure time stamps of config.status and +# generated files are strictly newer. +am_sleep_pid= +if grep 'slept: no' conftest.file >/dev/null 2>&1; then + ( sleep 1 ) & + am_sleep_pid=$! +fi +AC_CONFIG_COMMANDS_PRE( + [AC_MSG_CHECKING([that generated files are newer than configure]) + if test -n "$am_sleep_pid"; then + # Hide warnings about reused PIDs. + wait $am_sleep_pid 2>/dev/null + fi + AC_MSG_RESULT([done])]) +rm -f conftest.file +]) + +# Copyright (C) 2009-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_SILENT_RULES([DEFAULT]) +# -------------------------- +# Enable less verbose build rules; with the default set to DEFAULT +# ("yes" being less verbose, "no" or empty being verbose). +AC_DEFUN([AM_SILENT_RULES], +[AC_ARG_ENABLE([silent-rules], [dnl +AS_HELP_STRING( + [--enable-silent-rules], + [less verbose build output (undo: "make V=1")]) +AS_HELP_STRING( + [--disable-silent-rules], + [verbose build output (undo: "make V=0")])dnl +]) +case $enable_silent_rules in @%:@ ((( + yes) AM_DEFAULT_VERBOSITY=0;; + no) AM_DEFAULT_VERBOSITY=1;; + *) AM_DEFAULT_VERBOSITY=m4_if([$1], [yes], [0], [1]);; +esac +dnl +dnl A few 'make' implementations (e.g., NonStop OS and NextStep) +dnl do not support nested variable expansions. +dnl See automake bug#9928 and bug#10237. +am_make=${MAKE-make} +AC_CACHE_CHECK([whether $am_make supports nested variables], + [am_cv_make_support_nested_variables], + [if AS_ECHO([['TRUE=$(BAR$(V)) +BAR0=false +BAR1=true +V=1 +am__doit: + @$(TRUE) +.PHONY: am__doit']]) | $am_make -f - >/dev/null 2>&1; then + am_cv_make_support_nested_variables=yes +else + am_cv_make_support_nested_variables=no +fi]) +if test $am_cv_make_support_nested_variables = yes; then + dnl Using '$V' instead of '$(V)' breaks IRIX make. + AM_V='$(V)' + AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)' +else + AM_V=$AM_DEFAULT_VERBOSITY + AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY +fi +AC_SUBST([AM_V])dnl +AM_SUBST_NOTMAKE([AM_V])dnl +AC_SUBST([AM_DEFAULT_V])dnl +AM_SUBST_NOTMAKE([AM_DEFAULT_V])dnl +AC_SUBST([AM_DEFAULT_VERBOSITY])dnl +AM_BACKSLASH='\' +AC_SUBST([AM_BACKSLASH])dnl +_AM_SUBST_NOTMAKE([AM_BACKSLASH])dnl +]) + +# Copyright (C) 2001-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# AM_PROG_INSTALL_STRIP +# --------------------- +# One issue with vendor 'install' (even GNU) is that you can't +# specify the program used to strip binaries. This is especially +# annoying in cross-compiling environments, where the build's strip +# is unlikely to handle the host's binaries. +# Fortunately install-sh will honor a STRIPPROG variable, so we +# always use install-sh in "make install-strip", and initialize +# STRIPPROG with the value of the STRIP variable (set by the user). +AC_DEFUN([AM_PROG_INSTALL_STRIP], +[AC_REQUIRE([AM_PROG_INSTALL_SH])dnl +# Installed binaries are usually stripped using 'strip' when the user +# run "make install-strip". However 'strip' might not be the right +# tool to use in cross-compilation environments, therefore Automake +# will honor the 'STRIP' environment variable to overrule this program. +dnl Don't test for $cross_compiling = yes, because it might be 'maybe'. +if test "$cross_compiling" != no; then + AC_CHECK_TOOL([STRIP], [strip], :) +fi +INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s" +AC_SUBST([INSTALL_STRIP_PROGRAM])]) + +# Copyright (C) 2006-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# _AM_SUBST_NOTMAKE(VARIABLE) +# --------------------------- +# Prevent Automake from outputting VARIABLE = @VARIABLE@ in Makefile.in. +# This macro is traced by Automake. +AC_DEFUN([_AM_SUBST_NOTMAKE]) + +# AM_SUBST_NOTMAKE(VARIABLE) +# -------------------------- +# Public sister of _AM_SUBST_NOTMAKE. +AC_DEFUN([AM_SUBST_NOTMAKE], [_AM_SUBST_NOTMAKE($@)]) + +# Check how to create a tarball. -*- Autoconf -*- + +# Copyright (C) 2004-2021 Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# _AM_PROG_TAR(FORMAT) +# -------------------- +# Check how to create a tarball in format FORMAT. +# FORMAT should be one of 'v7', 'ustar', or 'pax'. +# +# Substitute a variable $(am__tar) that is a command +# writing to stdout a FORMAT-tarball containing the directory +# $tardir. +# tardir=directory && $(am__tar) > result.tar +# +# Substitute a variable $(am__untar) that extract such +# a tarball read from stdin. +# $(am__untar) < result.tar +# +AC_DEFUN([_AM_PROG_TAR], +[# Always define AMTAR for backward compatibility. Yes, it's still used +# in the wild :-( We should find a proper way to deprecate it ... +AC_SUBST([AMTAR], ['$${TAR-tar}']) + +# We'll loop over all known methods to create a tar archive until one works. +_am_tools='gnutar m4_if([$1], [ustar], [plaintar]) pax cpio none' + +m4_if([$1], [v7], + [am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -'], + + [m4_case([$1], + [ustar], + [# The POSIX 1988 'ustar' format is defined with fixed-size fields. + # There is notably a 21 bits limit for the UID and the GID. In fact, + # the 'pax' utility can hang on bigger UID/GID (see automake bug#8343 + # and bug#13588). + am_max_uid=2097151 # 2^21 - 1 + am_max_gid=$am_max_uid + # The $UID and $GID variables are not portable, so we need to resort + # to the POSIX-mandated id(1) utility. Errors in the 'id' calls + # below are definitely unexpected, so allow the users to see them + # (that is, avoid stderr redirection). + am_uid=`id -u || echo unknown` + am_gid=`id -g || echo unknown` + AC_MSG_CHECKING([whether UID '$am_uid' is supported by ustar format]) + if test $am_uid -le $am_max_uid; then + AC_MSG_RESULT([yes]) + else + AC_MSG_RESULT([no]) + _am_tools=none + fi + AC_MSG_CHECKING([whether GID '$am_gid' is supported by ustar format]) + if test $am_gid -le $am_max_gid; then + AC_MSG_RESULT([yes]) + else + AC_MSG_RESULT([no]) + _am_tools=none + fi], + + [pax], + [], + + [m4_fatal([Unknown tar format])]) + + AC_MSG_CHECKING([how to create a $1 tar archive]) + + # Go ahead even if we have the value already cached. We do so because we + # need to set the values for the 'am__tar' and 'am__untar' variables. + _am_tools=${am_cv_prog_tar_$1-$_am_tools} + + for _am_tool in $_am_tools; do + case $_am_tool in + gnutar) + for _am_tar in tar gnutar gtar; do + AM_RUN_LOG([$_am_tar --version]) && break + done + am__tar="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$$tardir"' + am__tar_="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$tardir"' + am__untar="$_am_tar -xf -" + ;; + plaintar) + # Must skip GNU tar: if it does not support --format= it doesn't create + # ustar tarball either. + (tar --version) >/dev/null 2>&1 && continue + am__tar='tar chf - "$$tardir"' + am__tar_='tar chf - "$tardir"' + am__untar='tar xf -' + ;; + pax) + am__tar='pax -L -x $1 -w "$$tardir"' + am__tar_='pax -L -x $1 -w "$tardir"' + am__untar='pax -r' + ;; + cpio) + am__tar='find "$$tardir" -print | cpio -o -H $1 -L' + am__tar_='find "$tardir" -print | cpio -o -H $1 -L' + am__untar='cpio -i -H $1 -d' + ;; + none) + am__tar=false + am__tar_=false + am__untar=false + ;; + esac + + # If the value was cached, stop now. We just wanted to have am__tar + # and am__untar set. + test -n "${am_cv_prog_tar_$1}" && break + + # tar/untar a dummy directory, and stop if the command works. + rm -rf conftest.dir + mkdir conftest.dir + echo GrepMe > conftest.dir/file + AM_RUN_LOG([tardir=conftest.dir && eval $am__tar_ >conftest.tar]) + rm -rf conftest.dir + if test -s conftest.tar; then + AM_RUN_LOG([$am__untar /dev/null 2>&1 && break + fi + done + rm -rf conftest.dir + + AC_CACHE_VAL([am_cv_prog_tar_$1], [am_cv_prog_tar_$1=$_am_tool]) + AC_MSG_RESULT([$am_cv_prog_tar_$1])]) + +AC_SUBST([am__tar]) +AC_SUBST([am__untar]) +]) # _AM_PROG_TAR + +m4_include([../../m4/kpse-common.m4]) +m4_include([../../m4/kpse-gmp-flags.m4]) +m4_include([../../m4/kpse-mpfr-flags.m4]) +m4_include([../../m4/kpse-visibility.m4]) +m4_include([../../m4/kpse-warnings.m4]) diff --git a/Build/source/libs/mpfi/configure b/Build/source/libs/mpfi/configure new file mode 100755 index 00000000000..03b687185c5 --- /dev/null +++ b/Build/source/libs/mpfi/configure @@ -0,0 +1,7510 @@ +#! /bin/sh +# Guess values for system-dependent variables and create Makefiles. +# Generated by GNU Autoconf 2.72 for mpfi (TeX Live) 1.5.4. +# +# Report bugs to . +# +# +# Copyright (C) 1992-1996, 1998-2017, 2020-2023 Free Software Foundation, +# Inc. +# +# +# This configure script is free software; the Free Software Foundation +# gives unlimited permission to copy, distribute and modify it. +## -------------------- ## +## M4sh Initialization. ## +## -------------------- ## + +# Be more Bourne compatible +DUALCASE=1; export DUALCASE # for MKS sh +if test ${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1 +then : + emulate sh + NULLCMD=: + # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which + # is contrary to our usage. Disable this feature. + alias -g '${1+"$@"}'='"$@"' + setopt NO_GLOB_SUBST +else case e in #( + e) case `(set -o) 2>/dev/null` in #( + *posix*) : + set -o posix ;; #( + *) : + ;; +esac ;; +esac +fi + + + +# Reset variables that may have inherited troublesome values from +# the environment. + +# IFS needs to be set, to space, tab, and newline, in precisely that order. +# (If _AS_PATH_WALK were called with IFS unset, it would have the +# side effect of setting IFS to empty, thus disabling word splitting.) +# Quoting is to prevent editors from complaining about space-tab. +as_nl=' +' +export as_nl +IFS=" "" $as_nl" + +PS1='$ ' +PS2='> ' +PS4='+ ' + +# Ensure predictable behavior from utilities with locale-dependent output. +LC_ALL=C +export LC_ALL +LANGUAGE=C +export LANGUAGE + +# We cannot yet rely on "unset" to work, but we need these variables +# to be unset--not just set to an empty or harmless value--now, to +# avoid bugs in old shells (e.g. pre-3.0 UWIN ksh). This construct +# also avoids known problems related to "unset" and subshell syntax +# in other old shells (e.g. bash 2.01 and pdksh 5.2.14). +for as_var in BASH_ENV ENV MAIL MAILPATH CDPATH +do eval test \${$as_var+y} \ + && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || : +done + +# Ensure that fds 0, 1, and 2 are open. +if (exec 3>&0) 2>/dev/null; then :; else exec 0&1) 2>/dev/null; then :; else exec 1>/dev/null; fi +if (exec 3>&2) ; then :; else exec 2>/dev/null; fi + +# The user is always right. +if ${PATH_SEPARATOR+false} :; then + PATH_SEPARATOR=: + (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && { + (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 || + PATH_SEPARATOR=';' + } +fi + + +# Find who we are. Look in the path if we contain no directory separator. +as_myself= +case $0 in #(( + *[\\/]* ) as_myself=$0 ;; + *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + test -r "$as_dir$0" && as_myself=$as_dir$0 && break + done +IFS=$as_save_IFS + + ;; +esac +# We did not find ourselves, most probably we were run as 'sh COMMAND' +# in which case we are not to be found in the path. +if test "x$as_myself" = x; then + as_myself=$0 +fi +if test ! -f "$as_myself"; then + printf "%s\n" "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2 + exit 1 +fi + + +# Use a proper internal environment variable to ensure we don't fall + # into an infinite loop, continuously re-executing ourselves. + if test x"${_as_can_reexec}" != xno && test "x$CONFIG_SHELL" != x; then + _as_can_reexec=no; export _as_can_reexec; + # We cannot yet assume a decent shell, so we have to provide a +# neutralization value for shells without unset; and this also +# works around shells that cannot unset nonexistent variables. +# Preserve -v and -x to the replacement shell. +BASH_ENV=/dev/null +ENV=/dev/null +(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV +case $- in # (((( + *v*x* | *x*v* ) as_opts=-vx ;; + *v* ) as_opts=-v ;; + *x* ) as_opts=-x ;; + * ) as_opts= ;; +esac +exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"} +# Admittedly, this is quite paranoid, since all the known shells bail +# out after a failed 'exec'. +printf "%s\n" "$0: could not re-execute with $CONFIG_SHELL" >&2 +exit 255 + fi + # We don't want this to propagate to other subprocesses. + { _as_can_reexec=; unset _as_can_reexec;} +if test "x$CONFIG_SHELL" = x; then + as_bourne_compatible="if test \${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1 +then : + emulate sh + NULLCMD=: + # Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which + # is contrary to our usage. Disable this feature. + alias -g '\${1+\"\$@\"}'='\"\$@\"' + setopt NO_GLOB_SUBST +else case e in #( + e) case \`(set -o) 2>/dev/null\` in #( + *posix*) : + set -o posix ;; #( + *) : + ;; +esac ;; +esac +fi +" + as_required="as_fn_return () { (exit \$1); } +as_fn_success () { as_fn_return 0; } +as_fn_failure () { as_fn_return 1; } +as_fn_ret_success () { return 0; } +as_fn_ret_failure () { return 1; } + +exitcode=0 +as_fn_success || { exitcode=1; echo as_fn_success failed.; } +as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; } +as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; } +as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; } +if ( set x; as_fn_ret_success y && test x = \"\$1\" ) +then : + +else case e in #( + e) exitcode=1; echo positional parameters were not saved. ;; +esac +fi +test x\$exitcode = x0 || exit 1 +blah=\$(echo \$(echo blah)) +test x\"\$blah\" = xblah || exit 1 +test -x / || exit 1" + as_suggested=" as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO + as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO + eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" && + test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1" + if (eval "$as_required") 2>/dev/null +then : + as_have_required=yes +else case e in #( + e) as_have_required=no ;; +esac +fi + if test x$as_have_required = xyes && (eval "$as_suggested") 2>/dev/null +then : + +else case e in #( + e) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +as_found=false +for as_dir in /bin$PATH_SEPARATOR/usr/bin$PATH_SEPARATOR$PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + as_found=: + case $as_dir in #( + /*) + for as_base in sh bash ksh sh5; do + # Try only shells that exist, to save several forks. + as_shell=$as_dir$as_base + if { test -f "$as_shell" || test -f "$as_shell.exe"; } && + as_run=a "$as_shell" -c "$as_bourne_compatible""$as_required" 2>/dev/null +then : + CONFIG_SHELL=$as_shell as_have_required=yes + if as_run=a "$as_shell" -c "$as_bourne_compatible""$as_suggested" 2>/dev/null +then : + break 2 +fi +fi + done;; + esac + as_found=false +done +IFS=$as_save_IFS +if $as_found +then : + +else case e in #( + e) if { test -f "$SHELL" || test -f "$SHELL.exe"; } && + as_run=a "$SHELL" -c "$as_bourne_compatible""$as_required" 2>/dev/null +then : + CONFIG_SHELL=$SHELL as_have_required=yes +fi ;; +esac +fi + + + if test "x$CONFIG_SHELL" != x +then : + export CONFIG_SHELL + # We cannot yet assume a decent shell, so we have to provide a +# neutralization value for shells without unset; and this also +# works around shells that cannot unset nonexistent variables. +# Preserve -v and -x to the replacement shell. +BASH_ENV=/dev/null +ENV=/dev/null +(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV +case $- in # (((( + *v*x* | *x*v* ) as_opts=-vx ;; + *v* ) as_opts=-v ;; + *x* ) as_opts=-x ;; + * ) as_opts= ;; +esac +exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"} +# Admittedly, this is quite paranoid, since all the known shells bail +# out after a failed 'exec'. +printf "%s\n" "$0: could not re-execute with $CONFIG_SHELL" >&2 +exit 255 +fi + + if test x$as_have_required = xno +then : + printf "%s\n" "$0: This script requires a shell more modern than all" + printf "%s\n" "$0: the shells that I found on your system." + if test ${ZSH_VERSION+y} ; then + printf "%s\n" "$0: In particular, zsh $ZSH_VERSION has bugs and should" + printf "%s\n" "$0: be upgraded to zsh 4.3.4 or later." + else + printf "%s\n" "$0: Please tell bug-autoconf@gnu.org and tex-k@tug.org +$0: about your system, including any error possibly output +$0: before this message. Then install a modern shell, or +$0: manually run the script under such a shell if you do +$0: have one." + fi + exit 1 +fi ;; +esac +fi +fi +SHELL=${CONFIG_SHELL-/bin/sh} +export SHELL +# Unset more variables known to interfere with behavior of common tools. +CLICOLOR_FORCE= GREP_OPTIONS= +unset CLICOLOR_FORCE GREP_OPTIONS + +## --------------------- ## +## M4sh Shell Functions. ## +## --------------------- ## +# as_fn_unset VAR +# --------------- +# Portably unset VAR. +as_fn_unset () +{ + { eval $1=; unset $1;} +} +as_unset=as_fn_unset + + +# as_fn_set_status STATUS +# ----------------------- +# Set $? to STATUS, without forking. +as_fn_set_status () +{ + return $1 +} # as_fn_set_status + +# as_fn_exit STATUS +# ----------------- +# Exit the shell with STATUS, even in a "trap 0" or "set -e" context. +as_fn_exit () +{ + set +e + as_fn_set_status $1 + exit $1 +} # as_fn_exit + +# as_fn_mkdir_p +# ------------- +# Create "$as_dir" as a directory, including parents if necessary. +as_fn_mkdir_p () +{ + + case $as_dir in #( + -*) as_dir=./$as_dir;; + esac + test -d "$as_dir" || eval $as_mkdir_p || { + as_dirs= + while :; do + case $as_dir in #( + *\'*) as_qdir=`printf "%s\n" "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'( + *) as_qdir=$as_dir;; + esac + as_dirs="'$as_qdir' $as_dirs" + as_dir=`$as_dirname -- "$as_dir" || +$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$as_dir" : 'X\(//\)[^/]' \| \ + X"$as_dir" : 'X\(//\)$' \| \ + X"$as_dir" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X"$as_dir" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + test -d "$as_dir" && break + done + test -z "$as_dirs" || eval "mkdir $as_dirs" + } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir" + + +} # as_fn_mkdir_p + +# as_fn_executable_p FILE +# ----------------------- +# Test if FILE is an executable regular file. +as_fn_executable_p () +{ + test -f "$1" && test -x "$1" +} # as_fn_executable_p +# as_fn_append VAR VALUE +# ---------------------- +# Append the text in VALUE to the end of the definition contained in VAR. Take +# advantage of any shell optimizations that allow amortized linear growth over +# repeated appends, instead of the typical quadratic growth present in naive +# implementations. +if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null +then : + eval 'as_fn_append () + { + eval $1+=\$2 + }' +else case e in #( + e) as_fn_append () + { + eval $1=\$$1\$2 + } ;; +esac +fi # as_fn_append + +# as_fn_arith ARG... +# ------------------ +# Perform arithmetic evaluation on the ARGs, and store the result in the +# global $as_val. Take advantage of shells that can avoid forks. The arguments +# must be portable across $(()) and expr. +if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null +then : + eval 'as_fn_arith () + { + as_val=$(( $* )) + }' +else case e in #( + e) as_fn_arith () + { + as_val=`expr "$@" || test $? -eq 1` + } ;; +esac +fi # as_fn_arith + + +# as_fn_error STATUS ERROR [LINENO LOG_FD] +# ---------------------------------------- +# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are +# provided, also output the error to LOG_FD, referencing LINENO. Then exit the +# script with STATUS, using 1 if that was 0. +as_fn_error () +{ + as_status=$1; test $as_status -eq 0 && as_status=1 + if test "$4"; then + as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: $2" >&$4 + fi + printf "%s\n" "$as_me: error: $2" >&2 + as_fn_exit $as_status +} # as_fn_error + +if expr a : '\(a\)' >/dev/null 2>&1 && + test "X`expr 00001 : '.*\(...\)'`" = X001; then + as_expr=expr +else + as_expr=false +fi + +if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then + as_basename=basename +else + as_basename=false +fi + +if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then + as_dirname=dirname +else + as_dirname=false +fi + +as_me=`$as_basename -- "$0" || +$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \ + X"$0" : 'X\(//\)$' \| \ + X"$0" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X/"$0" | + sed '/^.*\/\([^/][^/]*\)\/*$/{ + s//\1/ + q + } + /^X\/\(\/\/\)$/{ + s//\1/ + q + } + /^X\/\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + +# Avoid depending upon Character Ranges. +as_cr_letters='abcdefghijklmnopqrstuvwxyz' +as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ' +as_cr_Letters=$as_cr_letters$as_cr_LETTERS +as_cr_digits='0123456789' +as_cr_alnum=$as_cr_Letters$as_cr_digits + + + as_lineno_1=$LINENO as_lineno_1a=$LINENO + as_lineno_2=$LINENO as_lineno_2a=$LINENO + eval 'test "x$as_lineno_1'$as_run'" != "x$as_lineno_2'$as_run'" && + test "x`expr $as_lineno_1'$as_run' + 1`" = "x$as_lineno_2'$as_run'"' || { + # Blame Lee E. McMahon (1931-1989) for sed's syntax. :-) + sed -n ' + p + /[$]LINENO/= + ' <$as_myself | + sed ' + t clear + :clear + s/[$]LINENO.*/&-/ + t lineno + b + :lineno + N + :loop + s/[$]LINENO\([^'$as_cr_alnum'_].*\n\)\(.*\)/\2\1\2/ + t loop + s/-\n.*// + ' >$as_me.lineno && + chmod +x "$as_me.lineno" || + { printf "%s\n" "$as_me: error: cannot create $as_me.lineno; rerun with a POSIX shell" >&2; as_fn_exit 1; } + + # If we had to re-execute with $CONFIG_SHELL, we're ensured to have + # already done that, so ensure we don't try to do so again and fall + # in an infinite loop. This has already happened in practice. + _as_can_reexec=no; export _as_can_reexec + # Don't try to exec as it changes $[0], causing all sort of problems + # (the dirname of $[0] is not the place where we might find the + # original and so on. Autoconf is especially sensitive to this). + . "./$as_me.lineno" + # Exit status is that of the last command. + exit +} + + +# Determine whether it's possible to make 'echo' print without a newline. +# These variables are no longer used directly by Autoconf, but are AC_SUBSTed +# for compatibility with existing Makefiles. +ECHO_C= ECHO_N= ECHO_T= +case `echo -n x` in #((((( +-n*) + case `echo 'xy\c'` in + *c*) ECHO_T=' ';; # ECHO_T is single tab character. + xy) ECHO_C='\c';; + *) echo `echo ksh88 bug on AIX 6.1` > /dev/null + ECHO_T=' ';; + esac;; +*) + ECHO_N='-n';; +esac + +# For backward compatibility with old third-party macros, we provide +# the shell variables $as_echo and $as_echo_n. New code should use +# AS_ECHO(["message"]) and AS_ECHO_N(["message"]), respectively. +as_echo='printf %s\n' +as_echo_n='printf %s' + +rm -f conf$$ conf$$.exe conf$$.file +if test -d conf$$.dir; then + rm -f conf$$.dir/conf$$.file +else + rm -f conf$$.dir + mkdir conf$$.dir 2>/dev/null +fi +if (echo >conf$$.file) 2>/dev/null; then + if ln -s conf$$.file conf$$ 2>/dev/null; then + as_ln_s='ln -s' + # ... but there are two gotchas: + # 1) On MSYS, both 'ln -s file dir' and 'ln file dir' fail. + # 2) DJGPP < 2.04 has no symlinks; 'ln -s' creates a wrapper executable. + # In both cases, we have to default to 'cp -pR'. + ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe || + as_ln_s='cp -pR' + elif ln conf$$.file conf$$ 2>/dev/null; then + as_ln_s=ln + else + as_ln_s='cp -pR' + fi +else + as_ln_s='cp -pR' +fi +rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file +rmdir conf$$.dir 2>/dev/null + +if mkdir -p . 2>/dev/null; then + as_mkdir_p='mkdir -p "$as_dir"' +else + test -d ./-p && rmdir ./-p + as_mkdir_p=false +fi + +as_test_x='test -x' +as_executable_p=as_fn_executable_p + +# Sed expression to map a string onto a valid CPP name. +as_sed_cpp="y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g" +as_tr_cpp="eval sed '$as_sed_cpp'" # deprecated + +# Sed expression to map a string onto a valid variable name. +as_sed_sh="y%*+%pp%;s%[^_$as_cr_alnum]%_%g" +as_tr_sh="eval sed '$as_sed_sh'" # deprecated + + +test -n "$DJDIR" || exec 7<&0 &1 + +# Name of the host. +# hostname on some systems (SVR3.2, old GNU/Linux) returns a bogus exit status, +# so uname gets run too. +ac_hostname=`(hostname || uname -n) 2>/dev/null | sed 1q` + +# +# Initializations. +# +ac_default_prefix=/usr/local +ac_clean_files= +ac_config_libobj_dir=. +LIBOBJS= +cross_compiling=no +subdirs= +MFLAGS= +MAKEFLAGS= + +# Identity of this package. +PACKAGE_NAME='mpfi (TeX Live)' +PACKAGE_TARNAME='mpfi--tex-live-' +PACKAGE_VERSION='1.5.4' +PACKAGE_STRING='mpfi (TeX Live) 1.5.4' +PACKAGE_BUGREPORT='tex-k@tug.org' +PACKAGE_URL='' + +ac_unique_file="mpfi-src/src/mpfi.h" +# Factoring default headers for most tests. +ac_includes_default="\ +#include +#ifdef HAVE_STDIO_H +# include +#endif +#ifdef HAVE_STDLIB_H +# include +#endif +#ifdef HAVE_STRING_H +# include +#endif +#ifdef HAVE_INTTYPES_H +# include +#endif +#ifdef HAVE_STDINT_H +# include +#endif +#ifdef HAVE_STRINGS_H +# include +#endif +#ifdef HAVE_SYS_TYPES_H +# include +#endif +#ifdef HAVE_SYS_STAT_H +# include +#endif +#ifdef HAVE_UNISTD_H +# include +#endif" + +ac_header_c_list= +ac_subst_vars='am__EXEEXT_FALSE +am__EXEEXT_TRUE +LTLIBOBJS +LIBOBJS +MPFI_TREE +MPFR_RULE +MPFR_DEPEND +MPFR_LIBS +MPFR_INCLUDES +GMP_RULE +GMP_DEPEND +GMP_LIBS +GMP_INCLUDES +build_FALSE +build_TRUE +host_os +host_vendor +host_cpu +host +build_os +build_vendor +build_cpu +build +VISIBILITY_CFLAGS +LN_S +RANLIB +WARNING_CFLAGS +am__fastdepCC_FALSE +am__fastdepCC_TRUE +CCDEPMODE +am__nodep +AMDEPBACKSLASH +AMDEP_FALSE +AMDEP_TRUE +am__include +DEPDIR +OBJEXT +EXEEXT +ac_ct_CC +CPPFLAGS +LDFLAGS +CFLAGS +CC +MAINT +MAINTAINER_MODE_FALSE +MAINTAINER_MODE_TRUE +AM_BACKSLASH +AM_DEFAULT_VERBOSITY +AM_DEFAULT_V +AM_V +CSCOPE +ETAGS +CTAGS +am__untar +am__tar +AMTAR +am__leading_dot +SET_MAKE +AWK +mkdir_p +MKDIR_P +INSTALL_STRIP_PROGRAM +STRIP +install_sh +MAKEINFO +AUTOHEADER +AUTOMAKE +AUTOCONF +ACLOCAL +VERSION +PACKAGE +CYGPATH_W +am__isrc +INSTALL_DATA +INSTALL_SCRIPT +INSTALL_PROGRAM +target_alias +host_alias +build_alias +LIBS +ECHO_T +ECHO_N +ECHO_C +DEFS +mandir +localedir +libdir +psdir +pdfdir +dvidir +htmldir +infodir +docdir +oldincludedir +includedir +runstatedir +localstatedir +sharedstatedir +sysconfdir +datadir +datarootdir +libexecdir +sbindir +bindir +program_transform_name +prefix +exec_prefix +PACKAGE_URL +PACKAGE_BUGREPORT +PACKAGE_STRING +PACKAGE_VERSION +PACKAGE_TARNAME +PACKAGE_NAME +PATH_SEPARATOR +SHELL +am__quote' +ac_subst_files='' +ac_user_opts=' +enable_option_checking +enable_silent_rules +enable_maintainer_mode +enable_dependency_tracking +enable_compiler_warnings +with_system_gmp +with_gmp_includes +with_gmp_libdir +with_system_mpfr +with_mpfr_includes +with_mpfr_libdir +' + ac_precious_vars='build_alias +host_alias +target_alias +CC +CFLAGS +LDFLAGS +LIBS +CPPFLAGS' + + +# Initialize some variables set by options. +ac_init_help= +ac_init_version=false +ac_unrecognized_opts= +ac_unrecognized_sep= +# The variables have the same names as the options, with +# dashes changed to underlines. +cache_file=/dev/null +exec_prefix=NONE +no_create= +no_recursion= +prefix=NONE +program_prefix=NONE +program_suffix=NONE +program_transform_name=s,x,x, +silent= +site= +srcdir= +verbose= +x_includes=NONE +x_libraries=NONE + +# Installation directory options. +# These are left unexpanded so users can "make install exec_prefix=/foo" +# and all the variables that are supposed to be based on exec_prefix +# by default will actually change. +# Use braces instead of parens because sh, perl, etc. also accept them. +# (The list follows the same order as the GNU Coding Standards.) +bindir='${exec_prefix}/bin' +sbindir='${exec_prefix}/sbin' +libexecdir='${exec_prefix}/libexec' +datarootdir='${prefix}/share' +datadir='${datarootdir}' +sysconfdir='${prefix}/etc' +sharedstatedir='${prefix}/com' +localstatedir='${prefix}/var' +runstatedir='${localstatedir}/run' +includedir='${prefix}/include' +oldincludedir='/usr/include' +docdir='${datarootdir}/doc/${PACKAGE_TARNAME}' +infodir='${datarootdir}/info' +htmldir='${docdir}' +dvidir='${docdir}' +pdfdir='${docdir}' +psdir='${docdir}' +libdir='${exec_prefix}/lib' +localedir='${datarootdir}/locale' +mandir='${datarootdir}/man' + +ac_prev= +ac_dashdash= +for ac_option +do + # If the previous option needs an argument, assign it. + if test -n "$ac_prev"; then + eval $ac_prev=\$ac_option + ac_prev= + continue + fi + + case $ac_option in + *=?*) ac_optarg=`expr "X$ac_option" : '[^=]*=\(.*\)'` ;; + *=) ac_optarg= ;; + *) ac_optarg=yes ;; + esac + + case $ac_dashdash$ac_option in + --) + ac_dashdash=yes ;; + + -bindir | --bindir | --bindi | --bind | --bin | --bi) + ac_prev=bindir ;; + -bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*) + bindir=$ac_optarg ;; + + -build | --build | --buil | --bui | --bu) + ac_prev=build_alias ;; + -build=* | --build=* | --buil=* | --bui=* | --bu=*) + build_alias=$ac_optarg ;; + + -cache-file | --cache-file | --cache-fil | --cache-fi \ + | --cache-f | --cache- | --cache | --cach | --cac | --ca | --c) + ac_prev=cache_file ;; + -cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \ + | --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*) + cache_file=$ac_optarg ;; + + --config-cache | -C) + cache_file=config.cache ;; + + -datadir | --datadir | --datadi | --datad) + ac_prev=datadir ;; + -datadir=* | --datadir=* | --datadi=* | --datad=*) + datadir=$ac_optarg ;; + + -datarootdir | --datarootdir | --datarootdi | --datarootd | --dataroot \ + | --dataroo | --dataro | --datar) + ac_prev=datarootdir ;; + -datarootdir=* | --datarootdir=* | --datarootdi=* | --datarootd=* \ + | --dataroot=* | --dataroo=* | --dataro=* | --datar=*) + datarootdir=$ac_optarg ;; + + -disable-* | --disable-*) + ac_useropt=`expr "x$ac_option" : 'x-*disable-\(.*\)'` + # Reject names that are not valid shell variable names. + expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && + as_fn_error $? "invalid feature name: '$ac_useropt'" + ac_useropt_orig=$ac_useropt + ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` + case $ac_user_opts in + *" +"enable_$ac_useropt" +"*) ;; + *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--disable-$ac_useropt_orig" + ac_unrecognized_sep=', ';; + esac + eval enable_$ac_useropt=no ;; + + -docdir | --docdir | --docdi | --doc | --do) + ac_prev=docdir ;; + -docdir=* | --docdir=* | --docdi=* | --doc=* | --do=*) + docdir=$ac_optarg ;; + + -dvidir | --dvidir | --dvidi | --dvid | --dvi | --dv) + ac_prev=dvidir ;; + -dvidir=* | --dvidir=* | --dvidi=* | --dvid=* | --dvi=* | --dv=*) + dvidir=$ac_optarg ;; + + -enable-* | --enable-*) + ac_useropt=`expr "x$ac_option" : 'x-*enable-\([^=]*\)'` + # Reject names that are not valid shell variable names. + expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && + as_fn_error $? "invalid feature name: '$ac_useropt'" + ac_useropt_orig=$ac_useropt + ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` + case $ac_user_opts in + *" +"enable_$ac_useropt" +"*) ;; + *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--enable-$ac_useropt_orig" + ac_unrecognized_sep=', ';; + esac + eval enable_$ac_useropt=\$ac_optarg ;; + + -exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \ + | --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \ + | --exec | --exe | --ex) + ac_prev=exec_prefix ;; + -exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \ + | --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \ + | --exec=* | --exe=* | --ex=*) + exec_prefix=$ac_optarg ;; + + -gas | --gas | --ga | --g) + # Obsolete; use --with-gas. + with_gas=yes ;; + + -help | --help | --hel | --he | -h) + ac_init_help=long ;; + -help=r* | --help=r* | --hel=r* | --he=r* | -hr*) + ac_init_help=recursive ;; + -help=s* | --help=s* | --hel=s* | --he=s* | -hs*) + ac_init_help=short ;; + + -host | --host | --hos | --ho) + ac_prev=host_alias ;; + -host=* | --host=* | --hos=* | --ho=*) + host_alias=$ac_optarg ;; + + -htmldir | --htmldir | --htmldi | --htmld | --html | --htm | --ht) + ac_prev=htmldir ;; + -htmldir=* | --htmldir=* | --htmldi=* | --htmld=* | --html=* | --htm=* \ + | --ht=*) + htmldir=$ac_optarg ;; + + -includedir | --includedir | --includedi | --included | --include \ + | --includ | --inclu | --incl | --inc) + ac_prev=includedir ;; + -includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \ + | --includ=* | --inclu=* | --incl=* | --inc=*) + includedir=$ac_optarg ;; + + -infodir | --infodir | --infodi | --infod | --info | --inf) + ac_prev=infodir ;; + -infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*) + infodir=$ac_optarg ;; + + -libdir | --libdir | --libdi | --libd) + ac_prev=libdir ;; + -libdir=* | --libdir=* | --libdi=* | --libd=*) + libdir=$ac_optarg ;; + + -libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \ + | --libexe | --libex | --libe) + ac_prev=libexecdir ;; + -libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \ + | --libexe=* | --libex=* | --libe=*) + libexecdir=$ac_optarg ;; + + -localedir | --localedir | --localedi | --localed | --locale) + ac_prev=localedir ;; + -localedir=* | --localedir=* | --localedi=* | --localed=* | --locale=*) + localedir=$ac_optarg ;; + + -localstatedir | --localstatedir | --localstatedi | --localstated \ + | --localstate | --localstat | --localsta | --localst | --locals) + ac_prev=localstatedir ;; + -localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \ + | --localstate=* | --localstat=* | --localsta=* | --localst=* | --locals=*) + localstatedir=$ac_optarg ;; + + -mandir | --mandir | --mandi | --mand | --man | --ma | --m) + ac_prev=mandir ;; + -mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*) + mandir=$ac_optarg ;; + + -nfp | --nfp | --nf) + # Obsolete; use --without-fp. + with_fp=no ;; + + -no-create | --no-create | --no-creat | --no-crea | --no-cre \ + | --no-cr | --no-c | -n) + no_create=yes ;; + + -no-recursion | --no-recursion | --no-recursio | --no-recursi \ + | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r) + no_recursion=yes ;; + + -oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \ + | --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \ + | --oldin | --oldi | --old | --ol | --o) + ac_prev=oldincludedir ;; + -oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \ + | --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \ + | --oldin=* | --oldi=* | --old=* | --ol=* | --o=*) + oldincludedir=$ac_optarg ;; + + -prefix | --prefix | --prefi | --pref | --pre | --pr | --p) + ac_prev=prefix ;; + -prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*) + prefix=$ac_optarg ;; + + -program-prefix | --program-prefix | --program-prefi | --program-pref \ + | --program-pre | --program-pr | --program-p) + ac_prev=program_prefix ;; + -program-prefix=* | --program-prefix=* | --program-prefi=* \ + | --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*) + program_prefix=$ac_optarg ;; + + -program-suffix | --program-suffix | --program-suffi | --program-suff \ + | --program-suf | --program-su | --program-s) + ac_prev=program_suffix ;; + -program-suffix=* | --program-suffix=* | --program-suffi=* \ + | --program-suff=* | --program-suf=* | --program-su=* | --program-s=*) + program_suffix=$ac_optarg ;; + + -program-transform-name | --program-transform-name \ + | --program-transform-nam | --program-transform-na \ + | --program-transform-n | --program-transform- \ + | --program-transform | --program-transfor \ + | --program-transfo | --program-transf \ + | --program-trans | --program-tran \ + | --progr-tra | --program-tr | --program-t) + ac_prev=program_transform_name ;; + -program-transform-name=* | --program-transform-name=* \ + | --program-transform-nam=* | --program-transform-na=* \ + | --program-transform-n=* | --program-transform-=* \ + | --program-transform=* | --program-transfor=* \ + | --program-transfo=* | --program-transf=* \ + | --program-trans=* | --program-tran=* \ + | --progr-tra=* | --program-tr=* | --program-t=*) + program_transform_name=$ac_optarg ;; + + -pdfdir | --pdfdir | --pdfdi | --pdfd | --pdf | --pd) + ac_prev=pdfdir ;; + -pdfdir=* | --pdfdir=* | --pdfdi=* | --pdfd=* | --pdf=* | --pd=*) + pdfdir=$ac_optarg ;; + + -psdir | --psdir | --psdi | --psd | --ps) + ac_prev=psdir ;; + -psdir=* | --psdir=* | --psdi=* | --psd=* | --ps=*) + psdir=$ac_optarg ;; + + -q | -quiet | --quiet | --quie | --qui | --qu | --q \ + | -silent | --silent | --silen | --sile | --sil) + silent=yes ;; + + -runstatedir | --runstatedir | --runstatedi | --runstated \ + | --runstate | --runstat | --runsta | --runst | --runs \ + | --run | --ru | --r) + ac_prev=runstatedir ;; + -runstatedir=* | --runstatedir=* | --runstatedi=* | --runstated=* \ + | --runstate=* | --runstat=* | --runsta=* | --runst=* | --runs=* \ + | --run=* | --ru=* | --r=*) + runstatedir=$ac_optarg ;; + + -sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb) + ac_prev=sbindir ;; + -sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \ + | --sbi=* | --sb=*) + sbindir=$ac_optarg ;; + + -sharedstatedir | --sharedstatedir | --sharedstatedi \ + | --sharedstated | --sharedstate | --sharedstat | --sharedsta \ + | --sharedst | --shareds | --shared | --share | --shar \ + | --sha | --sh) + ac_prev=sharedstatedir ;; + -sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \ + | --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \ + | --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \ + | --sha=* | --sh=*) + sharedstatedir=$ac_optarg ;; + + -site | --site | --sit) + ac_prev=site ;; + -site=* | --site=* | --sit=*) + site=$ac_optarg ;; + + -srcdir | --srcdir | --srcdi | --srcd | --src | --sr) + ac_prev=srcdir ;; + -srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*) + srcdir=$ac_optarg ;; + + -sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \ + | --syscon | --sysco | --sysc | --sys | --sy) + ac_prev=sysconfdir ;; + -sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \ + | --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*) + sysconfdir=$ac_optarg ;; + + -target | --target | --targe | --targ | --tar | --ta | --t) + ac_prev=target_alias ;; + -target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*) + target_alias=$ac_optarg ;; + + -v | -verbose | --verbose | --verbos | --verbo | --verb) + verbose=yes ;; + + -version | --version | --versio | --versi | --vers | -V) + ac_init_version=: ;; + + -with-* | --with-*) + ac_useropt=`expr "x$ac_option" : 'x-*with-\([^=]*\)'` + # Reject names that are not valid shell variable names. + expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && + as_fn_error $? "invalid package name: '$ac_useropt'" + ac_useropt_orig=$ac_useropt + ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` + case $ac_user_opts in + *" +"with_$ac_useropt" +"*) ;; + *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--with-$ac_useropt_orig" + ac_unrecognized_sep=', ';; + esac + eval with_$ac_useropt=\$ac_optarg ;; + + -without-* | --without-*) + ac_useropt=`expr "x$ac_option" : 'x-*without-\(.*\)'` + # Reject names that are not valid shell variable names. + expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && + as_fn_error $? "invalid package name: '$ac_useropt'" + ac_useropt_orig=$ac_useropt + ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` + case $ac_user_opts in + *" +"with_$ac_useropt" +"*) ;; + *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--without-$ac_useropt_orig" + ac_unrecognized_sep=', ';; + esac + eval with_$ac_useropt=no ;; + + --x) + # Obsolete; use --with-x. + with_x=yes ;; + + -x-includes | --x-includes | --x-include | --x-includ | --x-inclu \ + | --x-incl | --x-inc | --x-in | --x-i) + ac_prev=x_includes ;; + -x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \ + | --x-incl=* | --x-inc=* | --x-in=* | --x-i=*) + x_includes=$ac_optarg ;; + + -x-libraries | --x-libraries | --x-librarie | --x-librari \ + | --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l) + ac_prev=x_libraries ;; + -x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \ + | --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*) + x_libraries=$ac_optarg ;; + + -*) as_fn_error $? "unrecognized option: '$ac_option' +Try '$0 --help' for more information" + ;; + + *=*) + ac_envvar=`expr "x$ac_option" : 'x\([^=]*\)='` + # Reject names that are not valid shell variable names. + case $ac_envvar in #( + '' | [0-9]* | *[!_$as_cr_alnum]* ) + as_fn_error $? "invalid variable name: '$ac_envvar'" ;; + esac + eval $ac_envvar=\$ac_optarg + export $ac_envvar ;; + + *) + # FIXME: should be removed in autoconf 3.0. + printf "%s\n" "$as_me: WARNING: you should use --build, --host, --target" >&2 + expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null && + printf "%s\n" "$as_me: WARNING: invalid host type: $ac_option" >&2 + : "${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option}" + ;; + + esac +done + +if test -n "$ac_prev"; then + ac_option=--`echo $ac_prev | sed 's/_/-/g'` + as_fn_error $? "missing argument to $ac_option" +fi + +if test -n "$ac_unrecognized_opts"; then + case $enable_option_checking in + no) ;; + fatal) as_fn_error $? "unrecognized options: $ac_unrecognized_opts" ;; + *) printf "%s\n" "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2 ;; + esac +fi + +# Check all directory arguments for consistency. +for ac_var in exec_prefix prefix bindir sbindir libexecdir datarootdir \ + datadir sysconfdir sharedstatedir localstatedir includedir \ + oldincludedir docdir infodir htmldir dvidir pdfdir psdir \ + libdir localedir mandir runstatedir +do + eval ac_val=\$$ac_var + # Remove trailing slashes. + case $ac_val in + */ ) + ac_val=`expr "X$ac_val" : 'X\(.*[^/]\)' \| "X$ac_val" : 'X\(.*\)'` + eval $ac_var=\$ac_val;; + esac + # Be sure to have absolute directory names. + case $ac_val in + [\\/$]* | ?:[\\/]* ) continue;; + NONE | '' ) case $ac_var in *prefix ) continue;; esac;; + esac + as_fn_error $? "expected an absolute directory name for --$ac_var: $ac_val" +done + +# There might be people who depend on the old broken behavior: '$host' +# used to hold the argument of --host etc. +# FIXME: To remove some day. +build=$build_alias +host=$host_alias +target=$target_alias + +# FIXME: To remove some day. +if test "x$host_alias" != x; then + if test "x$build_alias" = x; then + cross_compiling=maybe + elif test "x$build_alias" != "x$host_alias"; then + cross_compiling=yes + fi +fi + +ac_tool_prefix= +test -n "$host_alias" && ac_tool_prefix=$host_alias- + +test "$silent" = yes && exec 6>/dev/null + + +ac_pwd=`pwd` && test -n "$ac_pwd" && +ac_ls_di=`ls -di .` && +ac_pwd_ls_di=`cd "$ac_pwd" && ls -di .` || + as_fn_error $? "working directory cannot be determined" +test "X$ac_ls_di" = "X$ac_pwd_ls_di" || + as_fn_error $? "pwd does not report name of working directory" + + +# Find the source files, if location was not specified. +if test -z "$srcdir"; then + ac_srcdir_defaulted=yes + # Try the directory containing this script, then the parent directory. + ac_confdir=`$as_dirname -- "$as_myself" || +$as_expr X"$as_myself" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$as_myself" : 'X\(//\)[^/]' \| \ + X"$as_myself" : 'X\(//\)$' \| \ + X"$as_myself" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X"$as_myself" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + srcdir=$ac_confdir + if test ! -r "$srcdir/$ac_unique_file"; then + srcdir=.. + fi +else + ac_srcdir_defaulted=no +fi +if test ! -r "$srcdir/$ac_unique_file"; then + test "$ac_srcdir_defaulted" = yes && srcdir="$ac_confdir or .." + as_fn_error $? "cannot find sources ($ac_unique_file) in $srcdir" +fi +ac_msg="sources are in $srcdir, but 'cd $srcdir' does not work" +ac_abs_confdir=`( + cd "$srcdir" && test -r "./$ac_unique_file" || as_fn_error $? "$ac_msg" + pwd)` +# When building in place, set srcdir=. +if test "$ac_abs_confdir" = "$ac_pwd"; then + srcdir=. +fi +# Remove unnecessary trailing slashes from srcdir. +# Double slashes in file names in object file debugging info +# mess up M-x gdb in Emacs. +case $srcdir in +*/) srcdir=`expr "X$srcdir" : 'X\(.*[^/]\)' \| "X$srcdir" : 'X\(.*\)'`;; +esac +for ac_var in $ac_precious_vars; do + eval ac_env_${ac_var}_set=\${${ac_var}+set} + eval ac_env_${ac_var}_value=\$${ac_var} + eval ac_cv_env_${ac_var}_set=\${${ac_var}+set} + eval ac_cv_env_${ac_var}_value=\$${ac_var} +done + +# +# Report the --help message. +# +if test "$ac_init_help" = "long"; then + # Omit some internal or obsolete options to make the list less imposing. + # This message is too long to be a string in the A/UX 3.1 sh. + cat <<_ACEOF +'configure' configures mpfi (TeX Live) 1.5.4 to adapt to many kinds of systems. + +Usage: $0 [OPTION]... [VAR=VALUE]... + +To assign environment variables (e.g., CC, CFLAGS...), specify them as +VAR=VALUE. See below for descriptions of some of the useful variables. + +Defaults for the options are specified in brackets. + +Configuration: + -h, --help display this help and exit + --help=short display options specific to this package + --help=recursive display the short help of all the included packages + -V, --version display version information and exit + -q, --quiet, --silent do not print 'checking ...' messages + --cache-file=FILE cache test results in FILE [disabled] + -C, --config-cache alias for '--cache-file=config.cache' + -n, --no-create do not create output files + --srcdir=DIR find the sources in DIR [configure dir or '..'] + +Installation directories: + --prefix=PREFIX install architecture-independent files in PREFIX + [$ac_default_prefix] + --exec-prefix=EPREFIX install architecture-dependent files in EPREFIX + [PREFIX] + +By default, 'make install' will install all the files in +'$ac_default_prefix/bin', '$ac_default_prefix/lib' etc. You can specify +an installation prefix other than '$ac_default_prefix' using '--prefix', +for instance '--prefix=\$HOME'. + +For better control, use the options below. + +Fine tuning of the installation directories: + --bindir=DIR user executables [EPREFIX/bin] + --sbindir=DIR system admin executables [EPREFIX/sbin] + --libexecdir=DIR program executables [EPREFIX/libexec] + --sysconfdir=DIR read-only single-machine data [PREFIX/etc] + --sharedstatedir=DIR modifiable architecture-independent data [PREFIX/com] + --localstatedir=DIR modifiable single-machine data [PREFIX/var] + --runstatedir=DIR modifiable per-process data [LOCALSTATEDIR/run] + --libdir=DIR object code libraries [EPREFIX/lib] + --includedir=DIR C header files [PREFIX/include] + --oldincludedir=DIR C header files for non-gcc [/usr/include] + --datarootdir=DIR read-only arch.-independent data root [PREFIX/share] + --datadir=DIR read-only architecture-independent data [DATAROOTDIR] + --infodir=DIR info documentation [DATAROOTDIR/info] + --localedir=DIR locale-dependent data [DATAROOTDIR/locale] + --mandir=DIR man documentation [DATAROOTDIR/man] + --docdir=DIR documentation root [DATAROOTDIR/doc/mpfi--tex-live-] + --htmldir=DIR html documentation [DOCDIR] + --dvidir=DIR dvi documentation [DOCDIR] + --pdfdir=DIR pdf documentation [DOCDIR] + --psdir=DIR ps documentation [DOCDIR] +_ACEOF + + cat <<\_ACEOF + +Program names: + --program-prefix=PREFIX prepend PREFIX to installed program names + --program-suffix=SUFFIX append SUFFIX to installed program names + --program-transform-name=PROGRAM run sed PROGRAM on installed program names + +System types: + --build=BUILD configure for building on BUILD [guessed] + --host=HOST cross-compile to build programs to run on HOST [BUILD] +_ACEOF +fi + +if test -n "$ac_init_help"; then + case $ac_init_help in + short | recursive ) echo "Configuration of mpfi (TeX Live) 1.5.4:";; + esac + cat <<\_ACEOF + +Optional Features: + --disable-option-checking ignore unrecognized --enable/--with options + --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) + --enable-FEATURE[=ARG] include FEATURE [ARG=yes] + --enable-silent-rules less verbose build output (undo: "make V=1") + --disable-silent-rules verbose build output (undo: "make V=0") + --enable-maintainer-mode + enable make rules and dependencies not useful (and + sometimes confusing) to the casual installer + --enable-dependency-tracking + do not reject slow dependency extractors + --disable-dependency-tracking + speeds up one-time build + --enable-compiler-warnings=[no|min|yes|max|all] + Turn on compiler warnings [default: yes if + maintainer-mode, min otherwise] + +Optional Packages: + --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] + --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) + --with-system-gmp use installed gmp headers and library + --with-gmp-includes=DIR gmp headers installed in DIR + --with-gmp-libdir=DIR gmp library installed in DIR + --with-system-mpfr use installed mpfr headers and library + --with-mpfr-includes=DIR + mpfr headers installed in DIR + --with-mpfr-libdir=DIR mpfr library installed in DIR + +Some influential environment variables: + CC C compiler command + CFLAGS C compiler flags + LDFLAGS linker flags, e.g. -L if you have libraries in a + nonstandard directory + LIBS libraries to pass to the linker, e.g. -l + CPPFLAGS (Objective) C/C++ preprocessor flags, e.g. -I if + you have headers in a nonstandard directory + +Use these variables to override the choices made by 'configure' or to help +it to find libraries and programs with nonstandard names/locations. + +Report bugs to . +_ACEOF +ac_status=$? +fi + +if test "$ac_init_help" = "recursive"; then + # If there are subdirs, report their specific --help. + for ac_dir in : $ac_subdirs_all; do test "x$ac_dir" = x: && continue + test -d "$ac_dir" || + { cd "$srcdir" && ac_pwd=`pwd` && srcdir=. && test -d "$ac_dir"; } || + continue + ac_builddir=. + +case "$ac_dir" in +.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;; +*) + ac_dir_suffix=/`printf "%s\n" "$ac_dir" | sed 's|^\.[\\/]||'` + # A ".." for each directory in $ac_dir_suffix. + ac_top_builddir_sub=`printf "%s\n" "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'` + case $ac_top_builddir_sub in + "") ac_top_builddir_sub=. ac_top_build_prefix= ;; + *) ac_top_build_prefix=$ac_top_builddir_sub/ ;; + esac ;; +esac +ac_abs_top_builddir=$ac_pwd +ac_abs_builddir=$ac_pwd$ac_dir_suffix +# for backward compatibility: +ac_top_builddir=$ac_top_build_prefix + +case $srcdir in + .) # We are building in place. + ac_srcdir=. + ac_top_srcdir=$ac_top_builddir_sub + ac_abs_top_srcdir=$ac_pwd ;; + [\\/]* | ?:[\\/]* ) # Absolute name. + ac_srcdir=$srcdir$ac_dir_suffix; + ac_top_srcdir=$srcdir + ac_abs_top_srcdir=$srcdir ;; + *) # Relative name. + ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix + ac_top_srcdir=$ac_top_build_prefix$srcdir + ac_abs_top_srcdir=$ac_pwd/$srcdir ;; +esac +ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix + + cd "$ac_dir" || { ac_status=$?; continue; } + # Check for configure.gnu first; this name is used for a wrapper for + # Metaconfig's "Configure" on case-insensitive file systems. + if test -f "$ac_srcdir/configure.gnu"; then + echo && + $SHELL "$ac_srcdir/configure.gnu" --help=recursive + elif test -f "$ac_srcdir/configure"; then + echo && + $SHELL "$ac_srcdir/configure" --help=recursive + else + printf "%s\n" "$as_me: WARNING: no configuration information is in $ac_dir" >&2 + fi || ac_status=$? + cd "$ac_pwd" || { ac_status=$?; break; } + done +fi + +test -n "$ac_init_help" && exit $ac_status +if $ac_init_version; then + cat <<\_ACEOF +mpfi (TeX Live) configure 1.5.4 +generated by GNU Autoconf 2.72 + +Copyright (C) 2023 Free Software Foundation, Inc. +This configure script is free software; the Free Software Foundation +gives unlimited permission to copy, distribute and modify it. +_ACEOF + exit +fi + +## ------------------------ ## +## Autoconf initialization. ## +## ------------------------ ## + +# ac_fn_c_try_compile LINENO +# -------------------------- +# Try to compile conftest.$ac_ext, and return whether this succeeded. +ac_fn_c_try_compile () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + rm -f conftest.$ac_objext conftest.beam + if { { ac_try="$ac_compile" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_compile") 2>conftest.err + ac_status=$? + if test -s conftest.err; then + grep -v '^ *+' conftest.err >conftest.er1 + cat conftest.er1 >&5 + mv -f conftest.er1 conftest.err + fi + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } && { + test -z "$ac_c_werror_flag" || + test ! -s conftest.err + } && test -s conftest.$ac_objext +then : + ac_retval=0 +else case e in #( + e) printf "%s\n" "$as_me: failed program was:" >&5 +sed 's/^/| /' conftest.$ac_ext >&5 + + ac_retval=1 ;; +esac +fi + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + as_fn_set_status $ac_retval + +} # ac_fn_c_try_compile + +# ac_fn_c_try_link LINENO +# ----------------------- +# Try to link conftest.$ac_ext, and return whether this succeeded. +ac_fn_c_try_link () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + rm -f conftest.$ac_objext conftest.beam conftest$ac_exeext + if { { ac_try="$ac_link" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_link") 2>conftest.err + ac_status=$? + if test -s conftest.err; then + grep -v '^ *+' conftest.err >conftest.er1 + cat conftest.er1 >&5 + mv -f conftest.er1 conftest.err + fi + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } && { + test -z "$ac_c_werror_flag" || + test ! -s conftest.err + } && test -s conftest$ac_exeext && { + test "$cross_compiling" = yes || + test -x conftest$ac_exeext + } +then : + ac_retval=0 +else case e in #( + e) printf "%s\n" "$as_me: failed program was:" >&5 +sed 's/^/| /' conftest.$ac_ext >&5 + + ac_retval=1 ;; +esac +fi + # Delete the IPA/IPO (Inter Procedural Analysis/Optimization) information + # created by the PGI compiler (conftest_ipa8_conftest.oo), as it would + # interfere with the next link command; also delete a directory that is + # left behind by Apple's compiler. We do this before executing the actions. + rm -rf conftest.dSYM conftest_ipa8_conftest.oo + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + as_fn_set_status $ac_retval + +} # ac_fn_c_try_link + +# ac_fn_c_check_type LINENO TYPE VAR INCLUDES +# ------------------------------------------- +# Tests whether TYPE exists after having included INCLUDES, setting cache +# variable VAR accordingly. +ac_fn_c_check_type () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 +printf %s "checking for $2... " >&6; } +if eval test \${$3+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) eval "$3=no" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$4 +int +main (void) +{ +if (sizeof ($2)) + return 0; + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$4 +int +main (void) +{ +if (sizeof (($2))) + return 0; + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + +else case e in #( + e) eval "$3=yes" ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; +esac +fi +eval ac_res=\$$3 + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +printf "%s\n" "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_check_type + +# ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES +# ------------------------------------------------------- +# Tests whether HEADER exists and can be compiled using the include files in +# INCLUDES, setting the cache variable VAR accordingly. +ac_fn_c_check_header_compile () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 +printf %s "checking for $2... " >&6; } +if eval test \${$3+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$4 +#include <$2> +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + eval "$3=yes" +else case e in #( + e) eval "$3=no" ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; +esac +fi +eval ac_res=\$$3 + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +printf "%s\n" "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_check_header_compile + +# ac_fn_c_check_func LINENO FUNC VAR +# ---------------------------------- +# Tests whether FUNC exists, setting the cache variable VAR accordingly +ac_fn_c_check_func () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 +printf %s "checking for $2... " >&6; } +if eval test \${$3+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +/* Define $2 to an innocuous variant, in case declares $2. + For example, HP-UX 11i declares gettimeofday. */ +#define $2 innocuous_$2 + +/* System header to define __stub macros and hopefully few prototypes, + which can conflict with char $2 (void); below. */ + +#include +#undef $2 + +/* Override any GCC internal prototype to avoid an error. + Use char because int might match the return type of a GCC + builtin and then its argument prototype would still apply. */ +#ifdef __cplusplus +extern "C" +#endif +char $2 (void); +/* The GNU C library defines this for functions which it implements + to always fail with ENOSYS. Some functions are actually named + something starting with __ and the normal name is an alias. */ +#if defined __stub_$2 || defined __stub___$2 +choke me +#endif + +int +main (void) +{ +return $2 (); + ; + return 0; +} +_ACEOF +if ac_fn_c_try_link "$LINENO" +then : + eval "$3=yes" +else case e in #( + e) eval "$3=no" ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam \ + conftest$ac_exeext conftest.$ac_ext ;; +esac +fi +eval ac_res=\$$3 + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +printf "%s\n" "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_check_func +ac_configure_args_raw= +for ac_arg +do + case $ac_arg in + *\'*) + ac_arg=`printf "%s\n" "$ac_arg" | sed "s/'/'\\\\\\\\''/g"` ;; + esac + as_fn_append ac_configure_args_raw " '$ac_arg'" +done + +case $ac_configure_args_raw in + *$as_nl*) + ac_safe_unquote= ;; + *) + ac_unsafe_z='|&;<>()$`\\"*?[ '' ' # This string ends in space, tab. + ac_unsafe_a="$ac_unsafe_z#~" + ac_safe_unquote="s/ '\\([^$ac_unsafe_a][^$ac_unsafe_z]*\\)'/ \\1/g" + ac_configure_args_raw=` printf "%s\n" "$ac_configure_args_raw" | sed "$ac_safe_unquote"`;; +esac + +cat >config.log <<_ACEOF +This file contains any messages produced by compilers while +running configure, to aid debugging if configure makes a mistake. + +It was created by mpfi (TeX Live) $as_me 1.5.4, which was +generated by GNU Autoconf 2.72. Invocation command line was + + $ $0$ac_configure_args_raw + +_ACEOF +exec 5>>config.log +{ +cat <<_ASUNAME +## --------- ## +## Platform. ## +## --------- ## + +hostname = `(hostname || uname -n) 2>/dev/null | sed 1q` +uname -m = `(uname -m) 2>/dev/null || echo unknown` +uname -r = `(uname -r) 2>/dev/null || echo unknown` +uname -s = `(uname -s) 2>/dev/null || echo unknown` +uname -v = `(uname -v) 2>/dev/null || echo unknown` + +/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null || echo unknown` +/bin/uname -X = `(/bin/uname -X) 2>/dev/null || echo unknown` + +/bin/arch = `(/bin/arch) 2>/dev/null || echo unknown` +/usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null || echo unknown` +/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null || echo unknown` +/usr/bin/hostinfo = `(/usr/bin/hostinfo) 2>/dev/null || echo unknown` +/bin/machine = `(/bin/machine) 2>/dev/null || echo unknown` +/usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null || echo unknown` +/bin/universe = `(/bin/universe) 2>/dev/null || echo unknown` + +_ASUNAME + +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + printf "%s\n" "PATH: $as_dir" + done +IFS=$as_save_IFS + +} >&5 + +cat >&5 <<_ACEOF + + +## ----------- ## +## Core tests. ## +## ----------- ## + +_ACEOF + + +# Keep a trace of the command line. +# Strip out --no-create and --no-recursion so they do not pile up. +# Strip out --silent because we don't want to record it for future runs. +# Also quote any args containing shell meta-characters. +# Make two passes to allow for proper duplicate-argument suppression. +ac_configure_args= +ac_configure_args0= +ac_configure_args1= +ac_must_keep_next=false +for ac_pass in 1 2 +do + for ac_arg + do + case $ac_arg in + -no-create | --no-c* | -n | -no-recursion | --no-r*) continue ;; + -q | -quiet | --quiet | --quie | --qui | --qu | --q \ + | -silent | --silent | --silen | --sile | --sil) + continue ;; + *\'*) + ac_arg=`printf "%s\n" "$ac_arg" | sed "s/'/'\\\\\\\\''/g"` ;; + esac + case $ac_pass in + 1) as_fn_append ac_configure_args0 " '$ac_arg'" ;; + 2) + as_fn_append ac_configure_args1 " '$ac_arg'" + if test $ac_must_keep_next = true; then + ac_must_keep_next=false # Got value, back to normal. + else + case $ac_arg in + *=* | --config-cache | -C | -disable-* | --disable-* \ + | -enable-* | --enable-* | -gas | --g* | -nfp | --nf* \ + | -q | -quiet | --q* | -silent | --sil* | -v | -verb* \ + | -with-* | --with-* | -without-* | --without-* | --x) + case "$ac_configure_args0 " in + "$ac_configure_args1"*" '$ac_arg' "* ) continue ;; + esac + ;; + -* ) ac_must_keep_next=true ;; + esac + fi + as_fn_append ac_configure_args " '$ac_arg'" + ;; + esac + done +done +{ ac_configure_args0=; unset ac_configure_args0;} +{ ac_configure_args1=; unset ac_configure_args1;} + +# When interrupted or exit'd, cleanup temporary files, and complete +# config.log. We remove comments because anyway the quotes in there +# would cause problems or look ugly. +# WARNING: Use '\'' to represent an apostrophe within the trap. +# WARNING: Do not start the trap code with a newline, due to a FreeBSD 4.0 bug. +trap 'exit_status=$? + # Sanitize IFS. + IFS=" "" $as_nl" + # Save into config.log some information that might help in debugging. + { + echo + + printf "%s\n" "## ---------------- ## +## Cache variables. ## +## ---------------- ##" + echo + # The following way of writing the cache mishandles newlines in values, +( + for ac_var in `(set) 2>&1 | sed -n '\''s/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'\''`; do + eval ac_val=\$$ac_var + case $ac_val in #( + *${as_nl}*) + case $ac_var in #( + *_cv_*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5 +printf "%s\n" "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;; + esac + case $ac_var in #( + _ | IFS | as_nl) ;; #( + BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #( + *) { eval $ac_var=; unset $ac_var;} ;; + esac ;; + esac + done + (set) 2>&1 | + case $as_nl`(ac_space='\'' '\''; set) 2>&1` in #( + *${as_nl}ac_space=\ *) + sed -n \ + "s/'\''/'\''\\\\'\'''\''/g; + s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\''\\2'\''/p" + ;; #( + *) + sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p" + ;; + esac | + sort +) + echo + + printf "%s\n" "## ----------------- ## +## Output variables. ## +## ----------------- ##" + echo + for ac_var in $ac_subst_vars + do + eval ac_val=\$$ac_var + case $ac_val in + *\'\''*) ac_val=`printf "%s\n" "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;; + esac + printf "%s\n" "$ac_var='\''$ac_val'\''" + done | sort + echo + + if test -n "$ac_subst_files"; then + printf "%s\n" "## ------------------- ## +## File substitutions. ## +## ------------------- ##" + echo + for ac_var in $ac_subst_files + do + eval ac_val=\$$ac_var + case $ac_val in + *\'\''*) ac_val=`printf "%s\n" "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;; + esac + printf "%s\n" "$ac_var='\''$ac_val'\''" + done | sort + echo + fi + + if test -s confdefs.h; then + printf "%s\n" "## ----------- ## +## confdefs.h. ## +## ----------- ##" + echo + cat confdefs.h + echo + fi + test "$ac_signal" != 0 && + printf "%s\n" "$as_me: caught signal $ac_signal" + printf "%s\n" "$as_me: exit $exit_status" + } >&5 + rm -f core *.core core.conftest.* && + rm -f -r conftest* confdefs* conf$$* $ac_clean_files && + exit $exit_status +' 0 +for ac_signal in 1 2 13 15; do + trap 'ac_signal='$ac_signal'; as_fn_exit 1' $ac_signal +done +ac_signal=0 + +# confdefs.h avoids OS command line length limits that DEFS can exceed. +rm -f -r conftest* confdefs.h + +printf "%s\n" "/* confdefs.h */" > confdefs.h + +# Predefined preprocessor variables. + +printf "%s\n" "#define PACKAGE_NAME \"$PACKAGE_NAME\"" >>confdefs.h + +printf "%s\n" "#define PACKAGE_TARNAME \"$PACKAGE_TARNAME\"" >>confdefs.h + +printf "%s\n" "#define PACKAGE_VERSION \"$PACKAGE_VERSION\"" >>confdefs.h + +printf "%s\n" "#define PACKAGE_STRING \"$PACKAGE_STRING\"" >>confdefs.h + +printf "%s\n" "#define PACKAGE_BUGREPORT \"$PACKAGE_BUGREPORT\"" >>confdefs.h + +printf "%s\n" "#define PACKAGE_URL \"$PACKAGE_URL\"" >>confdefs.h + + +# Let the site file select an alternate cache file if it wants to. +# Prefer an explicitly selected file to automatically selected ones. +if test -n "$CONFIG_SITE"; then + ac_site_files="$CONFIG_SITE" +elif test "x$prefix" != xNONE; then + ac_site_files="$prefix/share/config.site $prefix/etc/config.site" +else + ac_site_files="$ac_default_prefix/share/config.site $ac_default_prefix/etc/config.site" +fi + +for ac_site_file in $ac_site_files +do + case $ac_site_file in #( + */*) : + ;; #( + *) : + ac_site_file=./$ac_site_file ;; +esac + if test -f "$ac_site_file" && test -r "$ac_site_file"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: loading site script $ac_site_file" >&5 +printf "%s\n" "$as_me: loading site script $ac_site_file" >&6;} + sed 's/^/| /' "$ac_site_file" >&5 + . "$ac_site_file" \ + || { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error $? "failed to load site script $ac_site_file +See 'config.log' for more details" "$LINENO" 5; } + fi +done + +if test -r "$cache_file"; then + # Some versions of bash will fail to source /dev/null (special files + # actually), so we avoid doing that. DJGPP emulates it as a regular file. + if test /dev/null != "$cache_file" && test -f "$cache_file"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: loading cache $cache_file" >&5 +printf "%s\n" "$as_me: loading cache $cache_file" >&6;} + case $cache_file in + [\\/]* | ?:[\\/]* ) . "$cache_file";; + *) . "./$cache_file";; + esac + fi +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: creating cache $cache_file" >&5 +printf "%s\n" "$as_me: creating cache $cache_file" >&6;} + >$cache_file +fi + +# Test code for whether the C compiler supports C89 (global declarations) +ac_c_conftest_c89_globals=' +/* Does the compiler advertise C89 conformance? + Do not test the value of __STDC__, because some compilers set it to 0 + while being otherwise adequately conformant. */ +#if !defined __STDC__ +# error "Compiler does not advertise C89 conformance" +#endif + +#include +#include +struct stat; +/* Most of the following tests are stolen from RCS 5.7 src/conf.sh. */ +struct buf { int x; }; +struct buf * (*rcsopen) (struct buf *, struct stat *, int); +static char *e (char **p, int i) +{ + return p[i]; +} +static char *f (char * (*g) (char **, int), char **p, ...) +{ + char *s; + va_list v; + va_start (v,p); + s = g (p, va_arg (v,int)); + va_end (v); + return s; +} + +/* C89 style stringification. */ +#define noexpand_stringify(a) #a +const char *stringified = noexpand_stringify(arbitrary+token=sequence); + +/* C89 style token pasting. Exercises some of the corner cases that + e.g. old MSVC gets wrong, but not very hard. */ +#define noexpand_concat(a,b) a##b +#define expand_concat(a,b) noexpand_concat(a,b) +extern int vA; +extern int vbee; +#define aye A +#define bee B +int *pvA = &expand_concat(v,aye); +int *pvbee = &noexpand_concat(v,bee); + +/* OSF 4.0 Compaq cc is some sort of almost-ANSI by default. It has + function prototypes and stuff, but not \xHH hex character constants. + These do not provoke an error unfortunately, instead are silently treated + as an "x". The following induces an error, until -std is added to get + proper ANSI mode. Curiously \x00 != x always comes out true, for an + array size at least. It is necessary to write \x00 == 0 to get something + that is true only with -std. */ +int osf4_cc_array ['\''\x00'\'' == 0 ? 1 : -1]; + +/* IBM C 6 for AIX is almost-ANSI by default, but it replaces macro parameters + inside strings and character constants. */ +#define FOO(x) '\''x'\'' +int xlc6_cc_array[FOO(a) == '\''x'\'' ? 1 : -1]; + +int test (int i, double x); +struct s1 {int (*f) (int a);}; +struct s2 {int (*f) (double a);}; +int pairnames (int, char **, int *(*)(struct buf *, struct stat *, int), + int, int);' + +# Test code for whether the C compiler supports C89 (body of main). +ac_c_conftest_c89_main=' +ok |= (argc == 0 || f (e, argv, 0) != argv[0] || f (e, argv, 1) != argv[1]); +' + +# Test code for whether the C compiler supports C99 (global declarations) +ac_c_conftest_c99_globals=' +/* Does the compiler advertise C99 conformance? */ +#if !defined __STDC_VERSION__ || __STDC_VERSION__ < 199901L +# error "Compiler does not advertise C99 conformance" +#endif + +// See if C++-style comments work. + +#include +extern int puts (const char *); +extern int printf (const char *, ...); +extern int dprintf (int, const char *, ...); +extern void *malloc (size_t); +extern void free (void *); + +// Check varargs macros. These examples are taken from C99 6.10.3.5. +// dprintf is used instead of fprintf to avoid needing to declare +// FILE and stderr. +#define debug(...) dprintf (2, __VA_ARGS__) +#define showlist(...) puts (#__VA_ARGS__) +#define report(test,...) ((test) ? puts (#test) : printf (__VA_ARGS__)) +static void +test_varargs_macros (void) +{ + int x = 1234; + int y = 5678; + debug ("Flag"); + debug ("X = %d\n", x); + showlist (The first, second, and third items.); + report (x>y, "x is %d but y is %d", x, y); +} + +// Check long long types. +#define BIG64 18446744073709551615ull +#define BIG32 4294967295ul +#define BIG_OK (BIG64 / BIG32 == 4294967297ull && BIG64 % BIG32 == 0) +#if !BIG_OK + #error "your preprocessor is broken" +#endif +#if BIG_OK +#else + #error "your preprocessor is broken" +#endif +static long long int bignum = -9223372036854775807LL; +static unsigned long long int ubignum = BIG64; + +struct incomplete_array +{ + int datasize; + double data[]; +}; + +struct named_init { + int number; + const wchar_t *name; + double average; +}; + +typedef const char *ccp; + +static inline int +test_restrict (ccp restrict text) +{ + // Iterate through items via the restricted pointer. + // Also check for declarations in for loops. + for (unsigned int i = 0; *(text+i) != '\''\0'\''; ++i) + continue; + return 0; +} + +// Check varargs and va_copy. +static bool +test_varargs (const char *format, ...) +{ + va_list args; + va_start (args, format); + va_list args_copy; + va_copy (args_copy, args); + + const char *str = ""; + int number = 0; + float fnumber = 0; + + while (*format) + { + switch (*format++) + { + case '\''s'\'': // string + str = va_arg (args_copy, const char *); + break; + case '\''d'\'': // int + number = va_arg (args_copy, int); + break; + case '\''f'\'': // float + fnumber = va_arg (args_copy, double); + break; + default: + break; + } + } + va_end (args_copy); + va_end (args); + + return *str && number && fnumber; +} +' + +# Test code for whether the C compiler supports C99 (body of main). +ac_c_conftest_c99_main=' + // Check bool. + _Bool success = false; + success |= (argc != 0); + + // Check restrict. + if (test_restrict ("String literal") == 0) + success = true; + char *restrict newvar = "Another string"; + + // Check varargs. + success &= test_varargs ("s, d'\'' f .", "string", 65, 34.234); + test_varargs_macros (); + + // Check flexible array members. + struct incomplete_array *ia = + malloc (sizeof (struct incomplete_array) + (sizeof (double) * 10)); + ia->datasize = 10; + for (int i = 0; i < ia->datasize; ++i) + ia->data[i] = i * 1.234; + // Work around memory leak warnings. + free (ia); + + // Check named initializers. + struct named_init ni = { + .number = 34, + .name = L"Test wide string", + .average = 543.34343, + }; + + ni.number = 58; + + int dynamic_array[ni.number]; + dynamic_array[0] = argv[0][0]; + dynamic_array[ni.number - 1] = 543; + + // work around unused variable warnings + ok |= (!success || bignum == 0LL || ubignum == 0uLL || newvar[0] == '\''x'\'' + || dynamic_array[ni.number - 1] != 543); +' + +# Test code for whether the C compiler supports C11 (global declarations) +ac_c_conftest_c11_globals=' +/* Does the compiler advertise C11 conformance? */ +#if !defined __STDC_VERSION__ || __STDC_VERSION__ < 201112L +# error "Compiler does not advertise C11 conformance" +#endif + +// Check _Alignas. +char _Alignas (double) aligned_as_double; +char _Alignas (0) no_special_alignment; +extern char aligned_as_int; +char _Alignas (0) _Alignas (int) aligned_as_int; + +// Check _Alignof. +enum +{ + int_alignment = _Alignof (int), + int_array_alignment = _Alignof (int[100]), + char_alignment = _Alignof (char) +}; +_Static_assert (0 < -_Alignof (int), "_Alignof is signed"); + +// Check _Noreturn. +int _Noreturn does_not_return (void) { for (;;) continue; } + +// Check _Static_assert. +struct test_static_assert +{ + int x; + _Static_assert (sizeof (int) <= sizeof (long int), + "_Static_assert does not work in struct"); + long int y; +}; + +// Check UTF-8 literals. +#define u8 syntax error! +char const utf8_literal[] = u8"happens to be ASCII" "another string"; + +// Check duplicate typedefs. +typedef long *long_ptr; +typedef long int *long_ptr; +typedef long_ptr long_ptr; + +// Anonymous structures and unions -- taken from C11 6.7.2.1 Example 1. +struct anonymous +{ + union { + struct { int i; int j; }; + struct { int k; long int l; } w; + }; + int m; +} v1; +' + +# Test code for whether the C compiler supports C11 (body of main). +ac_c_conftest_c11_main=' + _Static_assert ((offsetof (struct anonymous, i) + == offsetof (struct anonymous, w.k)), + "Anonymous union alignment botch"); + v1.i = 2; + v1.w.k = 5; + ok |= v1.i != 5; +' + +# Test code for whether the C compiler supports C11 (complete). +ac_c_conftest_c11_program="${ac_c_conftest_c89_globals} +${ac_c_conftest_c99_globals} +${ac_c_conftest_c11_globals} + +int +main (int argc, char **argv) +{ + int ok = 0; + ${ac_c_conftest_c89_main} + ${ac_c_conftest_c99_main} + ${ac_c_conftest_c11_main} + return ok; +} +" + +# Test code for whether the C compiler supports C99 (complete). +ac_c_conftest_c99_program="${ac_c_conftest_c89_globals} +${ac_c_conftest_c99_globals} + +int +main (int argc, char **argv) +{ + int ok = 0; + ${ac_c_conftest_c89_main} + ${ac_c_conftest_c99_main} + return ok; +} +" + +# Test code for whether the C compiler supports C89 (complete). +ac_c_conftest_c89_program="${ac_c_conftest_c89_globals} + +int +main (int argc, char **argv) +{ + int ok = 0; + ${ac_c_conftest_c89_main} + return ok; +} +" + +as_fn_append ac_header_c_list " stdio.h stdio_h HAVE_STDIO_H" +as_fn_append ac_header_c_list " stdlib.h stdlib_h HAVE_STDLIB_H" +as_fn_append ac_header_c_list " string.h string_h HAVE_STRING_H" +as_fn_append ac_header_c_list " inttypes.h inttypes_h HAVE_INTTYPES_H" +as_fn_append ac_header_c_list " stdint.h stdint_h HAVE_STDINT_H" +as_fn_append ac_header_c_list " strings.h strings_h HAVE_STRINGS_H" +as_fn_append ac_header_c_list " sys/stat.h sys_stat_h HAVE_SYS_STAT_H" +as_fn_append ac_header_c_list " sys/types.h sys_types_h HAVE_SYS_TYPES_H" +as_fn_append ac_header_c_list " unistd.h unistd_h HAVE_UNISTD_H" + +# Auxiliary files required by this configure script. +ac_aux_files="config.guess config.sub compile missing install-sh" + +# Locations in which to look for auxiliary files. +ac_aux_dir_candidates="${srcdir}/../../build-aux" + +# Search for a directory containing all of the required auxiliary files, +# $ac_aux_files, from the $PATH-style list $ac_aux_dir_candidates. +# If we don't find one directory that contains all the files we need, +# we report the set of missing files from the *first* directory in +# $ac_aux_dir_candidates and give up. +ac_missing_aux_files="" +ac_first_candidate=: +printf "%s\n" "$as_me:${as_lineno-$LINENO}: looking for aux files: $ac_aux_files" >&5 +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +as_found=false +for as_dir in $ac_aux_dir_candidates +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + as_found=: + + printf "%s\n" "$as_me:${as_lineno-$LINENO}: trying $as_dir" >&5 + ac_aux_dir_found=yes + ac_install_sh= + for ac_aux in $ac_aux_files + do + # As a special case, if "install-sh" is required, that requirement + # can be satisfied by any of "install-sh", "install.sh", or "shtool", + # and $ac_install_sh is set appropriately for whichever one is found. + if test x"$ac_aux" = x"install-sh" + then + if test -f "${as_dir}install-sh"; then + printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}install-sh found" >&5 + ac_install_sh="${as_dir}install-sh -c" + elif test -f "${as_dir}install.sh"; then + printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}install.sh found" >&5 + ac_install_sh="${as_dir}install.sh -c" + elif test -f "${as_dir}shtool"; then + printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}shtool found" >&5 + ac_install_sh="${as_dir}shtool install -c" + else + ac_aux_dir_found=no + if $ac_first_candidate; then + ac_missing_aux_files="${ac_missing_aux_files} install-sh" + else + break + fi + fi + else + if test -f "${as_dir}${ac_aux}"; then + printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}${ac_aux} found" >&5 + else + ac_aux_dir_found=no + if $ac_first_candidate; then + ac_missing_aux_files="${ac_missing_aux_files} ${ac_aux}" + else + break + fi + fi + fi + done + if test "$ac_aux_dir_found" = yes; then + ac_aux_dir="$as_dir" + break + fi + ac_first_candidate=false + + as_found=false +done +IFS=$as_save_IFS +if $as_found +then : + +else case e in #( + e) as_fn_error $? "cannot find required auxiliary files:$ac_missing_aux_files" "$LINENO" 5 ;; +esac +fi + + +# These three variables are undocumented and unsupported, +# and are intended to be withdrawn in a future Autoconf release. +# They can cause serious problems if a builder's source tree is in a directory +# whose full name contains unusual characters. +if test -f "${ac_aux_dir}config.guess"; then + ac_config_guess="$SHELL ${ac_aux_dir}config.guess" +fi +if test -f "${ac_aux_dir}config.sub"; then + ac_config_sub="$SHELL ${ac_aux_dir}config.sub" +fi +if test -f "$ac_aux_dir/configure"; then + ac_configure="$SHELL ${ac_aux_dir}configure" +fi + +# Check that the precious variables saved in the cache have kept the same +# value. +ac_cache_corrupted=false +for ac_var in $ac_precious_vars; do + eval ac_old_set=\$ac_cv_env_${ac_var}_set + eval ac_new_set=\$ac_env_${ac_var}_set + eval ac_old_val=\$ac_cv_env_${ac_var}_value + eval ac_new_val=\$ac_env_${ac_var}_value + case $ac_old_set,$ac_new_set in + set,) + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: '$ac_var' was set to '$ac_old_val' in the previous run" >&5 +printf "%s\n" "$as_me: error: '$ac_var' was set to '$ac_old_val' in the previous run" >&2;} + ac_cache_corrupted=: ;; + ,set) + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: '$ac_var' was not set in the previous run" >&5 +printf "%s\n" "$as_me: error: '$ac_var' was not set in the previous run" >&2;} + ac_cache_corrupted=: ;; + ,);; + *) + if test "x$ac_old_val" != "x$ac_new_val"; then + # differences in whitespace do not lead to failure. + ac_old_val_w=`echo x $ac_old_val` + ac_new_val_w=`echo x $ac_new_val` + if test "$ac_old_val_w" != "$ac_new_val_w"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: '$ac_var' has changed since the previous run:" >&5 +printf "%s\n" "$as_me: error: '$ac_var' has changed since the previous run:" >&2;} + ac_cache_corrupted=: + else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: warning: ignoring whitespace changes in '$ac_var' since the previous run:" >&5 +printf "%s\n" "$as_me: warning: ignoring whitespace changes in '$ac_var' since the previous run:" >&2;} + eval $ac_var=\$ac_old_val + fi + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: former value: '$ac_old_val'" >&5 +printf "%s\n" "$as_me: former value: '$ac_old_val'" >&2;} + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: current value: '$ac_new_val'" >&5 +printf "%s\n" "$as_me: current value: '$ac_new_val'" >&2;} + fi;; + esac + # Pass precious variables to config.status. + if test "$ac_new_set" = set; then + case $ac_new_val in + *\'*) ac_arg=$ac_var=`printf "%s\n" "$ac_new_val" | sed "s/'/'\\\\\\\\''/g"` ;; + *) ac_arg=$ac_var=$ac_new_val ;; + esac + case " $ac_configure_args " in + *" '$ac_arg' "*) ;; # Avoid dups. Use of quotes ensures accuracy. + *) as_fn_append ac_configure_args " '$ac_arg'" ;; + esac + fi +done +if $ac_cache_corrupted; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: changes in the environment can compromise the build" >&5 +printf "%s\n" "$as_me: error: changes in the environment can compromise the build" >&2;} + as_fn_error $? "run '${MAKE-make} distclean' and/or 'rm $cache_file' + and start over" "$LINENO" 5 +fi +## -------------------- ## +## Main body of script. ## +## -------------------- ## + +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + + + + + + + +am__api_version='1.16' + + + + # Find a good install program. We prefer a C program (faster), +# so one script is as good as another. But avoid the broken or +# incompatible versions: +# SysV /etc/install, /usr/sbin/install +# SunOS /usr/etc/install +# IRIX /sbin/install +# AIX /bin/install +# AmigaOS /C/install, which installs bootblocks on floppy discs +# AIX 4 /usr/bin/installbsd, which doesn't work without a -g flag +# AFS /usr/afsws/bin/install, which mishandles nonexistent args +# SVR4 /usr/ucb/install, which tries to use the nonexistent group "staff" +# OS/2's system install, which has a completely different semantic +# ./install, which can be erroneously created by make from ./install.sh. +# Reject install programs that cannot install multiple files. +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for a BSD-compatible install" >&5 +printf %s "checking for a BSD-compatible install... " >&6; } +if test -z "$INSTALL"; then +if test ${ac_cv_path_install+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + # Account for fact that we put trailing slashes in our PATH walk. +case $as_dir in #(( + ./ | /[cC]/* | \ + /etc/* | /usr/sbin/* | /usr/etc/* | /sbin/* | /usr/afsws/bin/* | \ + ?:[\\/]os2[\\/]install[\\/]* | ?:[\\/]OS2[\\/]INSTALL[\\/]* | \ + /usr/ucb/* ) ;; + *) + # OSF1 and SCO ODT 3.0 have their own names for install. + # Don't use installbsd from OSF since it installs stuff as root + # by default. + for ac_prog in ginstall scoinst install; do + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_prog$ac_exec_ext"; then + if test $ac_prog = install && + grep dspmsg "$as_dir$ac_prog$ac_exec_ext" >/dev/null 2>&1; then + # AIX install. It has an incompatible calling convention. + : + elif test $ac_prog = install && + grep pwplus "$as_dir$ac_prog$ac_exec_ext" >/dev/null 2>&1; then + # program-specific install script used by HP pwplus--don't use. + : + else + rm -rf conftest.one conftest.two conftest.dir + echo one > conftest.one + echo two > conftest.two + mkdir conftest.dir + if "$as_dir$ac_prog$ac_exec_ext" -c conftest.one conftest.two "`pwd`/conftest.dir/" && + test -s conftest.one && test -s conftest.two && + test -s conftest.dir/conftest.one && + test -s conftest.dir/conftest.two + then + ac_cv_path_install="$as_dir$ac_prog$ac_exec_ext -c" + break 3 + fi + fi + fi + done + done + ;; +esac + + done +IFS=$as_save_IFS + +rm -rf conftest.one conftest.two conftest.dir + ;; +esac +fi + if test ${ac_cv_path_install+y}; then + INSTALL=$ac_cv_path_install + else + # As a last resort, use the slow shell script. Don't cache a + # value for INSTALL within a source directory, because that will + # break other packages using the cache if that directory is + # removed, or if the value is a relative name. + INSTALL=$ac_install_sh + fi +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $INSTALL" >&5 +printf "%s\n" "$INSTALL" >&6; } + +# Use test -z because SunOS4 sh mishandles braces in ${var-val}. +# It thinks the first close brace ends the variable substitution. +test -z "$INSTALL_PROGRAM" && INSTALL_PROGRAM='${INSTALL}' + +test -z "$INSTALL_SCRIPT" && INSTALL_SCRIPT='${INSTALL}' + +test -z "$INSTALL_DATA" && INSTALL_DATA='${INSTALL} -m 644' + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether build environment is sane" >&5 +printf %s "checking whether build environment is sane... " >&6; } +# Reject unsafe characters in $srcdir or the absolute working directory +# name. Accept space and tab only in the latter. +am_lf=' +' +case `pwd` in + *[\\\"\#\$\&\'\`$am_lf]*) + as_fn_error $? "unsafe absolute working directory name" "$LINENO" 5;; +esac +case $srcdir in + *[\\\"\#\$\&\'\`$am_lf\ \ ]*) + as_fn_error $? "unsafe srcdir value: '$srcdir'" "$LINENO" 5;; +esac + +# Do 'set' in a subshell so we don't clobber the current shell's +# arguments. Must try -L first in case configure is actually a +# symlink; some systems play weird games with the mod time of symlinks +# (eg FreeBSD returns the mod time of the symlink's containing +# directory). +if ( + am_has_slept=no + for am_try in 1 2; do + echo "timestamp, slept: $am_has_slept" > conftest.file + set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null` + if test "$*" = "X"; then + # -L didn't work. + set X `ls -t "$srcdir/configure" conftest.file` + fi + if test "$*" != "X $srcdir/configure conftest.file" \ + && test "$*" != "X conftest.file $srcdir/configure"; then + + # If neither matched, then we have a broken ls. This can happen + # if, for instance, CONFIG_SHELL is bash and it inherits a + # broken ls alias from the environment. This has actually + # happened. Such a system could not be considered "sane". + as_fn_error $? "ls -t appears to fail. Make sure there is not a broken + alias in your environment" "$LINENO" 5 + fi + if test "$2" = conftest.file || test $am_try -eq 2; then + break + fi + # Just in case. + sleep 1 + am_has_slept=yes + done + test "$2" = conftest.file + ) +then + # Ok. + : +else + as_fn_error $? "newly created file is older than distributed files! +Check your system clock" "$LINENO" 5 +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 +printf "%s\n" "yes" >&6; } +# If we didn't sleep, we still need to ensure time stamps of config.status and +# generated files are strictly newer. +am_sleep_pid= +if grep 'slept: no' conftest.file >/dev/null 2>&1; then + ( sleep 1 ) & + am_sleep_pid=$! +fi + +rm -f conftest.file + +test "$program_prefix" != NONE && + program_transform_name="s&^&$program_prefix&;$program_transform_name" +# Use a double $ so make ignores it. +test "$program_suffix" != NONE && + program_transform_name="s&\$&$program_suffix&;$program_transform_name" +# Double any \ or $. +# By default was 's,x,x', remove it if useless. +ac_script='s/[\\$]/&&/g;s/;s,x,x,$//' +program_transform_name=`printf "%s\n" "$program_transform_name" | sed "$ac_script"` + + +# Expand $ac_aux_dir to an absolute path. +am_aux_dir=`cd "$ac_aux_dir" && pwd` + + + if test x"${MISSING+set}" != xset; then + MISSING="\${SHELL} '$am_aux_dir/missing'" +fi +# Use eval to expand $SHELL +if eval "$MISSING --is-lightweight"; then + am_missing_run="$MISSING " +else + am_missing_run= + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: 'missing' script is too old or missing" >&5 +printf "%s\n" "$as_me: WARNING: 'missing' script is too old or missing" >&2;} +fi + +if test x"${install_sh+set}" != xset; then + case $am_aux_dir in + *\ * | *\ *) + install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;; + *) + install_sh="\${SHELL} $am_aux_dir/install-sh" + esac +fi + +# Installed binaries are usually stripped using 'strip' when the user +# run "make install-strip". However 'strip' might not be the right +# tool to use in cross-compilation environments, therefore Automake +# will honor the 'STRIP' environment variable to overrule this program. +if test "$cross_compiling" != no; then + if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}strip", so it can be a program name with args. +set dummy ${ac_tool_prefix}strip; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_STRIP+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$STRIP"; then + ac_cv_prog_STRIP="$STRIP" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_STRIP="${ac_tool_prefix}strip" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +STRIP=$ac_cv_prog_STRIP +if test -n "$STRIP"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $STRIP" >&5 +printf "%s\n" "$STRIP" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_STRIP"; then + ac_ct_STRIP=$STRIP + # Extract the first word of "strip", so it can be a program name with args. +set dummy strip; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_STRIP+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_STRIP"; then + ac_cv_prog_ac_ct_STRIP="$ac_ct_STRIP" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_STRIP="strip" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_STRIP=$ac_cv_prog_ac_ct_STRIP +if test -n "$ac_ct_STRIP"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_STRIP" >&5 +printf "%s\n" "$ac_ct_STRIP" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + if test "x$ac_ct_STRIP" = x; then + STRIP=":" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + STRIP=$ac_ct_STRIP + fi +else + STRIP="$ac_cv_prog_STRIP" +fi + +fi +INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s" + + + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for a race-free mkdir -p" >&5 +printf %s "checking for a race-free mkdir -p... " >&6; } +if test -z "$MKDIR_P"; then + if test ${ac_cv_path_mkdir+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH$PATH_SEPARATOR/opt/sfw/bin +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_prog in mkdir gmkdir; do + for ac_exec_ext in '' $ac_executable_extensions; do + as_fn_executable_p "$as_dir$ac_prog$ac_exec_ext" || continue + case `"$as_dir$ac_prog$ac_exec_ext" --version 2>&1` in #( + 'mkdir ('*'coreutils) '* | \ + *'BusyBox '* | \ + 'mkdir (fileutils) '4.1*) + ac_cv_path_mkdir=$as_dir$ac_prog$ac_exec_ext + break 3;; + esac + done + done + done +IFS=$as_save_IFS + ;; +esac +fi + + test -d ./--version && rmdir ./--version + if test ${ac_cv_path_mkdir+y}; then + MKDIR_P="$ac_cv_path_mkdir -p" + else + # As a last resort, use plain mkdir -p, + # in the hope it doesn't have the bugs of ancient mkdir. + MKDIR_P='mkdir -p' + fi +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $MKDIR_P" >&5 +printf "%s\n" "$MKDIR_P" >&6; } + +for ac_prog in gawk mawk nawk awk +do + # Extract the first word of "$ac_prog", so it can be a program name with args. +set dummy $ac_prog; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_AWK+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$AWK"; then + ac_cv_prog_AWK="$AWK" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_AWK="$ac_prog" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +AWK=$ac_cv_prog_AWK +if test -n "$AWK"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AWK" >&5 +printf "%s\n" "$AWK" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + test -n "$AWK" && break +done + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5 +printf %s "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } +set x ${MAKE-make} +ac_make=`printf "%s\n" "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` +if eval test \${ac_cv_prog_make_${ac_make}_set+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat >conftest.make <<\_ACEOF +SHELL = /bin/sh +all: + @echo '@@@%%%=$(MAKE)=@@@%%%' +_ACEOF +# GNU make sometimes prints "make[1]: Entering ...", which would confuse us. +case `${MAKE-make} -f conftest.make 2>/dev/null` in + *@@@%%%=?*=@@@%%%*) + eval ac_cv_prog_make_${ac_make}_set=yes;; + *) + eval ac_cv_prog_make_${ac_make}_set=no;; +esac +rm -f conftest.make ;; +esac +fi +if eval test \$ac_cv_prog_make_${ac_make}_set = yes; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 +printf "%s\n" "yes" >&6; } + SET_MAKE= +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } + SET_MAKE="MAKE=${MAKE-make}" +fi + +rm -rf .tst 2>/dev/null +mkdir .tst 2>/dev/null +if test -d .tst; then + am__leading_dot=. +else + am__leading_dot=_ +fi +rmdir .tst 2>/dev/null + +# Check whether --enable-silent-rules was given. +if test ${enable_silent_rules+y} +then : + enableval=$enable_silent_rules; +fi + +case $enable_silent_rules in # ((( + yes) AM_DEFAULT_VERBOSITY=0;; + no) AM_DEFAULT_VERBOSITY=1;; + *) AM_DEFAULT_VERBOSITY=1;; +esac +am_make=${MAKE-make} +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $am_make supports nested variables" >&5 +printf %s "checking whether $am_make supports nested variables... " >&6; } +if test ${am_cv_make_support_nested_variables+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if printf "%s\n" 'TRUE=$(BAR$(V)) +BAR0=false +BAR1=true +V=1 +am__doit: + @$(TRUE) +.PHONY: am__doit' | $am_make -f - >/dev/null 2>&1; then + am_cv_make_support_nested_variables=yes +else + am_cv_make_support_nested_variables=no +fi ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_make_support_nested_variables" >&5 +printf "%s\n" "$am_cv_make_support_nested_variables" >&6; } +if test $am_cv_make_support_nested_variables = yes; then + AM_V='$(V)' + AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)' +else + AM_V=$AM_DEFAULT_VERBOSITY + AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY +fi +AM_BACKSLASH='\' + + + + + + + + + + +DEPDIR="${am__leading_dot}deps" + +ac_config_commands="$ac_config_commands depfiles" + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} supports the include directive" >&5 +printf %s "checking whether ${MAKE-make} supports the include directive... " >&6; } +cat > confinc.mk << 'END' +am__doit: + @echo this is the am__doit target >confinc.out +.PHONY: am__doit +END +am__include="#" +am__quote= +# BSD make does it like this. +echo '.include "confinc.mk" # ignored' > confmf.BSD +# Other make implementations (GNU, Solaris 10, AIX) do it like this. +echo 'include confinc.mk # ignored' > confmf.GNU +_am_result=no +for s in GNU BSD; do + { echo "$as_me:$LINENO: ${MAKE-make} -f confmf.$s && cat confinc.out" >&5 + (${MAKE-make} -f confmf.$s && cat confinc.out) >&5 2>&5 + ac_status=$? + echo "$as_me:$LINENO: \$? = $ac_status" >&5 + (exit $ac_status); } + case $?:`cat confinc.out 2>/dev/null` in #( + '0:this is the am__doit target') : + case $s in #( + BSD) : + am__include='.include' am__quote='"' ;; #( + *) : + am__include='include' am__quote='' ;; +esac ;; #( + *) : + ;; +esac + if test "$am__include" != "#"; then + _am_result="yes ($s style)" + break + fi +done +rm -f confinc.* confmf.* +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: ${_am_result}" >&5 +printf "%s\n" "${_am_result}" >&6; } + +# Check whether --enable-dependency-tracking was given. +if test ${enable_dependency_tracking+y} +then : + enableval=$enable_dependency_tracking; +fi + +if test "x$enable_dependency_tracking" != xno; then + am_depcomp="$ac_aux_dir/depcomp" + AMDEPBACKSLASH='\' + am__nodep='_no' +fi + if test "x$enable_dependency_tracking" != xno; then + AMDEP_TRUE= + AMDEP_FALSE='#' +else + AMDEP_TRUE='#' + AMDEP_FALSE= +fi + + +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu +if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}gcc", so it can be a program name with args. +set dummy ${ac_tool_prefix}gcc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="${ac_tool_prefix}gcc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_CC"; then + ac_ct_CC=$CC + # Extract the first word of "gcc", so it can be a program name with args. +set dummy gcc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_CC"; then + ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_CC="gcc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_CC=$ac_cv_prog_ac_ct_CC +if test -n "$ac_ct_CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 +printf "%s\n" "$ac_ct_CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + if test "x$ac_ct_CC" = x; then + CC="" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + CC=$ac_ct_CC + fi +else + CC="$ac_cv_prog_CC" +fi + +if test -z "$CC"; then + if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}cc", so it can be a program name with args. +set dummy ${ac_tool_prefix}cc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="${ac_tool_prefix}cc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + fi +fi +if test -z "$CC"; then + # Extract the first word of "cc", so it can be a program name with args. +set dummy cc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else + ac_prog_rejected=no +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + if test "$as_dir$ac_word$ac_exec_ext" = "/usr/ucb/cc"; then + ac_prog_rejected=yes + continue + fi + ac_cv_prog_CC="cc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +if test $ac_prog_rejected = yes; then + # We found a bogon in the path, so make sure we never use it. + set dummy $ac_cv_prog_CC + shift + if test $# != 0; then + # We chose a different compiler from the bogus one. + # However, it has the same basename, so the bogon will be chosen + # first if we set CC to just the basename; use the full file name. + shift + ac_cv_prog_CC="$as_dir$ac_word${1+' '}$@" + fi +fi +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$CC"; then + if test -n "$ac_tool_prefix"; then + for ac_prog in cl.exe + do + # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. +set dummy $ac_tool_prefix$ac_prog; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="$ac_tool_prefix$ac_prog" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + test -n "$CC" && break + done +fi +if test -z "$CC"; then + ac_ct_CC=$CC + for ac_prog in cl.exe +do + # Extract the first word of "$ac_prog", so it can be a program name with args. +set dummy $ac_prog; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_CC"; then + ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_CC="$ac_prog" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_CC=$ac_cv_prog_ac_ct_CC +if test -n "$ac_ct_CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 +printf "%s\n" "$ac_ct_CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + test -n "$ac_ct_CC" && break +done + + if test "x$ac_ct_CC" = x; then + CC="" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + CC=$ac_ct_CC + fi +fi + +fi +if test -z "$CC"; then + if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}clang", so it can be a program name with args. +set dummy ${ac_tool_prefix}clang; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="${ac_tool_prefix}clang" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_CC"; then + ac_ct_CC=$CC + # Extract the first word of "clang", so it can be a program name with args. +set dummy clang; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_CC"; then + ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_CC="clang" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_CC=$ac_cv_prog_ac_ct_CC +if test -n "$ac_ct_CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 +printf "%s\n" "$ac_ct_CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + if test "x$ac_ct_CC" = x; then + CC="" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + CC=$ac_ct_CC + fi +else + CC="$ac_cv_prog_CC" +fi + +fi + + +test -z "$CC" && { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error $? "no acceptable C compiler found in \$PATH +See 'config.log' for more details" "$LINENO" 5; } + +# Provide some information about the compiler. +printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5 +set X $ac_compile +ac_compiler=$2 +for ac_option in --version -v -V -qversion -version; do + { { ac_try="$ac_compiler $ac_option >&5" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_compiler $ac_option >&5") 2>conftest.err + ac_status=$? + if test -s conftest.err; then + sed '10a\ +... rest of stderr output deleted ... + 10q' conftest.err >conftest.er1 + cat conftest.er1 >&5 + fi + rm -f conftest.er1 conftest.err + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } +done + +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +ac_clean_files_save=$ac_clean_files +ac_clean_files="$ac_clean_files a.out a.out.dSYM a.exe b.out" +# Try to create an executable without -o first, disregard a.out. +# It will help us diagnose broken compilers, and finding out an intuition +# of exeext. +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C compiler works" >&5 +printf %s "checking whether the C compiler works... " >&6; } +ac_link_default=`printf "%s\n" "$ac_link" | sed 's/ -o *conftest[^ ]*//'` + +# The possible output files: +ac_files="a.out conftest.exe conftest a.exe a_out.exe b.out conftest.*" + +ac_rmfiles= +for ac_file in $ac_files +do + case $ac_file in + *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;; + * ) ac_rmfiles="$ac_rmfiles $ac_file";; + esac +done +rm -f $ac_rmfiles + +if { { ac_try="$ac_link_default" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_link_default") 2>&5 + ac_status=$? + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } +then : + # Autoconf-2.13 could set the ac_cv_exeext variable to 'no'. +# So ignore a value of 'no', otherwise this would lead to 'EXEEXT = no' +# in a Makefile. We should not override ac_cv_exeext if it was cached, +# so that the user can short-circuit this test for compilers unknown to +# Autoconf. +for ac_file in $ac_files '' +do + test -f "$ac_file" || continue + case $ac_file in + *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) + ;; + [ab].out ) + # We found the default executable, but exeext='' is most + # certainly right. + break;; + *.* ) + if test ${ac_cv_exeext+y} && test "$ac_cv_exeext" != no; + then :; else + ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'` + fi + # We set ac_cv_exeext here because the later test for it is not + # safe: cross compilers may not add the suffix if given an '-o' + # argument, so we may need to know it at that point already. + # Even if this section looks crufty: it has the advantage of + # actually working. + break;; + * ) + break;; + esac +done +test "$ac_cv_exeext" = no && ac_cv_exeext= + +else case e in #( + e) ac_file='' ;; +esac +fi +if test -z "$ac_file" +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +printf "%s\n" "$as_me: failed program was:" >&5 +sed 's/^/| /' conftest.$ac_ext >&5 + +{ { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error 77 "C compiler cannot create executables +See 'config.log' for more details" "$LINENO" 5; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 +printf "%s\n" "yes" >&6; } ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C compiler default output file name" >&5 +printf %s "checking for C compiler default output file name... " >&6; } +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_file" >&5 +printf "%s\n" "$ac_file" >&6; } +ac_exeext=$ac_cv_exeext + +rm -f -r a.out a.out.dSYM a.exe conftest$ac_cv_exeext b.out +ac_clean_files=$ac_clean_files_save +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for suffix of executables" >&5 +printf %s "checking for suffix of executables... " >&6; } +if { { ac_try="$ac_link" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_link") 2>&5 + ac_status=$? + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } +then : + # If both 'conftest.exe' and 'conftest' are 'present' (well, observable) +# catch 'conftest.exe'. For instance with Cygwin, 'ls conftest' will +# work properly (i.e., refer to 'conftest.exe'), while it won't with +# 'rm'. +for ac_file in conftest.exe conftest conftest.*; do + test -f "$ac_file" || continue + case $ac_file in + *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;; + *.* ) ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'` + break;; + * ) break;; + esac +done +else case e in #( + e) { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error $? "cannot compute suffix of executables: cannot compile and link +See 'config.log' for more details" "$LINENO" 5; } ;; +esac +fi +rm -f conftest conftest$ac_cv_exeext +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_exeext" >&5 +printf "%s\n" "$ac_cv_exeext" >&6; } + +rm -f conftest.$ac_ext +EXEEXT=$ac_cv_exeext +ac_exeext=$EXEEXT +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +#include +int +main (void) +{ +FILE *f = fopen ("conftest.out", "w"); + if (!f) + return 1; + return ferror (f) || fclose (f) != 0; + + ; + return 0; +} +_ACEOF +ac_clean_files="$ac_clean_files conftest.out" +# Check that the compiler produces executables we can run. If not, either +# the compiler is broken, or we cross compile. +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether we are cross compiling" >&5 +printf %s "checking whether we are cross compiling... " >&6; } +if test "$cross_compiling" != yes; then + { { ac_try="$ac_link" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_link") 2>&5 + ac_status=$? + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } + if { ac_try='./conftest$ac_cv_exeext' + { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; }; }; then + cross_compiling=no + else + if test "$cross_compiling" = maybe; then + cross_compiling=yes + else + { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error 77 "cannot run C compiled programs. +If you meant to cross compile, use '--host'. +See 'config.log' for more details" "$LINENO" 5; } + fi + fi +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $cross_compiling" >&5 +printf "%s\n" "$cross_compiling" >&6; } + +rm -f conftest.$ac_ext conftest$ac_cv_exeext \ + conftest.o conftest.obj conftest.out +ac_clean_files=$ac_clean_files_save +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for suffix of object files" >&5 +printf %s "checking for suffix of object files... " >&6; } +if test ${ac_cv_objext+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +rm -f conftest.o conftest.obj +if { { ac_try="$ac_compile" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_compile") 2>&5 + ac_status=$? + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } +then : + for ac_file in conftest.o conftest.obj conftest.*; do + test -f "$ac_file" || continue; + case $ac_file in + *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM ) ;; + *) ac_cv_objext=`expr "$ac_file" : '.*\.\(.*\)'` + break;; + esac +done +else case e in #( + e) printf "%s\n" "$as_me: failed program was:" >&5 +sed 's/^/| /' conftest.$ac_ext >&5 + +{ { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error $? "cannot compute suffix of object files: cannot compile +See 'config.log' for more details" "$LINENO" 5; } ;; +esac +fi +rm -f conftest.$ac_cv_objext conftest.$ac_ext ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_objext" >&5 +printf "%s\n" "$ac_cv_objext" >&6; } +OBJEXT=$ac_cv_objext +ac_objext=$OBJEXT +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler supports GNU C" >&5 +printf %s "checking whether the compiler supports GNU C... " >&6; } +if test ${ac_cv_c_compiler_gnu+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ +#ifndef __GNUC__ + choke me +#endif + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + ac_compiler_gnu=yes +else case e in #( + e) ac_compiler_gnu=no ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext +ac_cv_c_compiler_gnu=$ac_compiler_gnu + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_compiler_gnu" >&5 +printf "%s\n" "$ac_cv_c_compiler_gnu" >&6; } +ac_compiler_gnu=$ac_cv_c_compiler_gnu + +if test $ac_compiler_gnu = yes; then + GCC=yes +else + GCC= +fi +ac_test_CFLAGS=${CFLAGS+y} +ac_save_CFLAGS=$CFLAGS +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5 +printf %s "checking whether $CC accepts -g... " >&6; } +if test ${ac_cv_prog_cc_g+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_save_c_werror_flag=$ac_c_werror_flag + ac_c_werror_flag=yes + ac_cv_prog_cc_g=no + CFLAGS="-g" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_g=yes +else case e in #( + e) CFLAGS="" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + +else case e in #( + e) ac_c_werror_flag=$ac_save_c_werror_flag + CFLAGS="-g" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_g=yes +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext + ac_c_werror_flag=$ac_save_c_werror_flag ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_g" >&5 +printf "%s\n" "$ac_cv_prog_cc_g" >&6; } +if test $ac_test_CFLAGS; then + CFLAGS=$ac_save_CFLAGS +elif test $ac_cv_prog_cc_g = yes; then + if test "$GCC" = yes; then + CFLAGS="-g -O2" + else + CFLAGS="-g" + fi +else + if test "$GCC" = yes; then + CFLAGS="-O2" + else + CFLAGS= + fi +fi +ac_prog_cc_stdc=no +if test x$ac_prog_cc_stdc = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C11 features" >&5 +printf %s "checking for $CC option to enable C11 features... " >&6; } +if test ${ac_cv_prog_cc_c11+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_cv_prog_cc_c11=no +ac_save_CC=$CC +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_c_conftest_c11_program +_ACEOF +for ac_arg in '' -std=gnu11 +do + CC="$ac_save_CC $ac_arg" + if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_c11=$ac_arg +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam + test "x$ac_cv_prog_cc_c11" != "xno" && break +done +rm -f conftest.$ac_ext +CC=$ac_save_CC ;; +esac +fi + +if test "x$ac_cv_prog_cc_c11" = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 +printf "%s\n" "unsupported" >&6; } +else case e in #( + e) if test "x$ac_cv_prog_cc_c11" = x +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 +printf "%s\n" "none needed" >&6; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c11" >&5 +printf "%s\n" "$ac_cv_prog_cc_c11" >&6; } + CC="$CC $ac_cv_prog_cc_c11" ;; +esac +fi + ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c11 + ac_prog_cc_stdc=c11 ;; +esac +fi +fi +if test x$ac_prog_cc_stdc = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C99 features" >&5 +printf %s "checking for $CC option to enable C99 features... " >&6; } +if test ${ac_cv_prog_cc_c99+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_cv_prog_cc_c99=no +ac_save_CC=$CC +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_c_conftest_c99_program +_ACEOF +for ac_arg in '' -std=gnu99 -std=c99 -c99 -qlanglvl=extc1x -qlanglvl=extc99 -AC99 -D_STDC_C99= +do + CC="$ac_save_CC $ac_arg" + if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_c99=$ac_arg +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam + test "x$ac_cv_prog_cc_c99" != "xno" && break +done +rm -f conftest.$ac_ext +CC=$ac_save_CC ;; +esac +fi + +if test "x$ac_cv_prog_cc_c99" = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 +printf "%s\n" "unsupported" >&6; } +else case e in #( + e) if test "x$ac_cv_prog_cc_c99" = x +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 +printf "%s\n" "none needed" >&6; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c99" >&5 +printf "%s\n" "$ac_cv_prog_cc_c99" >&6; } + CC="$CC $ac_cv_prog_cc_c99" ;; +esac +fi + ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c99 + ac_prog_cc_stdc=c99 ;; +esac +fi +fi +if test x$ac_prog_cc_stdc = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C89 features" >&5 +printf %s "checking for $CC option to enable C89 features... " >&6; } +if test ${ac_cv_prog_cc_c89+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_cv_prog_cc_c89=no +ac_save_CC=$CC +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_c_conftest_c89_program +_ACEOF +for ac_arg in '' -qlanglvl=extc89 -qlanglvl=ansi -std -Ae "-Aa -D_HPUX_SOURCE" "-Xc -D__EXTENSIONS__" +do + CC="$ac_save_CC $ac_arg" + if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_c89=$ac_arg +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam + test "x$ac_cv_prog_cc_c89" != "xno" && break +done +rm -f conftest.$ac_ext +CC=$ac_save_CC ;; +esac +fi + +if test "x$ac_cv_prog_cc_c89" = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 +printf "%s\n" "unsupported" >&6; } +else case e in #( + e) if test "x$ac_cv_prog_cc_c89" = x +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 +printf "%s\n" "none needed" >&6; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c89" >&5 +printf "%s\n" "$ac_cv_prog_cc_c89" >&6; } + CC="$CC $ac_cv_prog_cc_c89" ;; +esac +fi + ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c89 + ac_prog_cc_stdc=c89 ;; +esac +fi +fi + +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + + + ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CC understands -c and -o together" >&5 +printf %s "checking whether $CC understands -c and -o together... " >&6; } +if test ${am_cv_prog_cc_c_o+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF + # Make sure it works both with $CC and with simple cc. + # Following AC_PROG_CC_C_O, we do the test twice because some + # compilers refuse to overwrite an existing .o file with -o, + # though they will create one. + am_cv_prog_cc_c_o=yes + for am_i in 1 2; do + if { echo "$as_me:$LINENO: $CC -c conftest.$ac_ext -o conftest2.$ac_objext" >&5 + ($CC -c conftest.$ac_ext -o conftest2.$ac_objext) >&5 2>&5 + ac_status=$? + echo "$as_me:$LINENO: \$? = $ac_status" >&5 + (exit $ac_status); } \ + && test -f conftest2.$ac_objext; then + : OK + else + am_cv_prog_cc_c_o=no + break + fi + done + rm -f core conftest* + unset am_i ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_prog_cc_c_o" >&5 +printf "%s\n" "$am_cv_prog_cc_c_o" >&6; } +if test "$am_cv_prog_cc_c_o" != yes; then + # Losing compiler, so override with the script. + # FIXME: It is wrong to rewrite CC. + # But if we don't then we get into trouble of one sort or another. + # A longer-term fix would be to have automake use am__CC in this case, + # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" + CC="$am_aux_dir/compile $CC" +fi +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + + +depcc="$CC" am_compiler_list= + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 +printf %s "checking dependency style of $depcc... " >&6; } +if test ${am_cv_CC_dependencies_compiler_type+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then + # We make a subdir and do the tests there. Otherwise we can end up + # making bogus files that we don't know about and never remove. For + # instance it was reported that on HP-UX the gcc test will end up + # making a dummy file named 'D' -- because '-MD' means "put the output + # in D". + rm -rf conftest.dir + mkdir conftest.dir + # Copy depcomp to subdir because otherwise we won't find it if we're + # using a relative directory. + cp "$am_depcomp" conftest.dir + cd conftest.dir + # We will build objects and dependencies in a subdirectory because + # it helps to detect inapplicable dependency modes. For instance + # both Tru64's cc and ICC support -MD to output dependencies as a + # side effect of compilation, but ICC will put the dependencies in + # the current directory while Tru64 will put them in the object + # directory. + mkdir sub + + am_cv_CC_dependencies_compiler_type=none + if test "$am_compiler_list" = ""; then + am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp` + fi + am__universal=false + case " $depcc " in #( + *\ -arch\ *\ -arch\ *) am__universal=true ;; + esac + + for depmode in $am_compiler_list; do + # Setup a source with many dependencies, because some compilers + # like to wrap large dependency lists on column 80 (with \), and + # we should not choose a depcomp mode which is confused by this. + # + # We need to recreate these files for each test, as the compiler may + # overwrite some of them when testing with obscure command lines. + # This happens at least with the AIX C compiler. + : > sub/conftest.c + for i in 1 2 3 4 5 6; do + echo '#include "conftst'$i'.h"' >> sub/conftest.c + # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with + # Solaris 10 /bin/sh. + echo '/* dummy */' > sub/conftst$i.h + done + echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf + + # We check with '-c' and '-o' for the sake of the "dashmstdout" + # mode. It turns out that the SunPro C++ compiler does not properly + # handle '-M -o', and we need to detect this. Also, some Intel + # versions had trouble with output in subdirs. + am__obj=sub/conftest.${OBJEXT-o} + am__minus_obj="-o $am__obj" + case $depmode in + gcc) + # This depmode causes a compiler race in universal mode. + test "$am__universal" = false || continue + ;; + nosideeffect) + # After this tag, mechanisms are not by side-effect, so they'll + # only be used when explicitly requested. + if test "x$enable_dependency_tracking" = xyes; then + continue + else + break + fi + ;; + msvc7 | msvc7msys | msvisualcpp | msvcmsys) + # This compiler won't grok '-c -o', but also, the minuso test has + # not run yet. These depmodes are late enough in the game, and + # so weak that their functioning should not be impacted. + am__obj=conftest.${OBJEXT-o} + am__minus_obj= + ;; + none) break ;; + esac + if depmode=$depmode \ + source=sub/conftest.c object=$am__obj \ + depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ + $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ + >/dev/null 2>conftest.err && + grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && + grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && + grep $am__obj sub/conftest.Po > /dev/null 2>&1 && + ${MAKE-make} -s -f confmf > /dev/null 2>&1; then + # icc doesn't choke on unknown options, it will just issue warnings + # or remarks (even with -Werror). So we grep stderr for any message + # that says an option was ignored or not supported. + # When given -MP, icc 7.0 and 7.1 complain thusly: + # icc: Command line warning: ignoring option '-M'; no argument required + # The diagnosis changed in icc 8.0: + # icc: Command line remark: option '-MP' not supported + if (grep 'ignoring option' conftest.err || + grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else + am_cv_CC_dependencies_compiler_type=$depmode + break + fi + fi + done + + cd .. + rm -rf conftest.dir +else + am_cv_CC_dependencies_compiler_type=none +fi + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_CC_dependencies_compiler_type" >&5 +printf "%s\n" "$am_cv_CC_dependencies_compiler_type" >&6; } +CCDEPMODE=depmode=$am_cv_CC_dependencies_compiler_type + + if + test "x$enable_dependency_tracking" != xno \ + && test "$am_cv_CC_dependencies_compiler_type" = gcc3; then + am__fastdepCC_TRUE= + am__fastdepCC_FALSE='#' +else + am__fastdepCC_TRUE='#' + am__fastdepCC_FALSE= +fi + + + +# Check whether --enable-compiler-warnings was given. +if test ${enable_compiler_warnings+y} +then : + enableval=$enable_compiler_warnings; +fi +case $enable_compiler_warnings in #( + no | min | yes | max | all) : + ;; #( + *) : + if test "x$enable_maintainer_mode" = xyes +then : + enable_compiler_warnings=yes +else case e in #( + e) enable_compiler_warnings=min ;; +esac +fi ;; +esac + +echo 'tldbg:KPSE_BASIC called (pkg=mpfi, amopt=)' >&5 + +if test "`cd $srcdir && pwd`" != "`pwd`"; then + # Use -I$(srcdir) only when $(srcdir) != ., so that make's output + # is not polluted with repeated "-I." + am__isrc=' -I$(srcdir)' + # test to see if srcdir already configured + if test -f $srcdir/config.status; then + as_fn_error $? "source directory already configured; run \"make distclean\" there first" "$LINENO" 5 + fi +fi + +# test whether we have cygpath +if test -z "$CYGPATH_W"; then + if (cygpath --version) >/dev/null 2>/dev/null; then + CYGPATH_W='cygpath -w' + else + CYGPATH_W=echo + fi +fi + + +# Define the identity of the package. + PACKAGE='mpfi--tex-live-' + VERSION='1.5.4' + + +printf "%s\n" "#define PACKAGE \"$PACKAGE\"" >>confdefs.h + + +printf "%s\n" "#define VERSION \"$VERSION\"" >>confdefs.h + +# Some tools Automake needs. + +ACLOCAL=${ACLOCAL-"${am_missing_run}aclocal-${am__api_version}"} + + +AUTOCONF=${AUTOCONF-"${am_missing_run}autoconf"} + + +AUTOMAKE=${AUTOMAKE-"${am_missing_run}automake-${am__api_version}"} + + +AUTOHEADER=${AUTOHEADER-"${am_missing_run}autoheader"} + + +MAKEINFO=${MAKEINFO-"${am_missing_run}makeinfo"} + +# For better backward compatibility. To be removed once Automake 1.9.x +# dies out for good. For more background, see: +# +# +mkdir_p='$(MKDIR_P)' + +# We need awk for the "check" target (and possibly the TAP driver). The +# system "awk" is bad on some platforms. +# Always define AMTAR for backward compatibility. Yes, it's still used +# in the wild :-( We should find a proper way to deprecate it ... +AMTAR='$${TAR-tar}' + + +# We'll loop over all known methods to create a tar archive until one works. +_am_tools='gnutar pax cpio none' + +am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -' + + + + + +# Variables for tags utilities; see am/tags.am +if test -z "$CTAGS"; then + CTAGS=ctags +fi + +if test -z "$ETAGS"; then + ETAGS=etags +fi + +if test -z "$CSCOPE"; then + CSCOPE=cscope +fi + + + +# POSIX will say in a future version that running "rm -f" with no argument +# is OK; and we want to be able to make that assumption in our Makefile +# recipes. So use an aggressive probe to check that the usage we want is +# actually supported "in the wild" to an acceptable degree. +# See automake bug#10828. +# To make any issue more visible, cause the running configure to be aborted +# by default if the 'rm' program in use doesn't match our expectations; the +# user can still override this though. +if rm -f && rm -fr && rm -rf; then : OK; else + cat >&2 <<'END' +Oops! + +Your 'rm' program seems unable to run without file operands specified +on the command line, even when the '-f' option is present. This is contrary +to the behaviour of most rm programs out there, and not conforming with +the upcoming POSIX standard: + +Please tell bug-automake@gnu.org about your system, including the value +of your $PATH and any error possibly output before this message. This +can help us improve future automake versions. + +END + if test x"$ACCEPT_INFERIOR_RM_PROGRAM" = x"yes"; then + echo 'Configuration will proceed anyway, since you have set the' >&2 + echo 'ACCEPT_INFERIOR_RM_PROGRAM variable to "yes"' >&2 + echo >&2 + else + cat >&2 <<'END' +Aborting the configuration process, to ensure you take notice of the issue. + +You can download and install GNU coreutils to get an 'rm' implementation +that behaves properly: . + +If you want to complete the configuration process using your problematic +'rm' anyway, export the environment variable ACCEPT_INFERIOR_RM_PROGRAM +to "yes", and re-run configure. + +END + as_fn_error $? "Your 'rm' program is bad, sorry." "$LINENO" 5 + fi +fi + + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether to enable maintainer-specific portions of Makefiles" >&5 +printf %s "checking whether to enable maintainer-specific portions of Makefiles... " >&6; } + # Check whether --enable-maintainer-mode was given. +if test ${enable_maintainer_mode+y} +then : + enableval=$enable_maintainer_mode; USE_MAINTAINER_MODE=$enableval +else case e in #( + e) USE_MAINTAINER_MODE=no ;; +esac +fi + + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $USE_MAINTAINER_MODE" >&5 +printf "%s\n" "$USE_MAINTAINER_MODE" >&6; } + if test $USE_MAINTAINER_MODE = yes; then + MAINTAINER_MODE_TRUE= + MAINTAINER_MODE_FALSE='#' +else + MAINTAINER_MODE_TRUE='#' + MAINTAINER_MODE_FALSE= +fi + + MAINT=$MAINTAINER_MODE_TRUE + + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler accepts prototypes" >&5 +printf %s "checking whether the compiler accepts prototypes... " >&6; } +if test ${kb_cv_c_prototypes+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +#include +int +main (void) +{ +extern void foo(int i,...); + ; + return 0; +} +_ACEOF +if ac_fn_c_try_link "$LINENO" +then : + kb_cv_c_prototypes=yes +else case e in #( + e) kb_cv_c_prototypes=no ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam \ + conftest$ac_exeext conftest.$ac_ext ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $kb_cv_c_prototypes" >&5 +printf "%s\n" "$kb_cv_c_prototypes" >&6; } +if test "x$kb_cv_c_prototypes" = xno; then + as_fn_error $? "Sorry, your compiler does not understand prototypes." "$LINENO" 5 +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking what warning flags to pass to the C compiler" >&5 +printf %s "checking what warning flags to pass to the C compiler... " >&6; } +if test ${kpse_cv_warning_cflags+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test "x$GCC" = xyes; then + kpse_cv_warning_cflags= +if test "x$enable_compiler_warnings" != xno; then + kpse_cv_warning_cflags="-Wimplicit -Wreturn-type" + case `$CC -dumpversion` in #( + 3.4.* | 4.* | 5.*) : + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wdeclaration-after-statement" ;; #( + *) : + ;; +esac + case `$CC -dumpversion` in #( + 3.[234].* | 4.* | 5.*) : + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wno-unknown-pragmas" ;; #( + *) : + ;; +esac + if test "x$enable_compiler_warnings" != xmin; then + kpse_cv_warning_cflags="-Wall -Wunused $kpse_cv_warning_cflags" + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wmissing-prototypes -Wmissing-declarations" + if test "x$enable_compiler_warnings" != xyes; then + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wparentheses -Wswitch -Wtrigraphs -Wpointer-arith" + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wcast-qual -Wcast-align -Wwrite-strings" + case `$CC -dumpversion` in #( + 3.4.* | 4.* | 5.*) : + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wold-style-definition" ;; #( + *) : + ;; +esac + if test "x$enable_compiler_warnings" != xmax; then + kpse_cv_warning_cflags="$kpse_cv_warning_cflags -Wshadow" + fi + fi + fi +fi +elif test "x$enable_compiler_warnings" = xno; then + kpse_cv_warning_cflags= +else + kpse_cv_warning_cflags= # FIXME: warning flags for non-GNU C compilers +fi ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $kpse_cv_warning_cflags" >&5 +printf "%s\n" "$kpse_cv_warning_cflags" >&6; } +WARNING_CFLAGS=$kpse_cv_warning_cflags + + + + + + + + +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu +if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}gcc", so it can be a program name with args. +set dummy ${ac_tool_prefix}gcc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="${ac_tool_prefix}gcc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_CC"; then + ac_ct_CC=$CC + # Extract the first word of "gcc", so it can be a program name with args. +set dummy gcc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_CC"; then + ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_CC="gcc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_CC=$ac_cv_prog_ac_ct_CC +if test -n "$ac_ct_CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 +printf "%s\n" "$ac_ct_CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + if test "x$ac_ct_CC" = x; then + CC="" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + CC=$ac_ct_CC + fi +else + CC="$ac_cv_prog_CC" +fi + +if test -z "$CC"; then + if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}cc", so it can be a program name with args. +set dummy ${ac_tool_prefix}cc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="${ac_tool_prefix}cc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + fi +fi +if test -z "$CC"; then + # Extract the first word of "cc", so it can be a program name with args. +set dummy cc; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else + ac_prog_rejected=no +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + if test "$as_dir$ac_word$ac_exec_ext" = "/usr/ucb/cc"; then + ac_prog_rejected=yes + continue + fi + ac_cv_prog_CC="cc" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +if test $ac_prog_rejected = yes; then + # We found a bogon in the path, so make sure we never use it. + set dummy $ac_cv_prog_CC + shift + if test $# != 0; then + # We chose a different compiler from the bogus one. + # However, it has the same basename, so the bogon will be chosen + # first if we set CC to just the basename; use the full file name. + shift + ac_cv_prog_CC="$as_dir$ac_word${1+' '}$@" + fi +fi +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$CC"; then + if test -n "$ac_tool_prefix"; then + for ac_prog in cl.exe + do + # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. +set dummy $ac_tool_prefix$ac_prog; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="$ac_tool_prefix$ac_prog" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + test -n "$CC" && break + done +fi +if test -z "$CC"; then + ac_ct_CC=$CC + for ac_prog in cl.exe +do + # Extract the first word of "$ac_prog", so it can be a program name with args. +set dummy $ac_prog; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_CC"; then + ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_CC="$ac_prog" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_CC=$ac_cv_prog_ac_ct_CC +if test -n "$ac_ct_CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 +printf "%s\n" "$ac_ct_CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + + test -n "$ac_ct_CC" && break +done + + if test "x$ac_ct_CC" = x; then + CC="" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + CC=$ac_ct_CC + fi +fi + +fi +if test -z "$CC"; then + if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}clang", so it can be a program name with args. +set dummy ${ac_tool_prefix}clang; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_CC="${ac_tool_prefix}clang" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +CC=$ac_cv_prog_CC +if test -n "$CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 +printf "%s\n" "$CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_CC"; then + ac_ct_CC=$CC + # Extract the first word of "clang", so it can be a program name with args. +set dummy clang; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_CC+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_CC"; then + ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_CC="clang" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_CC=$ac_cv_prog_ac_ct_CC +if test -n "$ac_ct_CC"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 +printf "%s\n" "$ac_ct_CC" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + if test "x$ac_ct_CC" = x; then + CC="" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + CC=$ac_ct_CC + fi +else + CC="$ac_cv_prog_CC" +fi + +fi + + +test -z "$CC" && { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error $? "no acceptable C compiler found in \$PATH +See 'config.log' for more details" "$LINENO" 5; } + +# Provide some information about the compiler. +printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5 +set X $ac_compile +ac_compiler=$2 +for ac_option in --version -v -V -qversion -version; do + { { ac_try="$ac_compiler $ac_option >&5" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +printf "%s\n" "$ac_try_echo"; } >&5 + (eval "$ac_compiler $ac_option >&5") 2>conftest.err + ac_status=$? + if test -s conftest.err; then + sed '10a\ +... rest of stderr output deleted ... + 10q' conftest.err >conftest.er1 + cat conftest.er1 >&5 + fi + rm -f conftest.er1 conftest.err + printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } +done + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler supports GNU C" >&5 +printf %s "checking whether the compiler supports GNU C... " >&6; } +if test ${ac_cv_c_compiler_gnu+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ +#ifndef __GNUC__ + choke me +#endif + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + ac_compiler_gnu=yes +else case e in #( + e) ac_compiler_gnu=no ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext +ac_cv_c_compiler_gnu=$ac_compiler_gnu + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_compiler_gnu" >&5 +printf "%s\n" "$ac_cv_c_compiler_gnu" >&6; } +ac_compiler_gnu=$ac_cv_c_compiler_gnu + +if test $ac_compiler_gnu = yes; then + GCC=yes +else + GCC= +fi +ac_test_CFLAGS=${CFLAGS+y} +ac_save_CFLAGS=$CFLAGS +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5 +printf %s "checking whether $CC accepts -g... " >&6; } +if test ${ac_cv_prog_cc_g+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_save_c_werror_flag=$ac_c_werror_flag + ac_c_werror_flag=yes + ac_cv_prog_cc_g=no + CFLAGS="-g" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_g=yes +else case e in #( + e) CFLAGS="" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + +else case e in #( + e) ac_c_werror_flag=$ac_save_c_werror_flag + CFLAGS="-g" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_g=yes +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext + ac_c_werror_flag=$ac_save_c_werror_flag ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_g" >&5 +printf "%s\n" "$ac_cv_prog_cc_g" >&6; } +if test $ac_test_CFLAGS; then + CFLAGS=$ac_save_CFLAGS +elif test $ac_cv_prog_cc_g = yes; then + if test "$GCC" = yes; then + CFLAGS="-g -O2" + else + CFLAGS="-g" + fi +else + if test "$GCC" = yes; then + CFLAGS="-O2" + else + CFLAGS= + fi +fi +ac_prog_cc_stdc=no +if test x$ac_prog_cc_stdc = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C11 features" >&5 +printf %s "checking for $CC option to enable C11 features... " >&6; } +if test ${ac_cv_prog_cc_c11+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_cv_prog_cc_c11=no +ac_save_CC=$CC +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_c_conftest_c11_program +_ACEOF +for ac_arg in '' -std=gnu11 +do + CC="$ac_save_CC $ac_arg" + if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_c11=$ac_arg +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam + test "x$ac_cv_prog_cc_c11" != "xno" && break +done +rm -f conftest.$ac_ext +CC=$ac_save_CC ;; +esac +fi + +if test "x$ac_cv_prog_cc_c11" = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 +printf "%s\n" "unsupported" >&6; } +else case e in #( + e) if test "x$ac_cv_prog_cc_c11" = x +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 +printf "%s\n" "none needed" >&6; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c11" >&5 +printf "%s\n" "$ac_cv_prog_cc_c11" >&6; } + CC="$CC $ac_cv_prog_cc_c11" ;; +esac +fi + ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c11 + ac_prog_cc_stdc=c11 ;; +esac +fi +fi +if test x$ac_prog_cc_stdc = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C99 features" >&5 +printf %s "checking for $CC option to enable C99 features... " >&6; } +if test ${ac_cv_prog_cc_c99+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_cv_prog_cc_c99=no +ac_save_CC=$CC +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_c_conftest_c99_program +_ACEOF +for ac_arg in '' -std=gnu99 -std=c99 -c99 -qlanglvl=extc1x -qlanglvl=extc99 -AC99 -D_STDC_C99= +do + CC="$ac_save_CC $ac_arg" + if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_c99=$ac_arg +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam + test "x$ac_cv_prog_cc_c99" != "xno" && break +done +rm -f conftest.$ac_ext +CC=$ac_save_CC ;; +esac +fi + +if test "x$ac_cv_prog_cc_c99" = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 +printf "%s\n" "unsupported" >&6; } +else case e in #( + e) if test "x$ac_cv_prog_cc_c99" = x +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 +printf "%s\n" "none needed" >&6; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c99" >&5 +printf "%s\n" "$ac_cv_prog_cc_c99" >&6; } + CC="$CC $ac_cv_prog_cc_c99" ;; +esac +fi + ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c99 + ac_prog_cc_stdc=c99 ;; +esac +fi +fi +if test x$ac_prog_cc_stdc = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C89 features" >&5 +printf %s "checking for $CC option to enable C89 features... " >&6; } +if test ${ac_cv_prog_cc_c89+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_cv_prog_cc_c89=no +ac_save_CC=$CC +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_c_conftest_c89_program +_ACEOF +for ac_arg in '' -qlanglvl=extc89 -qlanglvl=ansi -std -Ae "-Aa -D_HPUX_SOURCE" "-Xc -D__EXTENSIONS__" +do + CC="$ac_save_CC $ac_arg" + if ac_fn_c_try_compile "$LINENO" +then : + ac_cv_prog_cc_c89=$ac_arg +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam + test "x$ac_cv_prog_cc_c89" != "xno" && break +done +rm -f conftest.$ac_ext +CC=$ac_save_CC ;; +esac +fi + +if test "x$ac_cv_prog_cc_c89" = xno +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 +printf "%s\n" "unsupported" >&6; } +else case e in #( + e) if test "x$ac_cv_prog_cc_c89" = x +then : + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 +printf "%s\n" "none needed" >&6; } +else case e in #( + e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c89" >&5 +printf "%s\n" "$ac_cv_prog_cc_c89" >&6; } + CC="$CC $ac_cv_prog_cc_c89" ;; +esac +fi + ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c89 + ac_prog_cc_stdc=c89 ;; +esac +fi +fi + +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + + + ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CC understands -c and -o together" >&5 +printf %s "checking whether $CC understands -c and -o together... " >&6; } +if test ${am_cv_prog_cc_c_o+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main (void) +{ + + ; + return 0; +} +_ACEOF + # Make sure it works both with $CC and with simple cc. + # Following AC_PROG_CC_C_O, we do the test twice because some + # compilers refuse to overwrite an existing .o file with -o, + # though they will create one. + am_cv_prog_cc_c_o=yes + for am_i in 1 2; do + if { echo "$as_me:$LINENO: $CC -c conftest.$ac_ext -o conftest2.$ac_objext" >&5 + ($CC -c conftest.$ac_ext -o conftest2.$ac_objext) >&5 2>&5 + ac_status=$? + echo "$as_me:$LINENO: \$? = $ac_status" >&5 + (exit $ac_status); } \ + && test -f conftest2.$ac_objext; then + : OK + else + am_cv_prog_cc_c_o=no + break + fi + done + rm -f core conftest* + unset am_i ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_prog_cc_c_o" >&5 +printf "%s\n" "$am_cv_prog_cc_c_o" >&6; } +if test "$am_cv_prog_cc_c_o" != yes; then + # Losing compiler, so override with the script. + # FIXME: It is wrong to rewrite CC. + # But if we don't then we get into trouble of one sort or another. + # A longer-term fix would be to have automake use am__CC in this case, + # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" + CC="$am_aux_dir/compile $CC" +fi +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + + +depcc="$CC" am_compiler_list= + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 +printf %s "checking dependency style of $depcc... " >&6; } +if test ${am_cv_CC_dependencies_compiler_type+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then + # We make a subdir and do the tests there. Otherwise we can end up + # making bogus files that we don't know about and never remove. For + # instance it was reported that on HP-UX the gcc test will end up + # making a dummy file named 'D' -- because '-MD' means "put the output + # in D". + rm -rf conftest.dir + mkdir conftest.dir + # Copy depcomp to subdir because otherwise we won't find it if we're + # using a relative directory. + cp "$am_depcomp" conftest.dir + cd conftest.dir + # We will build objects and dependencies in a subdirectory because + # it helps to detect inapplicable dependency modes. For instance + # both Tru64's cc and ICC support -MD to output dependencies as a + # side effect of compilation, but ICC will put the dependencies in + # the current directory while Tru64 will put them in the object + # directory. + mkdir sub + + am_cv_CC_dependencies_compiler_type=none + if test "$am_compiler_list" = ""; then + am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp` + fi + am__universal=false + case " $depcc " in #( + *\ -arch\ *\ -arch\ *) am__universal=true ;; + esac + + for depmode in $am_compiler_list; do + # Setup a source with many dependencies, because some compilers + # like to wrap large dependency lists on column 80 (with \), and + # we should not choose a depcomp mode which is confused by this. + # + # We need to recreate these files for each test, as the compiler may + # overwrite some of them when testing with obscure command lines. + # This happens at least with the AIX C compiler. + : > sub/conftest.c + for i in 1 2 3 4 5 6; do + echo '#include "conftst'$i'.h"' >> sub/conftest.c + # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with + # Solaris 10 /bin/sh. + echo '/* dummy */' > sub/conftst$i.h + done + echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf + + # We check with '-c' and '-o' for the sake of the "dashmstdout" + # mode. It turns out that the SunPro C++ compiler does not properly + # handle '-M -o', and we need to detect this. Also, some Intel + # versions had trouble with output in subdirs. + am__obj=sub/conftest.${OBJEXT-o} + am__minus_obj="-o $am__obj" + case $depmode in + gcc) + # This depmode causes a compiler race in universal mode. + test "$am__universal" = false || continue + ;; + nosideeffect) + # After this tag, mechanisms are not by side-effect, so they'll + # only be used when explicitly requested. + if test "x$enable_dependency_tracking" = xyes; then + continue + else + break + fi + ;; + msvc7 | msvc7msys | msvisualcpp | msvcmsys) + # This compiler won't grok '-c -o', but also, the minuso test has + # not run yet. These depmodes are late enough in the game, and + # so weak that their functioning should not be impacted. + am__obj=conftest.${OBJEXT-o} + am__minus_obj= + ;; + none) break ;; + esac + if depmode=$depmode \ + source=sub/conftest.c object=$am__obj \ + depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ + $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ + >/dev/null 2>conftest.err && + grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && + grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && + grep $am__obj sub/conftest.Po > /dev/null 2>&1 && + ${MAKE-make} -s -f confmf > /dev/null 2>&1; then + # icc doesn't choke on unknown options, it will just issue warnings + # or remarks (even with -Werror). So we grep stderr for any message + # that says an option was ignored or not supported. + # When given -MP, icc 7.0 and 7.1 complain thusly: + # icc: Command line warning: ignoring option '-M'; no argument required + # The diagnosis changed in icc 8.0: + # icc: Command line remark: option '-MP' not supported + if (grep 'ignoring option' conftest.err || + grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else + am_cv_CC_dependencies_compiler_type=$depmode + break + fi + fi + done + + cd .. + rm -rf conftest.dir +else + am_cv_CC_dependencies_compiler_type=none +fi + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_CC_dependencies_compiler_type" >&5 +printf "%s\n" "$am_cv_CC_dependencies_compiler_type" >&6; } +CCDEPMODE=depmode=$am_cv_CC_dependencies_compiler_type + + if + test "x$enable_dependency_tracking" != xno \ + && test "$am_cv_CC_dependencies_compiler_type" = gcc3; then + am__fastdepCC_TRUE= + am__fastdepCC_FALSE='#' +else + am__fastdepCC_TRUE='#' + am__fastdepCC_FALSE= +fi + + +if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args. +set dummy ${ac_tool_prefix}ranlib; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_RANLIB+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$RANLIB"; then + ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +RANLIB=$ac_cv_prog_RANLIB +if test -n "$RANLIB"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5 +printf "%s\n" "$RANLIB" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_RANLIB"; then + ac_ct_RANLIB=$RANLIB + # Extract the first word of "ranlib", so it can be a program name with args. +set dummy ranlib; ac_word=$2 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +printf %s "checking for $ac_word... " >&6; } +if test ${ac_cv_prog_ac_ct_RANLIB+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test -n "$ac_ct_RANLIB"; then + ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + for ac_exec_ext in '' $ac_executable_extensions; do + if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then + ac_cv_prog_ac_ct_RANLIB="ranlib" + printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi ;; +esac +fi +ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB +if test -n "$ac_ct_RANLIB"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5 +printf "%s\n" "$ac_ct_RANLIB" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 +printf "%s\n" "no" >&6; } +fi + + if test "x$ac_ct_RANLIB" = x; then + RANLIB=":" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + RANLIB=$ac_ct_RANLIB + fi +else + RANLIB="$ac_cv_prog_RANLIB" +fi + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ln -s works" >&5 +printf %s "checking whether ln -s works... " >&6; } +LN_S=$as_ln_s +if test "$LN_S" = "ln -s"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 +printf "%s\n" "yes" >&6; } +else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no, using $LN_S" >&5 +printf "%s\n" "no, using $LN_S" >&6; } +fi + + +echo 'tldbg:KPSE_COMPILER_VISIBILITY called.' >&5 +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking CFLAGS for C to hide external symbols" >&5 +printf %s "checking CFLAGS for C to hide external symbols... " >&6; } +if test ${kpse_cv_visibility_cflags+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + +kpse_cv_visibility_cflags=unknown +kpse_save_flags=$CFLAGS +cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +#include + extern void foo(void); + void foo(void){printf("foo\n");} +_ACEOF +# FIXME: Add tests for non-GNU compilers +for kpse_flag in '-fvisibility=hidden -fvisibility-inlines-hidden' '-fvisibility=hidden'; do + CFLAGS="$kpse_save_flags -Werror $kpse_flag" + if ac_fn_c_try_compile "$LINENO" +then : + kpse_cv_visibility_cflags=$kpse_flag; break +fi +rm -f core conftest.err conftest.$ac_objext conftest.beam +done +CFLAGS=$kpse_save_flags +ac_ext=c +ac_cpp='$CPP $CPPFLAGS' +ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' +ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' +ac_compiler_gnu=$ac_cv_c_compiler_gnu + + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $kpse_cv_visibility_cflags" >&5 +printf "%s\n" "$kpse_cv_visibility_cflags" >&6; } +case $kpse_cv_visibility_cflags in #( + unknown) : + ;; #( + *) : + VISIBILITY_CFLAGS=$kpse_cv_visibility_cflags + ;; +esac + + + + + +ac_config_headers="$ac_config_headers mpfi_config.h" + + + + + # Make sure we can run config.sub. +$SHELL "${ac_aux_dir}config.sub" sun4 >/dev/null 2>&1 || + as_fn_error $? "cannot run $SHELL ${ac_aux_dir}config.sub" "$LINENO" 5 + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking build system type" >&5 +printf %s "checking build system type... " >&6; } +if test ${ac_cv_build+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) ac_build_alias=$build_alias +test "x$ac_build_alias" = x && + ac_build_alias=`$SHELL "${ac_aux_dir}config.guess"` +test "x$ac_build_alias" = x && + as_fn_error $? "cannot guess build type; you must specify one" "$LINENO" 5 +ac_cv_build=`$SHELL "${ac_aux_dir}config.sub" $ac_build_alias` || + as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $ac_build_alias failed" "$LINENO" 5 + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_build" >&5 +printf "%s\n" "$ac_cv_build" >&6; } +case $ac_cv_build in +*-*-*) ;; +*) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;; +esac +build=$ac_cv_build +ac_save_IFS=$IFS; IFS='-' +set x $ac_cv_build +shift +build_cpu=$1 +build_vendor=$2 +shift; shift +# Remember, the first character of IFS is used to create $*, +# except with old shells: +build_os=$* +IFS=$ac_save_IFS +case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac + + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking host system type" >&5 +printf %s "checking host system type... " >&6; } +if test ${ac_cv_host+y} +then : + printf %s "(cached) " >&6 +else case e in #( + e) if test "x$host_alias" = x; then + ac_cv_host=$ac_cv_build +else + ac_cv_host=`$SHELL "${ac_aux_dir}config.sub" $host_alias` || + as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $host_alias failed" "$LINENO" 5 +fi + ;; +esac +fi +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_host" >&5 +printf "%s\n" "$ac_cv_host" >&6; } +case $ac_cv_host in +*-*-*) ;; +*) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;; +esac +host=$ac_cv_host +ac_save_IFS=$IFS; IFS='-' +set x $ac_cv_host +shift +host_cpu=$1 +host_vendor=$2 +shift; shift +# Remember, the first character of IFS is used to create $*, +# except with old shells: +host_os=$* +IFS=$ac_save_IFS +case $host_os in *\ *) host_os=`echo "$host_os" | sed 's/ /-/g'`;; esac + + +if test "x$host_alias" != x && test "x$build_alias" = x +then : + as_fn_error $? "when cross-compiling you must specify both --host and --build." "$LINENO" 5 +fi +eval kpse_build_alias=\${build_alias-$build} + + +MPFI_CONFIGS + + if test "x$enable_build" != xno; then + build_TRUE= + build_FALSE='#' +else + build_TRUE='#' + build_FALSE= +fi + + +##tldbg _KPSE_INIT: Initialize TL infrastructure. +kpse_BLD=`(cd "./../../." && pwd)` +kpse_SRC=`(cd "$srcdir/../../." && pwd)` + +##tldbg _KPSE_LIB_FLAGS: Setup gmp (-lgmp) flags. +echo 'tldbg:_KPSE_LIB_FLAGS called: libdir=gmp, libname=gmp, options=, tlincl=-IBLD/libs/gmp/include, tllib=BLD/libs/gmp/libgmp.a, tlextra=, rebuildsrcdeps=, rebuildblddeps=${top_builddir}/../../libs/gmp/include/gmp.h.' >&5 +##tldbg _KPSE_LIB_FLAGS_TL: gmp (gmp) . + +# Check whether --with-system-gmp was given. +if test ${with_system_gmp+y} +then : + withval=$with_system_gmp; +fi + +# Check whether --with-gmp-includes was given. +if test ${with_gmp_includes+y} +then : + withval=$with_gmp_includes; +fi + +# Check whether --with-gmp-libdir was given. +if test ${with_gmp_libdir+y} +then : + withval=$with_gmp_libdir; +fi +if test "x$with_system_gmp" = xyes; then + ##tldbg _KPSE_LIB_FLAGS_SYSTEM: gmp (gmp). +if test "x$with_gmp_includes" != x && test "x$with_gmp_includes" != xyes; then + GMP_INCLUDES="-I$with_gmp_includes" +fi +GMP_LIBS="-lgmp" +if test "x$with_gmp_libdir" != x && test "x$with_gmp_libdir" != xyes; then + GMP_LIBS="-L$with_gmp_libdir $GMP_LIBS" +fi +else + GMP_INCLUDES="-I$kpse_BLD/libs/gmp/include" + GMP_LIBS="$kpse_BLD/libs/gmp/libgmp.a" + GMP_DEPEND='${top_builddir}/../../libs/gmp/libgmp.a' + GMP_RULE='# Rebuild libgmp +$(GMP_DEPEND): ${top_builddir}/../../libs/gmp/include/gmp.h + cd ${top_builddir}/../../libs/gmp && $(MAKE) $(AM_MAKEFLAGS) rebuild +${top_builddir}/../../libs/gmp/include/gmp.h: + cd ${top_builddir}/../../libs/gmp && $(MAKE) $(AM_MAKEFLAGS) rebuild' +fi + +##tldbg _KPSE_LIB_FLAGS: Setup mpfr (-lmpfr) flags. +echo 'tldbg:_KPSE_LIB_FLAGS called: libdir=mpfr, libname=mpfr, options=, tlincl=-IBLD/libs/mpfr/include, tllib=BLD/libs/mpfr/libmpfr.a, tlextra=, rebuildsrcdeps=, rebuildblddeps=${top_builddir}/../../libs/mpfr/include/mpfr.h.' >&5 +##tldbg _KPSE_LIB_FLAGS_TL: mpfr (mpfr) . + +# Check whether --with-system-mpfr was given. +if test ${with_system_mpfr+y} +then : + withval=$with_system_mpfr; +fi + +# Check whether --with-mpfr-includes was given. +if test ${with_mpfr_includes+y} +then : + withval=$with_mpfr_includes; +fi + +# Check whether --with-mpfr-libdir was given. +if test ${with_mpfr_libdir+y} +then : + withval=$with_mpfr_libdir; +fi +if test "x$with_system_mpfr" = xyes; then + ##tldbg _KPSE_LIB_FLAGS_SYSTEM: mpfr (mpfr). +if test "x$with_mpfr_includes" != x && test "x$with_mpfr_includes" != xyes; then + MPFR_INCLUDES="-I$with_mpfr_includes" +fi +MPFR_LIBS="-lmpfr" +if test "x$with_mpfr_libdir" != x && test "x$with_mpfr_libdir" != xyes; then + MPFR_LIBS="-L$with_mpfr_libdir $MPFR_LIBS" +fi +else + MPFR_INCLUDES="-I$kpse_BLD/libs/mpfr/include" + MPFR_LIBS="$kpse_BLD/libs/mpfr/libmpfr.a" + MPFR_DEPEND='${top_builddir}/../../libs/mpfr/libmpfr.a' + MPFR_RULE='# Rebuild libmpfr +$(MPFR_DEPEND): ${top_builddir}/../../libs/mpfr/include/mpfr.h + cd ${top_builddir}/../../libs/mpfr && $(MAKE) $(AM_MAKEFLAGS) rebuild +${top_builddir}/../../libs/mpfr/include/mpfr.h: + cd ${top_builddir}/../../libs/mpfr && $(MAKE) $(AM_MAKEFLAGS) rebuild' +fi + + +ac_header= ac_cache= +for ac_item in $ac_header_c_list +do + if test $ac_cache; then + ac_fn_c_check_header_compile "$LINENO" $ac_header ac_cv_header_$ac_cache "$ac_includes_default" + if eval test \"x\$ac_cv_header_$ac_cache\" = xyes; then + printf "%s\n" "#define $ac_item 1" >> confdefs.h + fi + ac_header= ac_cache= + elif test $ac_header; then + ac_cache=$ac_item + else + ac_header=$ac_item + fi +done + + + + + + + + +if test $ac_cv_header_stdlib_h = yes && test $ac_cv_header_string_h = yes +then : + +printf "%s\n" "#define STDC_HEADERS 1" >>confdefs.h + +fi +ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" +if test "x$ac_cv_type_size_t" = xyes +then : + +else case e in #( + e) +printf "%s\n" "#define size_t unsigned int" >>confdefs.h + ;; +esac +fi + + + + +if test "x$enable_build" != xno || test -f config.force; then + +ac_fn_c_check_header_compile "$LINENO" "limits.h" "ac_cv_header_limits_h" "$ac_includes_default" +if test "x$ac_cv_header_limits_h" = xyes +then : + +else case e in #( + e) as_fn_error $? "limits.h not found" "$LINENO" 5 ;; +esac +fi + +ac_fn_c_check_header_compile "$LINENO" "float.h" "ac_cv_header_float_h" "$ac_includes_default" +if test "x$ac_cv_header_float_h" = xyes +then : + +else case e in #( + e) as_fn_error $? "float.h not found" "$LINENO" 5 ;; +esac +fi + +ac_fn_c_check_header_compile "$LINENO" "string.h" "ac_cv_header_string_h" "$ac_includes_default" +if test "x$ac_cv_header_string_h" = xyes +then : + +else case e in #( + e) as_fn_error $? "string.h not found" "$LINENO" 5 ;; +esac +fi + + +kpse_save_CPPFLAGS=$CPPFLAGS +kpse_save_LIBS=$LIBS + +eval CPPFLAGS=\"$GMP_INCLUDES \$CPPFLAGS\" +eval LIBS=\"$GMP_LIBS \$LIBS\" + +eval CPPFLAGS=\"$MPFR_INCLUDES \$CPPFLAGS\" +eval LIBS=\"$MPFR_LIBS \$LIBS\" + + + +ac_fn_c_check_func "$LINENO" "dup2" "ac_cv_func_dup2" +if test "x$ac_cv_func_dup2" = xyes +then : + printf "%s\n" "#define HAVE_DUP2 1" >>confdefs.h + +fi +ac_fn_c_check_func "$LINENO" "gettimeofday" "ac_cv_func_gettimeofday" +if test "x$ac_cv_func_gettimeofday" = xyes +then : + printf "%s\n" "#define HAVE_GETTIMEOFDAY 1" >>confdefs.h + +fi + +ac_fn_c_check_func "$LINENO" "mpfr_q_sub" "ac_cv_func_mpfr_q_sub" +if test "x$ac_cv_func_mpfr_q_sub" = xyes +then : + printf "%s\n" "#define HAVE_MPFR_Q_SUB 1" >>confdefs.h + +fi +ac_fn_c_check_func "$LINENO" "mpfr_z_sub" "ac_cv_func_mpfr_z_sub" +if test "x$ac_cv_func_mpfr_z_sub" = xyes +then : + printf "%s\n" "#define HAVE_MPFR_Z_SUB 1" >>confdefs.h + +fi +ac_fn_c_check_func "$LINENO" "mpfr_z_div" "ac_cv_func_mpfr_z_div" +if test "x$ac_cv_func_mpfr_z_div" = xyes +then : + printf "%s\n" "#define HAVE_MPFR_Z_DIV 1" >>confdefs.h + +fi + + + +CPPFLAGS=$kpse_save_CPPFLAGS +LIBS=$kpse_save_LIBS + + +echo timestamp >config.force +fi + +MPFI_TREE=mpfi-src + + + +ac_config_files="$ac_config_files Makefile include/Makefile" + + +cat >confcache <<\_ACEOF +# This file is a shell script that caches the results of configure +# tests run on this system so they can be shared between configure +# scripts and configure runs, see configure's option --config-cache. +# It is not useful on other systems. If it contains results you don't +# want to keep, you may remove or edit it. +# +# config.status only pays attention to the cache file if you give it +# the --recheck option to rerun configure. +# +# 'ac_cv_env_foo' variables (set or unset) will be overridden when +# loading this file, other *unset* 'ac_cv_foo' will be assigned the +# following values. + +_ACEOF + +# The following way of writing the cache mishandles newlines in values, +# but we know of no workaround that is simple, portable, and efficient. +# So, we kill variables containing newlines. +# Ultrix sh set writes to stderr and can't be redirected directly, +# and sets the high bit in the cache file unless we assign to the vars. +( + for ac_var in `(set) 2>&1 | sed -n 's/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'`; do + eval ac_val=\$$ac_var + case $ac_val in #( + *${as_nl}*) + case $ac_var in #( + *_cv_*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5 +printf "%s\n" "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;; + esac + case $ac_var in #( + _ | IFS | as_nl) ;; #( + BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #( + *) { eval $ac_var=; unset $ac_var;} ;; + esac ;; + esac + done + + (set) 2>&1 | + case $as_nl`(ac_space=' '; set) 2>&1` in #( + *${as_nl}ac_space=\ *) + # 'set' does not quote correctly, so add quotes: double-quote + # substitution turns \\\\ into \\, and sed turns \\ into \. + sed -n \ + "s/'/'\\\\''/g; + s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\\2'/p" + ;; #( + *) + # 'set' quotes correctly as required by POSIX, so do not add quotes. + sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p" + ;; + esac | + sort +) | + sed ' + /^ac_cv_env_/b end + t clear + :clear + s/^\([^=]*\)=\(.*[{}].*\)$/test ${\1+y} || &/ + t end + s/^\([^=]*\)=\(.*\)$/\1=${\1=\2}/ + :end' >>confcache +if diff "$cache_file" confcache >/dev/null 2>&1; then :; else + if test -w "$cache_file"; then + if test "x$cache_file" != "x/dev/null"; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: updating cache $cache_file" >&5 +printf "%s\n" "$as_me: updating cache $cache_file" >&6;} + if test ! -f "$cache_file" || test -h "$cache_file"; then + cat confcache >"$cache_file" + else + case $cache_file in #( + */* | ?:*) + mv -f confcache "$cache_file"$$ && + mv -f "$cache_file"$$ "$cache_file" ;; #( + *) + mv -f confcache "$cache_file" ;; + esac + fi + fi + else + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: not updating unwritable cache $cache_file" >&5 +printf "%s\n" "$as_me: not updating unwritable cache $cache_file" >&6;} + fi +fi +rm -f confcache + +test "x$prefix" = xNONE && prefix=$ac_default_prefix +# Let make expand exec_prefix. +test "x$exec_prefix" = xNONE && exec_prefix='${prefix}' + +DEFS=-DHAVE_CONFIG_H + +ac_libobjs= +ac_ltlibobjs= +U= +for ac_i in : $LIBOBJS; do test "x$ac_i" = x: && continue + # 1. Remove the extension, and $U if already installed. + ac_script='s/\$U\././;s/\.o$//;s/\.obj$//' + ac_i=`printf "%s\n" "$ac_i" | sed "$ac_script"` + # 2. Prepend LIBOBJDIR. When used with automake>=1.10 LIBOBJDIR + # will be set to the directory where LIBOBJS objects are built. + as_fn_append ac_libobjs " \${LIBOBJDIR}$ac_i\$U.$ac_objext" + as_fn_append ac_ltlibobjs " \${LIBOBJDIR}$ac_i"'$U.lo' +done +LIBOBJS=$ac_libobjs + +LTLIBOBJS=$ac_ltlibobjs + + +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking that generated files are newer than configure" >&5 +printf %s "checking that generated files are newer than configure... " >&6; } + if test -n "$am_sleep_pid"; then + # Hide warnings about reused PIDs. + wait $am_sleep_pid 2>/dev/null + fi + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: done" >&5 +printf "%s\n" "done" >&6; } + if test -n "$EXEEXT"; then + am__EXEEXT_TRUE= + am__EXEEXT_FALSE='#' +else + am__EXEEXT_TRUE='#' + am__EXEEXT_FALSE= +fi + +if test -z "${MAINTAINER_MODE_TRUE}" && test -z "${MAINTAINER_MODE_FALSE}"; then + as_fn_error $? "conditional \"MAINTAINER_MODE\" was never defined. +Usually this means the macro was only invoked conditionally." "$LINENO" 5 +fi +if test -z "${AMDEP_TRUE}" && test -z "${AMDEP_FALSE}"; then + as_fn_error $? "conditional \"AMDEP\" was never defined. +Usually this means the macro was only invoked conditionally." "$LINENO" 5 +fi +if test -z "${am__fastdepCC_TRUE}" && test -z "${am__fastdepCC_FALSE}"; then + as_fn_error $? "conditional \"am__fastdepCC\" was never defined. +Usually this means the macro was only invoked conditionally." "$LINENO" 5 +fi +if test -z "${am__fastdepCC_TRUE}" && test -z "${am__fastdepCC_FALSE}"; then + as_fn_error $? "conditional \"am__fastdepCC\" was never defined. +Usually this means the macro was only invoked conditionally." "$LINENO" 5 +fi +if test -z "${build_TRUE}" && test -z "${build_FALSE}"; then + as_fn_error $? "conditional \"build\" was never defined. +Usually this means the macro was only invoked conditionally." "$LINENO" 5 +fi + +: "${CONFIG_STATUS=./config.status}" +ac_write_fail=0 +ac_clean_files_save=$ac_clean_files +ac_clean_files="$ac_clean_files $CONFIG_STATUS" +{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: creating $CONFIG_STATUS" >&5 +printf "%s\n" "$as_me: creating $CONFIG_STATUS" >&6;} +as_write_fail=0 +cat >$CONFIG_STATUS <<_ASEOF || as_write_fail=1 +#! $SHELL +# Generated by $as_me. +# Run this file to recreate the current configuration. +# Compiler output produced by configure, useful for debugging +# configure, is in config.log if it exists. + +debug=false +ac_cs_recheck=false +ac_cs_silent=false + +SHELL=\${CONFIG_SHELL-$SHELL} +export SHELL +_ASEOF +cat >>$CONFIG_STATUS <<\_ASEOF || as_write_fail=1 +## -------------------- ## +## M4sh Initialization. ## +## -------------------- ## + +# Be more Bourne compatible +DUALCASE=1; export DUALCASE # for MKS sh +if test ${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1 +then : + emulate sh + NULLCMD=: + # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which + # is contrary to our usage. Disable this feature. + alias -g '${1+"$@"}'='"$@"' + setopt NO_GLOB_SUBST +else case e in #( + e) case `(set -o) 2>/dev/null` in #( + *posix*) : + set -o posix ;; #( + *) : + ;; +esac ;; +esac +fi + + + +# Reset variables that may have inherited troublesome values from +# the environment. + +# IFS needs to be set, to space, tab, and newline, in precisely that order. +# (If _AS_PATH_WALK were called with IFS unset, it would have the +# side effect of setting IFS to empty, thus disabling word splitting.) +# Quoting is to prevent editors from complaining about space-tab. +as_nl=' +' +export as_nl +IFS=" "" $as_nl" + +PS1='$ ' +PS2='> ' +PS4='+ ' + +# Ensure predictable behavior from utilities with locale-dependent output. +LC_ALL=C +export LC_ALL +LANGUAGE=C +export LANGUAGE + +# We cannot yet rely on "unset" to work, but we need these variables +# to be unset--not just set to an empty or harmless value--now, to +# avoid bugs in old shells (e.g. pre-3.0 UWIN ksh). This construct +# also avoids known problems related to "unset" and subshell syntax +# in other old shells (e.g. bash 2.01 and pdksh 5.2.14). +for as_var in BASH_ENV ENV MAIL MAILPATH CDPATH +do eval test \${$as_var+y} \ + && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || : +done + +# Ensure that fds 0, 1, and 2 are open. +if (exec 3>&0) 2>/dev/null; then :; else exec 0&1) 2>/dev/null; then :; else exec 1>/dev/null; fi +if (exec 3>&2) ; then :; else exec 2>/dev/null; fi + +# The user is always right. +if ${PATH_SEPARATOR+false} :; then + PATH_SEPARATOR=: + (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && { + (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 || + PATH_SEPARATOR=';' + } +fi + + +# Find who we are. Look in the path if we contain no directory separator. +as_myself= +case $0 in #(( + *[\\/]* ) as_myself=$0 ;; + *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + case $as_dir in #((( + '') as_dir=./ ;; + */) ;; + *) as_dir=$as_dir/ ;; + esac + test -r "$as_dir$0" && as_myself=$as_dir$0 && break + done +IFS=$as_save_IFS + + ;; +esac +# We did not find ourselves, most probably we were run as 'sh COMMAND' +# in which case we are not to be found in the path. +if test "x$as_myself" = x; then + as_myself=$0 +fi +if test ! -f "$as_myself"; then + printf "%s\n" "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2 + exit 1 +fi + + + +# as_fn_error STATUS ERROR [LINENO LOG_FD] +# ---------------------------------------- +# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are +# provided, also output the error to LOG_FD, referencing LINENO. Then exit the +# script with STATUS, using 1 if that was 0. +as_fn_error () +{ + as_status=$1; test $as_status -eq 0 && as_status=1 + if test "$4"; then + as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: $2" >&$4 + fi + printf "%s\n" "$as_me: error: $2" >&2 + as_fn_exit $as_status +} # as_fn_error + + +# as_fn_set_status STATUS +# ----------------------- +# Set $? to STATUS, without forking. +as_fn_set_status () +{ + return $1 +} # as_fn_set_status + +# as_fn_exit STATUS +# ----------------- +# Exit the shell with STATUS, even in a "trap 0" or "set -e" context. +as_fn_exit () +{ + set +e + as_fn_set_status $1 + exit $1 +} # as_fn_exit + +# as_fn_unset VAR +# --------------- +# Portably unset VAR. +as_fn_unset () +{ + { eval $1=; unset $1;} +} +as_unset=as_fn_unset + +# as_fn_append VAR VALUE +# ---------------------- +# Append the text in VALUE to the end of the definition contained in VAR. Take +# advantage of any shell optimizations that allow amortized linear growth over +# repeated appends, instead of the typical quadratic growth present in naive +# implementations. +if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null +then : + eval 'as_fn_append () + { + eval $1+=\$2 + }' +else case e in #( + e) as_fn_append () + { + eval $1=\$$1\$2 + } ;; +esac +fi # as_fn_append + +# as_fn_arith ARG... +# ------------------ +# Perform arithmetic evaluation on the ARGs, and store the result in the +# global $as_val. Take advantage of shells that can avoid forks. The arguments +# must be portable across $(()) and expr. +if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null +then : + eval 'as_fn_arith () + { + as_val=$(( $* )) + }' +else case e in #( + e) as_fn_arith () + { + as_val=`expr "$@" || test $? -eq 1` + } ;; +esac +fi # as_fn_arith + + +if expr a : '\(a\)' >/dev/null 2>&1 && + test "X`expr 00001 : '.*\(...\)'`" = X001; then + as_expr=expr +else + as_expr=false +fi + +if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then + as_basename=basename +else + as_basename=false +fi + +if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then + as_dirname=dirname +else + as_dirname=false +fi + +as_me=`$as_basename -- "$0" || +$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \ + X"$0" : 'X\(//\)$' \| \ + X"$0" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X/"$0" | + sed '/^.*\/\([^/][^/]*\)\/*$/{ + s//\1/ + q + } + /^X\/\(\/\/\)$/{ + s//\1/ + q + } + /^X\/\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + +# Avoid depending upon Character Ranges. +as_cr_letters='abcdefghijklmnopqrstuvwxyz' +as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ' +as_cr_Letters=$as_cr_letters$as_cr_LETTERS +as_cr_digits='0123456789' +as_cr_alnum=$as_cr_Letters$as_cr_digits + + +# Determine whether it's possible to make 'echo' print without a newline. +# These variables are no longer used directly by Autoconf, but are AC_SUBSTed +# for compatibility with existing Makefiles. +ECHO_C= ECHO_N= ECHO_T= +case `echo -n x` in #((((( +-n*) + case `echo 'xy\c'` in + *c*) ECHO_T=' ';; # ECHO_T is single tab character. + xy) ECHO_C='\c';; + *) echo `echo ksh88 bug on AIX 6.1` > /dev/null + ECHO_T=' ';; + esac;; +*) + ECHO_N='-n';; +esac + +# For backward compatibility with old third-party macros, we provide +# the shell variables $as_echo and $as_echo_n. New code should use +# AS_ECHO(["message"]) and AS_ECHO_N(["message"]), respectively. +as_echo='printf %s\n' +as_echo_n='printf %s' + +rm -f conf$$ conf$$.exe conf$$.file +if test -d conf$$.dir; then + rm -f conf$$.dir/conf$$.file +else + rm -f conf$$.dir + mkdir conf$$.dir 2>/dev/null +fi +if (echo >conf$$.file) 2>/dev/null; then + if ln -s conf$$.file conf$$ 2>/dev/null; then + as_ln_s='ln -s' + # ... but there are two gotchas: + # 1) On MSYS, both 'ln -s file dir' and 'ln file dir' fail. + # 2) DJGPP < 2.04 has no symlinks; 'ln -s' creates a wrapper executable. + # In both cases, we have to default to 'cp -pR'. + ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe || + as_ln_s='cp -pR' + elif ln conf$$.file conf$$ 2>/dev/null; then + as_ln_s=ln + else + as_ln_s='cp -pR' + fi +else + as_ln_s='cp -pR' +fi +rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file +rmdir conf$$.dir 2>/dev/null + + +# as_fn_mkdir_p +# ------------- +# Create "$as_dir" as a directory, including parents if necessary. +as_fn_mkdir_p () +{ + + case $as_dir in #( + -*) as_dir=./$as_dir;; + esac + test -d "$as_dir" || eval $as_mkdir_p || { + as_dirs= + while :; do + case $as_dir in #( + *\'*) as_qdir=`printf "%s\n" "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'( + *) as_qdir=$as_dir;; + esac + as_dirs="'$as_qdir' $as_dirs" + as_dir=`$as_dirname -- "$as_dir" || +$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$as_dir" : 'X\(//\)[^/]' \| \ + X"$as_dir" : 'X\(//\)$' \| \ + X"$as_dir" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X"$as_dir" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + test -d "$as_dir" && break + done + test -z "$as_dirs" || eval "mkdir $as_dirs" + } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir" + + +} # as_fn_mkdir_p +if mkdir -p . 2>/dev/null; then + as_mkdir_p='mkdir -p "$as_dir"' +else + test -d ./-p && rmdir ./-p + as_mkdir_p=false +fi + + +# as_fn_executable_p FILE +# ----------------------- +# Test if FILE is an executable regular file. +as_fn_executable_p () +{ + test -f "$1" && test -x "$1" +} # as_fn_executable_p +as_test_x='test -x' +as_executable_p=as_fn_executable_p + +# Sed expression to map a string onto a valid CPP name. +as_sed_cpp="y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g" +as_tr_cpp="eval sed '$as_sed_cpp'" # deprecated + +# Sed expression to map a string onto a valid variable name. +as_sed_sh="y%*+%pp%;s%[^_$as_cr_alnum]%_%g" +as_tr_sh="eval sed '$as_sed_sh'" # deprecated + + +exec 6>&1 +## ----------------------------------- ## +## Main body of $CONFIG_STATUS script. ## +## ----------------------------------- ## +_ASEOF +test $as_write_fail = 0 && chmod +x $CONFIG_STATUS || ac_write_fail=1 + +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +# Save the log message, to keep $0 and so on meaningful, and to +# report actual input values of CONFIG_FILES etc. instead of their +# values after options handling. +ac_log=" +This file was extended by mpfi (TeX Live) $as_me 1.5.4, which was +generated by GNU Autoconf 2.72. Invocation command line was + + CONFIG_FILES = $CONFIG_FILES + CONFIG_HEADERS = $CONFIG_HEADERS + CONFIG_LINKS = $CONFIG_LINKS + CONFIG_COMMANDS = $CONFIG_COMMANDS + $ $0 $@ + +on `(hostname || uname -n) 2>/dev/null | sed 1q` +" + +_ACEOF + +case $ac_config_files in *" +"*) set x $ac_config_files; shift; ac_config_files=$*;; +esac + +case $ac_config_headers in *" +"*) set x $ac_config_headers; shift; ac_config_headers=$*;; +esac + + +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +# Files that config.status was made for. +config_files="$ac_config_files" +config_headers="$ac_config_headers" +config_commands="$ac_config_commands" + +_ACEOF + +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +ac_cs_usage="\ +'$as_me' instantiates files and other configuration actions +from templates according to the current configuration. Unless the files +and actions are specified as TAGs, all are instantiated by default. + +Usage: $0 [OPTION]... [TAG]... + + -h, --help print this help, then exit + -V, --version print version number and configuration settings, then exit + --config print configuration, then exit + -q, --quiet, --silent + do not print progress messages + -d, --debug don't remove temporary files + --recheck update $as_me by reconfiguring in the same conditions + --file=FILE[:TEMPLATE] + instantiate the configuration file FILE + --header=FILE[:TEMPLATE] + instantiate the configuration header FILE + +Configuration files: +$config_files + +Configuration headers: +$config_headers + +Configuration commands: +$config_commands + +Report bugs to ." + +_ACEOF +ac_cs_config=`printf "%s\n" "$ac_configure_args" | sed "$ac_safe_unquote"` +ac_cs_config_escaped=`printf "%s\n" "$ac_cs_config" | sed "s/^ //; s/'/'\\\\\\\\''/g"` +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +ac_cs_config='$ac_cs_config_escaped' +ac_cs_version="\\ +mpfi (TeX Live) config.status 1.5.4 +configured by $0, generated by GNU Autoconf 2.72, + with options \\"\$ac_cs_config\\" + +Copyright (C) 2023 Free Software Foundation, Inc. +This config.status script is free software; the Free Software Foundation +gives unlimited permission to copy, distribute and modify it." + +ac_pwd='$ac_pwd' +srcdir='$srcdir' +INSTALL='$INSTALL' +MKDIR_P='$MKDIR_P' +AWK='$AWK' +test -n "\$AWK" || AWK=awk +_ACEOF + +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +# The default lists apply if the user does not specify any file. +ac_need_defaults=: +while test $# != 0 +do + case $1 in + --*=?*) + ac_option=`expr "X$1" : 'X\([^=]*\)='` + ac_optarg=`expr "X$1" : 'X[^=]*=\(.*\)'` + ac_shift=: + ;; + --*=) + ac_option=`expr "X$1" : 'X\([^=]*\)='` + ac_optarg= + ac_shift=: + ;; + *) + ac_option=$1 + ac_optarg=$2 + ac_shift=shift + ;; + esac + + case $ac_option in + # Handling of the options. + -recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r) + ac_cs_recheck=: ;; + --version | --versio | --versi | --vers | --ver | --ve | --v | -V ) + printf "%s\n" "$ac_cs_version"; exit ;; + --config | --confi | --conf | --con | --co | --c ) + printf "%s\n" "$ac_cs_config"; exit ;; + --debug | --debu | --deb | --de | --d | -d ) + debug=: ;; + --file | --fil | --fi | --f ) + $ac_shift + case $ac_optarg in + *\'*) ac_optarg=`printf "%s\n" "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;; + '') as_fn_error $? "missing file argument" ;; + esac + as_fn_append CONFIG_FILES " '$ac_optarg'" + ac_need_defaults=false;; + --header | --heade | --head | --hea ) + $ac_shift + case $ac_optarg in + *\'*) ac_optarg=`printf "%s\n" "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;; + esac + as_fn_append CONFIG_HEADERS " '$ac_optarg'" + ac_need_defaults=false;; + --he | --h) + # Conflict between --help and --header + as_fn_error $? "ambiguous option: '$1' +Try '$0 --help' for more information.";; + --help | --hel | -h ) + printf "%s\n" "$ac_cs_usage"; exit ;; + -q | -quiet | --quiet | --quie | --qui | --qu | --q \ + | -silent | --silent | --silen | --sile | --sil | --si | --s) + ac_cs_silent=: ;; + + # This is an error. + -*) as_fn_error $? "unrecognized option: '$1' +Try '$0 --help' for more information." ;; + + *) as_fn_append ac_config_targets " $1" + ac_need_defaults=false ;; + + esac + shift +done + +ac_configure_extra_args= + +if $ac_cs_silent; then + exec 6>/dev/null + ac_configure_extra_args="$ac_configure_extra_args --silent" +fi + +_ACEOF +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +if \$ac_cs_recheck; then + set X $SHELL '$0' $ac_configure_args \$ac_configure_extra_args --no-create --no-recursion + shift + \printf "%s\n" "running CONFIG_SHELL=$SHELL \$*" >&6 + CONFIG_SHELL='$SHELL' + export CONFIG_SHELL + exec "\$@" +fi + +_ACEOF +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +exec 5>>config.log +{ + echo + sed 'h;s/./-/g;s/^.../## /;s/...$/ ##/;p;x;p;x' <<_ASBOX +## Running $as_me. ## +_ASBOX + printf "%s\n" "$ac_log" +} >&5 + +_ACEOF +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +# +# INIT-COMMANDS +# +AMDEP_TRUE="$AMDEP_TRUE" MAKE="${MAKE-make}" + +_ACEOF + +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 + +# Handling of arguments. +for ac_config_target in $ac_config_targets +do + case $ac_config_target in + "depfiles") CONFIG_COMMANDS="$CONFIG_COMMANDS depfiles" ;; + "mpfi_config.h") CONFIG_HEADERS="$CONFIG_HEADERS mpfi_config.h" ;; + "Makefile") CONFIG_FILES="$CONFIG_FILES Makefile" ;; + "include/Makefile") CONFIG_FILES="$CONFIG_FILES include/Makefile" ;; + + *) as_fn_error $? "invalid argument: '$ac_config_target'" "$LINENO" 5;; + esac +done + + +# If the user did not use the arguments to specify the items to instantiate, +# then the envvar interface is used. Set only those that are not. +# We use the long form for the default assignment because of an extremely +# bizarre bug on SunOS 4.1.3. +if $ac_need_defaults; then + test ${CONFIG_FILES+y} || CONFIG_FILES=$config_files + test ${CONFIG_HEADERS+y} || CONFIG_HEADERS=$config_headers + test ${CONFIG_COMMANDS+y} || CONFIG_COMMANDS=$config_commands +fi + +# Have a temporary directory for convenience. Make it in the build tree +# simply because there is no reason against having it here, and in addition, +# creating and moving files from /tmp can sometimes cause problems. +# Hook for its removal unless debugging. +# Note that there is a small window in which the directory will not be cleaned: +# after its creation but before its name has been assigned to '$tmp'. +$debug || +{ + tmp= ac_tmp= + trap 'exit_status=$? + : "${ac_tmp:=$tmp}" + { test ! -d "$ac_tmp" || rm -fr "$ac_tmp"; } && exit $exit_status +' 0 + trap 'as_fn_exit 1' 1 2 13 15 +} +# Create a (secure) tmp directory for tmp files. + +{ + tmp=`(umask 077 && mktemp -d "./confXXXXXX") 2>/dev/null` && + test -d "$tmp" +} || +{ + tmp=./conf$$-$RANDOM + (umask 077 && mkdir "$tmp") +} || as_fn_error $? "cannot create a temporary directory in ." "$LINENO" 5 +ac_tmp=$tmp + +# Set up the scripts for CONFIG_FILES section. +# No need to generate them if there are no CONFIG_FILES. +# This happens for instance with './config.status config.h'. +if test -n "$CONFIG_FILES"; then + + +ac_cr=`echo X | tr X '\015'` +# On cygwin, bash can eat \r inside `` if the user requested igncr. +# But we know of no other shell where ac_cr would be empty at this +# point, so we can use a bashism as a fallback. +if test "x$ac_cr" = x; then + eval ac_cr=\$\'\\r\' +fi +ac_cs_awk_cr=`$AWK 'BEGIN { print "a\rb" }' /dev/null` +if test "$ac_cs_awk_cr" = "a${ac_cr}b"; then + ac_cs_awk_cr='\\r' +else + ac_cs_awk_cr=$ac_cr +fi + +echo 'BEGIN {' >"$ac_tmp/subs1.awk" && +_ACEOF + + +{ + echo "cat >conf$$subs.awk <<_ACEOF" && + echo "$ac_subst_vars" | sed 's/.*/&!$&$ac_delim/' && + echo "_ACEOF" +} >conf$$subs.sh || + as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5 +ac_delim_num=`echo "$ac_subst_vars" | grep -c '^'` +ac_delim='%!_!# ' +for ac_last_try in false false false false false :; do + . ./conf$$subs.sh || + as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5 + + ac_delim_n=`sed -n "s/.*$ac_delim\$/X/p" conf$$subs.awk | grep -c X` + if test $ac_delim_n = $ac_delim_num; then + break + elif $ac_last_try; then + as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5 + else + ac_delim="$ac_delim!$ac_delim _$ac_delim!! " + fi +done +rm -f conf$$subs.sh + +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +cat >>"\$ac_tmp/subs1.awk" <<\\_ACAWK && +_ACEOF +sed -n ' +h +s/^/S["/; s/!.*/"]=/ +p +g +s/^[^!]*!// +:repl +t repl +s/'"$ac_delim"'$// +t delim +:nl +h +s/\(.\{148\}\)..*/\1/ +t more1 +s/["\\]/\\&/g; s/^/"/; s/$/\\n"\\/ +p +n +b repl +:more1 +s/["\\]/\\&/g; s/^/"/; s/$/"\\/ +p +g +s/.\{148\}// +t nl +:delim +h +s/\(.\{148\}\)..*/\1/ +t more2 +s/["\\]/\\&/g; s/^/"/; s/$/"/ +p +b +:more2 +s/["\\]/\\&/g; s/^/"/; s/$/"\\/ +p +g +s/.\{148\}// +t delim +' >$CONFIG_STATUS || ac_write_fail=1 +rm -f conf$$subs.awk +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +_ACAWK +cat >>"\$ac_tmp/subs1.awk" <<_ACAWK && + for (key in S) S_is_set[key] = 1 + FS = "" + +} +{ + line = $ 0 + nfields = split(line, field, "@") + substed = 0 + len = length(field[1]) + for (i = 2; i < nfields; i++) { + key = field[i] + keylen = length(key) + if (S_is_set[key]) { + value = S[key] + line = substr(line, 1, len) "" value "" substr(line, len + keylen + 3) + len += length(value) + length(field[++i]) + substed = 1 + } else + len += 1 + keylen + } + + print line +} + +_ACAWK +_ACEOF +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +if sed "s/$ac_cr//" < /dev/null > /dev/null 2>&1; then + sed "s/$ac_cr\$//; s/$ac_cr/$ac_cs_awk_cr/g" +else + cat +fi < "$ac_tmp/subs1.awk" > "$ac_tmp/subs.awk" \ + || as_fn_error $? "could not setup config files machinery" "$LINENO" 5 +_ACEOF + +# VPATH may cause trouble with some makes, so we remove sole $(srcdir), +# ${srcdir} and @srcdir@ entries from VPATH if srcdir is ".", strip leading and +# trailing colons and then remove the whole line if VPATH becomes empty +# (actually we leave an empty line to preserve line numbers). +if test "x$srcdir" = x.; then + ac_vpsub='/^[ ]*VPATH[ ]*=[ ]*/{ +h +s/// +s/^/:/ +s/[ ]*$/:/ +s/:\$(srcdir):/:/g +s/:\${srcdir}:/:/g +s/:@srcdir@:/:/g +s/^:*// +s/:*$// +x +s/\(=[ ]*\).*/\1/ +G +s/\n// +s/^[^=]*=[ ]*$// +}' +fi + +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +fi # test -n "$CONFIG_FILES" + +# Set up the scripts for CONFIG_HEADERS section. +# No need to generate them if there are no CONFIG_HEADERS. +# This happens for instance with './config.status Makefile'. +if test -n "$CONFIG_HEADERS"; then +cat >"$ac_tmp/defines.awk" <<\_ACAWK || +BEGIN { +_ACEOF + +# Transform confdefs.h into an awk script 'defines.awk', embedded as +# here-document in config.status, that substitutes the proper values into +# config.h.in to produce config.h. + +# Create a delimiter string that does not exist in confdefs.h, to ease +# handling of long lines. +ac_delim='%!_!# ' +for ac_last_try in false false :; do + ac_tt=`sed -n "/$ac_delim/p" confdefs.h` + if test -z "$ac_tt"; then + break + elif $ac_last_try; then + as_fn_error $? "could not make $CONFIG_HEADERS" "$LINENO" 5 + else + ac_delim="$ac_delim!$ac_delim _$ac_delim!! " + fi +done + +# For the awk script, D is an array of macro values keyed by name, +# likewise P contains macro parameters if any. Preserve backslash +# newline sequences. + +ac_word_re=[_$as_cr_Letters][_$as_cr_alnum]* +sed -n ' +s/.\{148\}/&'"$ac_delim"'/g +t rset +:rset +s/^[ ]*#[ ]*define[ ][ ]*/ / +t def +d +:def +s/\\$// +t bsnl +s/["\\]/\\&/g +s/^ \('"$ac_word_re"'\)\(([^()]*)\)[ ]*\(.*\)/P["\1"]="\2"\ +D["\1"]=" \3"/p +s/^ \('"$ac_word_re"'\)[ ]*\(.*\)/D["\1"]=" \2"/p +d +:bsnl +s/["\\]/\\&/g +s/^ \('"$ac_word_re"'\)\(([^()]*)\)[ ]*\(.*\)/P["\1"]="\2"\ +D["\1"]=" \3\\\\\\n"\\/p +t cont +s/^ \('"$ac_word_re"'\)[ ]*\(.*\)/D["\1"]=" \2\\\\\\n"\\/p +t cont +d +:cont +n +s/.\{148\}/&'"$ac_delim"'/g +t clear +:clear +s/\\$// +t bsnlc +s/["\\]/\\&/g; s/^/"/; s/$/"/p +d +:bsnlc +s/["\\]/\\&/g; s/^/"/; s/$/\\\\\\n"\\/p +b cont +' >$CONFIG_STATUS || ac_write_fail=1 + +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 + for (key in D) D_is_set[key] = 1 + FS = "" +} +/^[\t ]*#[\t ]*(define|undef)[\t ]+$ac_word_re([\t (]|\$)/ { + line = \$ 0 + split(line, arg, " ") + if (arg[1] == "#") { + defundef = arg[2] + mac1 = arg[3] + } else { + defundef = substr(arg[1], 2) + mac1 = arg[2] + } + split(mac1, mac2, "(") #) + macro = mac2[1] + prefix = substr(line, 1, index(line, defundef) - 1) + if (D_is_set[macro]) { + # Preserve the white space surrounding the "#". + print prefix "define", macro P[macro] D[macro] + next + } else { + # Replace #undef with comments. This is necessary, for example, + # in the case of _POSIX_SOURCE, which is predefined and required + # on some systems where configure will not decide to define it. + if (defundef == "undef") { + print "/*", prefix defundef, macro, "*/" + next + } + } +} +{ print } +_ACAWK +_ACEOF +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 + as_fn_error $? "could not setup config headers machinery" "$LINENO" 5 +fi # test -n "$CONFIG_HEADERS" + + +eval set X " :F $CONFIG_FILES :H $CONFIG_HEADERS :C $CONFIG_COMMANDS" +shift +for ac_tag +do + case $ac_tag in + :[FHLC]) ac_mode=$ac_tag; continue;; + esac + case $ac_mode$ac_tag in + :[FHL]*:*);; + :L* | :C*:*) as_fn_error $? "invalid tag '$ac_tag'" "$LINENO" 5;; + :[FH]-) ac_tag=-:-;; + :[FH]*) ac_tag=$ac_tag:$ac_tag.in;; + esac + ac_save_IFS=$IFS + IFS=: + set x $ac_tag + IFS=$ac_save_IFS + shift + ac_file=$1 + shift + + case $ac_mode in + :L) ac_source=$1;; + :[FH]) + ac_file_inputs= + for ac_f + do + case $ac_f in + -) ac_f="$ac_tmp/stdin";; + *) # Look for the file first in the build tree, then in the source tree + # (if the path is not absolute). The absolute path cannot be DOS-style, + # because $ac_f cannot contain ':'. + test -f "$ac_f" || + case $ac_f in + [\\/$]*) false;; + *) test -f "$srcdir/$ac_f" && ac_f="$srcdir/$ac_f";; + esac || + as_fn_error 1 "cannot find input file: '$ac_f'" "$LINENO" 5;; + esac + case $ac_f in *\'*) ac_f=`printf "%s\n" "$ac_f" | sed "s/'/'\\\\\\\\''/g"`;; esac + as_fn_append ac_file_inputs " '$ac_f'" + done + + # Let's still pretend it is 'configure' which instantiates (i.e., don't + # use $as_me), people would be surprised to read: + # /* config.h. Generated by config.status. */ + configure_input='Generated from '` + printf "%s\n" "$*" | sed 's|^[^:]*/||;s|:[^:]*/|, |g' + `' by configure.' + if test x"$ac_file" != x-; then + configure_input="$ac_file. $configure_input" + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: creating $ac_file" >&5 +printf "%s\n" "$as_me: creating $ac_file" >&6;} + fi + # Neutralize special characters interpreted by sed in replacement strings. + case $configure_input in #( + *\&* | *\|* | *\\* ) + ac_sed_conf_input=`printf "%s\n" "$configure_input" | + sed 's/[\\\\&|]/\\\\&/g'`;; #( + *) ac_sed_conf_input=$configure_input;; + esac + + case $ac_tag in + *:-:* | *:-) cat >"$ac_tmp/stdin" \ + || as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;; + esac + ;; + esac + + ac_dir=`$as_dirname -- "$ac_file" || +$as_expr X"$ac_file" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$ac_file" : 'X\(//\)[^/]' \| \ + X"$ac_file" : 'X\(//\)$' \| \ + X"$ac_file" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X"$ac_file" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + as_dir="$ac_dir"; as_fn_mkdir_p + ac_builddir=. + +case "$ac_dir" in +.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;; +*) + ac_dir_suffix=/`printf "%s\n" "$ac_dir" | sed 's|^\.[\\/]||'` + # A ".." for each directory in $ac_dir_suffix. + ac_top_builddir_sub=`printf "%s\n" "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'` + case $ac_top_builddir_sub in + "") ac_top_builddir_sub=. ac_top_build_prefix= ;; + *) ac_top_build_prefix=$ac_top_builddir_sub/ ;; + esac ;; +esac +ac_abs_top_builddir=$ac_pwd +ac_abs_builddir=$ac_pwd$ac_dir_suffix +# for backward compatibility: +ac_top_builddir=$ac_top_build_prefix + +case $srcdir in + .) # We are building in place. + ac_srcdir=. + ac_top_srcdir=$ac_top_builddir_sub + ac_abs_top_srcdir=$ac_pwd ;; + [\\/]* | ?:[\\/]* ) # Absolute name. + ac_srcdir=$srcdir$ac_dir_suffix; + ac_top_srcdir=$srcdir + ac_abs_top_srcdir=$srcdir ;; + *) # Relative name. + ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix + ac_top_srcdir=$ac_top_build_prefix$srcdir + ac_abs_top_srcdir=$ac_pwd/$srcdir ;; +esac +ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix + + + case $ac_mode in + :F) + # + # CONFIG_FILE + # + + case $INSTALL in + [\\/$]* | ?:[\\/]* ) ac_INSTALL=$INSTALL ;; + *) ac_INSTALL=$ac_top_build_prefix$INSTALL ;; + esac + ac_MKDIR_P=$MKDIR_P + case $MKDIR_P in + [\\/$]* | ?:[\\/]* ) ;; + */*) ac_MKDIR_P=$ac_top_build_prefix$MKDIR_P ;; + esac +_ACEOF + +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +# If the template does not know about datarootdir, expand it. +# FIXME: This hack should be removed a few years after 2.60. +ac_datarootdir_hack=; ac_datarootdir_seen= +ac_sed_dataroot=' +/datarootdir/ { + p + q +} +/@datadir@/p +/@docdir@/p +/@infodir@/p +/@localedir@/p +/@mandir@/p' +case `eval "sed -n \"\$ac_sed_dataroot\" $ac_file_inputs"` in +*datarootdir*) ac_datarootdir_seen=yes;; +*@datadir@*|*@docdir@*|*@infodir@*|*@localedir@*|*@mandir@*) + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&5 +printf "%s\n" "$as_me: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&2;} +_ACEOF +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 + ac_datarootdir_hack=' + s&@datadir@&$datadir&g + s&@docdir@&$docdir&g + s&@infodir@&$infodir&g + s&@localedir@&$localedir&g + s&@mandir@&$mandir&g + s&\\\${datarootdir}&$datarootdir&g' ;; +esac +_ACEOF + +# Neutralize VPATH when '$srcdir' = '.'. +# Shell code in configure.ac might set extrasub. +# FIXME: do we really want to maintain this feature? +cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 +ac_sed_extra="$ac_vpsub +$extrasub +_ACEOF +cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 +:t +/@[a-zA-Z_][a-zA-Z_0-9]*@/!b +s|@configure_input@|$ac_sed_conf_input|;t t +s&@top_builddir@&$ac_top_builddir_sub&;t t +s&@top_build_prefix@&$ac_top_build_prefix&;t t +s&@srcdir@&$ac_srcdir&;t t +s&@abs_srcdir@&$ac_abs_srcdir&;t t +s&@top_srcdir@&$ac_top_srcdir&;t t +s&@abs_top_srcdir@&$ac_abs_top_srcdir&;t t +s&@builddir@&$ac_builddir&;t t +s&@abs_builddir@&$ac_abs_builddir&;t t +s&@abs_top_builddir@&$ac_abs_top_builddir&;t t +s&@INSTALL@&$ac_INSTALL&;t t +s&@MKDIR_P@&$ac_MKDIR_P&;t t +$ac_datarootdir_hack +" +eval sed \"\$ac_sed_extra\" "$ac_file_inputs" | $AWK -f "$ac_tmp/subs.awk" \ + >$ac_tmp/out || as_fn_error $? "could not create $ac_file" "$LINENO" 5 + +test -z "$ac_datarootdir_hack$ac_datarootdir_seen" && + { ac_out=`sed -n '/\${datarootdir}/p' "$ac_tmp/out"`; test -n "$ac_out"; } && + { ac_out=`sed -n '/^[ ]*datarootdir[ ]*:*=/p' \ + "$ac_tmp/out"`; test -z "$ac_out"; } && + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file contains a reference to the variable 'datarootdir' +which seems to be undefined. Please make sure it is defined" >&5 +printf "%s\n" "$as_me: WARNING: $ac_file contains a reference to the variable 'datarootdir' +which seems to be undefined. Please make sure it is defined" >&2;} + + rm -f "$ac_tmp/stdin" + case $ac_file in + -) cat "$ac_tmp/out" && rm -f "$ac_tmp/out";; + *) rm -f "$ac_file" && mv "$ac_tmp/out" "$ac_file";; + esac \ + || as_fn_error $? "could not create $ac_file" "$LINENO" 5 + ;; + :H) + # + # CONFIG_HEADER + # + if test x"$ac_file" != x-; then + { + printf "%s\n" "/* $configure_input */" >&1 \ + && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" + } >"$ac_tmp/config.h" \ + || as_fn_error $? "could not create $ac_file" "$LINENO" 5 + if diff "$ac_file" "$ac_tmp/config.h" >/dev/null 2>&1; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: $ac_file is unchanged" >&5 +printf "%s\n" "$as_me: $ac_file is unchanged" >&6;} + else + rm -f "$ac_file" + mv "$ac_tmp/config.h" "$ac_file" \ + || as_fn_error $? "could not create $ac_file" "$LINENO" 5 + fi + else + printf "%s\n" "/* $configure_input */" >&1 \ + && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" \ + || as_fn_error $? "could not create -" "$LINENO" 5 + fi +# Compute "$ac_file"'s index in $config_headers. +_am_arg="$ac_file" +_am_stamp_count=1 +for _am_header in $config_headers :; do + case $_am_header in + $_am_arg | $_am_arg:* ) + break ;; + * ) + _am_stamp_count=`expr $_am_stamp_count + 1` ;; + esac +done +echo "timestamp for $_am_arg" >`$as_dirname -- "$_am_arg" || +$as_expr X"$_am_arg" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$_am_arg" : 'X\(//\)[^/]' \| \ + X"$_am_arg" : 'X\(//\)$' \| \ + X"$_am_arg" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X"$_am_arg" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'`/stamp-h$_am_stamp_count + ;; + + :C) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: executing $ac_file commands" >&5 +printf "%s\n" "$as_me: executing $ac_file commands" >&6;} + ;; + esac + + + case $ac_file$ac_mode in + "depfiles":C) test x"$AMDEP_TRUE" != x"" || { + # Older Autoconf quotes --file arguments for eval, but not when files + # are listed without --file. Let's play safe and only enable the eval + # if we detect the quoting. + # TODO: see whether this extra hack can be removed once we start + # requiring Autoconf 2.70 or later. + case $CONFIG_FILES in #( + *\'*) : + eval set x "$CONFIG_FILES" ;; #( + *) : + set x $CONFIG_FILES ;; #( + *) : + ;; +esac + shift + # Used to flag and report bootstrapping failures. + am_rc=0 + for am_mf + do + # Strip MF so we end up with the name of the file. + am_mf=`printf "%s\n" "$am_mf" | sed -e 's/:.*$//'` + # Check whether this is an Automake generated Makefile which includes + # dependency-tracking related rules and includes. + # Grep'ing the whole file directly is not great: AIX grep has a line + # limit of 2048, but all sed's we know have understand at least 4000. + sed -n 's,^am--depfiles:.*,X,p' "$am_mf" | grep X >/dev/null 2>&1 \ + || continue + am_dirpart=`$as_dirname -- "$am_mf" || +$as_expr X"$am_mf" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$am_mf" : 'X\(//\)[^/]' \| \ + X"$am_mf" : 'X\(//\)$' \| \ + X"$am_mf" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X"$am_mf" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + am_filepart=`$as_basename -- "$am_mf" || +$as_expr X/"$am_mf" : '.*/\([^/][^/]*\)/*$' \| \ + X"$am_mf" : 'X\(//\)$' \| \ + X"$am_mf" : 'X\(/\)' \| . 2>/dev/null || +printf "%s\n" X/"$am_mf" | + sed '/^.*\/\([^/][^/]*\)\/*$/{ + s//\1/ + q + } + /^X\/\(\/\/\)$/{ + s//\1/ + q + } + /^X\/\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q'` + { echo "$as_me:$LINENO: cd "$am_dirpart" \ + && sed -e '/# am--include-marker/d' "$am_filepart" \ + | $MAKE -f - am--depfiles" >&5 + (cd "$am_dirpart" \ + && sed -e '/# am--include-marker/d' "$am_filepart" \ + | $MAKE -f - am--depfiles) >&5 2>&5 + ac_status=$? + echo "$as_me:$LINENO: \$? = $ac_status" >&5 + (exit $ac_status); } || am_rc=$? + done + if test $am_rc -ne 0; then + { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 +printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} +as_fn_error $? "Something went wrong bootstrapping makefile fragments + for automatic dependency tracking. If GNU make was not used, consider + re-running the configure script with MAKE=\"gmake\" (or whatever is + necessary). You can also try re-running configure with the + '--disable-dependency-tracking' option to at least be able to build + the package (albeit without support for automatic dependency tracking). +See 'config.log' for more details" "$LINENO" 5; } + fi + { am_dirpart=; unset am_dirpart;} + { am_filepart=; unset am_filepart;} + { am_mf=; unset am_mf;} + { am_rc=; unset am_rc;} + rm -f conftest-deps.mk +} + ;; + + esac +done # for ac_tag + + +as_fn_exit 0 +_ACEOF +ac_clean_files=$ac_clean_files_save + +test $ac_write_fail = 0 || + as_fn_error $? "write failure creating $CONFIG_STATUS" "$LINENO" 5 + + +# configure is writing to config.log, and then calls config.status. +# config.status does its own redirection, appending to config.log. +# Unfortunately, on DOS this fails, as config.log is still kept open +# by configure, so config.status won't be able to write to it; its +# output is simply discarded. So we exec the FD to /dev/null, +# effectively closing config.log, so it can be properly (re)opened and +# appended to by config.status. When coming back to configure, we +# need to make the FD available again. +if test "$no_create" != yes; then + ac_cs_success=: + ac_config_status_args= + test "$silent" = yes && + ac_config_status_args="$ac_config_status_args --quiet" + exec 5>/dev/null + $SHELL $CONFIG_STATUS $ac_config_status_args || ac_cs_success=false + exec 5>>config.log + # Use ||, not &&, to avoid exiting from the if with $? = 1, which + # would make configure fail if this is the last instruction. + $ac_cs_success || as_fn_exit 1 +fi +if test -n "$ac_unrecognized_opts" && test "$enable_option_checking" != no; then + { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: unrecognized options: $ac_unrecognized_opts" >&5 +printf "%s\n" "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2;} +fi + + diff --git a/Build/source/libs/mpfi/configure.ac b/Build/source/libs/mpfi/configure.ac new file mode 100644 index 00000000000..c7135693a02 --- /dev/null +++ b/Build/source/libs/mpfi/configure.ac @@ -0,0 +1,67 @@ +dnl $Id$ +dnl Process this file with autoconf to produce a configure script. +dnl +dnl Copyright (C) 2022-2024 Luigi Scarso +dnl +dnl This file is free software; the copyright holder +dnl gives unlimited permission to copy and/or distribute it, +dnl with or without modifications, as long as this notice is preserved. +dnl +m4_include([version.ac])[] dnl define mpfi_version +AC_INIT([mpfi (TeX Live)], mpfi_version, [tex-k@tug.org]) +AC_PREREQ([2.65]) +AC_CONFIG_SRCDIR([mpfi-src/src/mpfi.h]) +AC_CONFIG_AUX_DIR([../../build-aux]) +AC_CONFIG_MACRO_DIRS([../../m4 m4]) + +KPSE_BASIC([mpfi]) + +AC_PROG_CC +AC_PROG_RANLIB +AC_PROG_LN_S + +KPSE_COMPILER_VISIBILITY + +AC_CONFIG_HEADERS([mpfi_config.h]) + +KPSE_CANONICAL_HOST + +MPFI_CONFIGS + +AM_CONDITIONAL([build], [test "x$enable_build" != xno]) + +KPSE_GMP_FLAGS +KPSE_MPFR_FLAGS + +dnl Checks for typedefs, structures, and compiler characteristics. +AC_TYPE_SIZE_T + + + +if test "x$enable_build" != xno || test -f config.force; then + +AC_CHECK_HEADER([limits.h], [], [AC_MSG_ERROR([limits.h not found])]) +AC_CHECK_HEADER([float.h], [], [AC_MSG_ERROR([float.h not found])]) +AC_CHECK_HEADER([string.h], [], [AC_MSG_ERROR([string.h not found])]) + +KPSE_ADD_FLAGS([gmp]) +KPSE_ADD_FLAGS([mpfr]) + + +dnl Checks for library functions. +AC_CHECK_FUNCS([dup2 gettimeofday]) +AC_CHECK_FUNCS([mpfr_q_sub mpfr_z_sub mpfr_z_div]) + + +KPSE_RESTORE_FLAGS + +echo timestamp >config.force +fi + +AC_SUBST([MPFI_TREE], [mpfi-src]) + +dnl AC_CONFIG_LINKS([mparam.h:mpfi-src/src/mparam_h.in]) + +AC_CONFIG_FILES([Makefile include/Makefile]) + +AC_OUTPUT diff --git a/Build/source/libs/mpfi/include/Makefile.am b/Build/source/libs/mpfi/include/Makefile.am new file mode 100644 index 00000000000..aa812998ce4 --- /dev/null +++ b/Build/source/libs/mpfi/include/Makefile.am @@ -0,0 +1,17 @@ +## Proxy Makefile.am to install mpfi headers for TeX Live. +## +## Copyright (C) 2022 Luigi Scarso +## +## This file is free software; the copyright holder +## gives unlimited permission to copy and/or distribute it, +## with or without modifications, as long as this notice is preserved. +## +MPFI_SRC = $(top_srcdir)/$(MPFI_TREE)/src + +hdr_links = \ + $(MPFI_SRC)/mpfi.h \ + $(MPFI_SRC)/mpfi-impl.h \ + $(MPFI_SRC)/mpfi_io.h + +include $(top_srcdir)/../../am/hdr_links.am + diff --git a/Build/source/libs/mpfi/include/Makefile.in b/Build/source/libs/mpfi/include/Makefile.in new file mode 100644 index 00000000000..d7972cb2b53 --- /dev/null +++ b/Build/source/libs/mpfi/include/Makefile.in @@ -0,0 +1,446 @@ +# Makefile.in generated by automake 1.16.5 from Makefile.am. +# @configure_input@ + +# Copyright (C) 1994-2021 Free Software Foundation, Inc. + +# This Makefile.in is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +@SET_MAKE@ +VPATH = @srcdir@ +am__is_gnu_make = { \ + if test -z '$(MAKELEVEL)'; then \ + false; \ + elif test -n '$(MAKE_HOST)'; then \ + true; \ + elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \ + true; \ + else \ + false; \ + fi; \ +} +am__make_running_with_option = \ + case $${target_option-} in \ + ?) ;; \ + *) echo "am__make_running_with_option: internal error: invalid" \ + "target option '$${target_option-}' specified" >&2; \ + exit 1;; \ + esac; \ + has_opt=no; \ + sane_makeflags=$$MAKEFLAGS; \ + if $(am__is_gnu_make); then \ + sane_makeflags=$$MFLAGS; \ + else \ + case $$MAKEFLAGS in \ + *\\[\ \ ]*) \ + bs=\\; \ + sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \ + | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \ + esac; \ + fi; \ + skip_next=no; \ + strip_trailopt () \ + { \ + flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \ + }; \ + for flg in $$sane_makeflags; do \ + test $$skip_next = yes && { skip_next=no; continue; }; \ + case $$flg in \ + *=*|--*) continue;; \ + -*I) strip_trailopt 'I'; skip_next=yes;; \ + -*I?*) strip_trailopt 'I';; \ + -*O) strip_trailopt 'O'; skip_next=yes;; \ + -*O?*) strip_trailopt 'O';; \ + -*l) strip_trailopt 'l'; skip_next=yes;; \ + -*l?*) strip_trailopt 'l';; \ + -[dEDm]) skip_next=yes;; \ + -[JT]) skip_next=yes;; \ + esac; \ + case $$flg in \ + *$$target_option*) has_opt=yes; break;; \ + esac; \ + done; \ + test $$has_opt = yes +am__make_dryrun = (target_option=n; $(am__make_running_with_option)) +am__make_keepgoing = (target_option=k; $(am__make_running_with_option)) +pkgdatadir = $(datadir)/@PACKAGE@ +pkgincludedir = $(includedir)/@PACKAGE@ +pkglibdir = $(libdir)/@PACKAGE@ +pkglibexecdir = $(libexecdir)/@PACKAGE@ +am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd +install_sh_DATA = $(install_sh) -c -m 644 +install_sh_PROGRAM = $(install_sh) -c +install_sh_SCRIPT = $(install_sh) -c +INSTALL_HEADER = $(INSTALL_DATA) +transform = $(program_transform_name) +NORMAL_INSTALL = : +PRE_INSTALL = : +POST_INSTALL = : +NORMAL_UNINSTALL = : +PRE_UNINSTALL = : +POST_UNINSTALL = : +build_triplet = @build@ +host_triplet = @host@ +subdir = include +ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 +am__aclocal_m4_deps = $(top_srcdir)/../../m4/kpse-common.m4 \ + $(top_srcdir)/../../m4/kpse-gmp-flags.m4 \ + $(top_srcdir)/../../m4/kpse-mpfr-flags.m4 \ + $(top_srcdir)/../../m4/kpse-visibility.m4 \ + $(top_srcdir)/../../m4/kpse-warnings.m4 \ + $(top_srcdir)/version.ac $(top_srcdir)/configure.ac +am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ + $(ACLOCAL_M4) +DIST_COMMON = $(srcdir)/Makefile.am $(am__DIST_COMMON) +mkinstalldirs = $(install_sh) -d +CONFIG_HEADER = $(top_builddir)/mpfi_config.h +CONFIG_CLEAN_FILES = +CONFIG_CLEAN_VPATH_FILES = +AM_V_P = $(am__v_P_@AM_V@) +am__v_P_ = $(am__v_P_@AM_DEFAULT_V@) +am__v_P_0 = false +am__v_P_1 = : +AM_V_GEN = $(am__v_GEN_@AM_V@) +am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@) +am__v_GEN_0 = @echo " GEN " $@; +am__v_GEN_1 = +AM_V_at = $(am__v_at_@AM_V@) +am__v_at_ = $(am__v_at_@AM_DEFAULT_V@) +am__v_at_0 = @ +am__v_at_1 = +SOURCES = +DIST_SOURCES = +am__can_run_installinfo = \ + case $$AM_UPDATE_INFO_DIR in \ + n|no|NO) false;; \ + *) (install-info --version) >/dev/null 2>&1;; \ + esac +am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP) +am__DIST_COMMON = $(srcdir)/Makefile.in \ + $(top_srcdir)/../../am/hdr_links.am +DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) +ACLOCAL = @ACLOCAL@ +AMTAR = @AMTAR@ +AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@ +AUTOCONF = @AUTOCONF@ +AUTOHEADER = @AUTOHEADER@ +AUTOMAKE = @AUTOMAKE@ +AWK = @AWK@ +CC = @CC@ +CCDEPMODE = @CCDEPMODE@ +CFLAGS = @CFLAGS@ +CPPFLAGS = @CPPFLAGS@ +CSCOPE = @CSCOPE@ +CTAGS = @CTAGS@ +CYGPATH_W = @CYGPATH_W@ +DEFS = @DEFS@ +DEPDIR = @DEPDIR@ +ECHO_C = @ECHO_C@ +ECHO_N = @ECHO_N@ +ECHO_T = @ECHO_T@ +ETAGS = @ETAGS@ +EXEEXT = @EXEEXT@ +GMP_DEPEND = @GMP_DEPEND@ +GMP_INCLUDES = @GMP_INCLUDES@ +GMP_LIBS = @GMP_LIBS@ +INSTALL = @INSTALL@ +INSTALL_DATA = @INSTALL_DATA@ +INSTALL_PROGRAM = @INSTALL_PROGRAM@ +INSTALL_SCRIPT = @INSTALL_SCRIPT@ +INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ +LDFLAGS = @LDFLAGS@ +LIBOBJS = @LIBOBJS@ +LIBS = @LIBS@ +LN_S = @LN_S@ +LTLIBOBJS = @LTLIBOBJS@ +MAINT = @MAINT@ +MAKEINFO = @MAKEINFO@ +MKDIR_P = @MKDIR_P@ +MPFI_TREE = @MPFI_TREE@ +MPFR_DEPEND = @MPFR_DEPEND@ +MPFR_INCLUDES = @MPFR_INCLUDES@ +MPFR_LIBS = @MPFR_LIBS@ +OBJEXT = @OBJEXT@ +PACKAGE = @PACKAGE@ +PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ +PACKAGE_NAME = @PACKAGE_NAME@ +PACKAGE_STRING = @PACKAGE_STRING@ +PACKAGE_TARNAME = @PACKAGE_TARNAME@ +PACKAGE_URL = @PACKAGE_URL@ +PACKAGE_VERSION = @PACKAGE_VERSION@ +PATH_SEPARATOR = @PATH_SEPARATOR@ +RANLIB = @RANLIB@ +SET_MAKE = @SET_MAKE@ +SHELL = @SHELL@ +STRIP = @STRIP@ +VERSION = @VERSION@ +VISIBILITY_CFLAGS = @VISIBILITY_CFLAGS@ +WARNING_CFLAGS = @WARNING_CFLAGS@ +abs_builddir = @abs_builddir@ +abs_srcdir = @abs_srcdir@ +abs_top_builddir = @abs_top_builddir@ +abs_top_srcdir = @abs_top_srcdir@ +ac_ct_CC = @ac_ct_CC@ +am__include = @am__include@ +am__leading_dot = @am__leading_dot@ +am__quote = @am__quote@ +am__tar = @am__tar@ +am__untar = @am__untar@ +bindir = @bindir@ +build = @build@ +build_alias = @build_alias@ +build_cpu = @build_cpu@ +build_os = @build_os@ +build_vendor = @build_vendor@ +builddir = @builddir@ +datadir = @datadir@ +datarootdir = @datarootdir@ +docdir = @docdir@ +dvidir = @dvidir@ +exec_prefix = @exec_prefix@ +host = @host@ +host_alias = @host_alias@ +host_cpu = @host_cpu@ +host_os = @host_os@ +host_vendor = @host_vendor@ +htmldir = @htmldir@ +includedir = @includedir@ +infodir = @infodir@ +install_sh = @install_sh@ +libdir = @libdir@ +libexecdir = @libexecdir@ +localedir = @localedir@ +localstatedir = @localstatedir@ +mandir = @mandir@ +mkdir_p = @mkdir_p@ +oldincludedir = @oldincludedir@ +pdfdir = @pdfdir@ +prefix = @prefix@ +program_transform_name = @program_transform_name@ +psdir = @psdir@ +runstatedir = @runstatedir@ +sbindir = @sbindir@ +sharedstatedir = @sharedstatedir@ +srcdir = @srcdir@ +sysconfdir = @sysconfdir@ +target_alias = @target_alias@ +top_build_prefix = @top_build_prefix@ +top_builddir = @top_builddir@ +top_srcdir = @top_srcdir@ +MPFI_SRC = $(top_srcdir)/$(MPFI_TREE)/src +hdr_links = \ + $(MPFI_SRC)/mpfi.h \ + $(MPFI_SRC)/mpfi-impl.h \ + $(MPFI_SRC)/mpfi_io.h + +all: all-am + +.SUFFIXES: +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(top_srcdir)/../../am/hdr_links.am $(am__configure_deps) + @for dep in $?; do \ + case '$(am__configure_deps)' in \ + *$$dep*) \ + ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \ + && { if test -f $@; then exit 0; else break; fi; }; \ + exit 1;; \ + esac; \ + done; \ + echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign include/Makefile'; \ + $(am__cd) $(top_srcdir) && \ + $(AUTOMAKE) --foreign include/Makefile +Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status + @case '$?' in \ + *config.status*) \ + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \ + *) \ + echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles)'; \ + cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles);; \ + esac; +$(top_srcdir)/../../am/hdr_links.am $(am__empty): + +$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh + +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(am__aclocal_m4_deps): +tags TAGS: + +ctags CTAGS: + +cscope cscopelist: + +distdir: $(BUILT_SOURCES) + $(MAKE) $(AM_MAKEFLAGS) distdir-am + +distdir-am: $(DISTFILES) + @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + list='$(DISTFILES)'; \ + dist_files=`for file in $$list; do echo $$file; done | \ + sed -e "s|^$$srcdirstrip/||;t" \ + -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ + case $$dist_files in \ + */*) $(MKDIR_P) `echo "$$dist_files" | \ + sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ + sort -u` ;; \ + esac; \ + for file in $$dist_files; do \ + if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ + if test -d $$d/$$file; then \ + dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ + if test -d "$(distdir)/$$file"; then \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ + cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ + else \ + test -f "$(distdir)/$$file" \ + || cp -p $$d/$$file "$(distdir)/$$file" \ + || exit 1; \ + fi; \ + done +check-am: all-am +check: check-am +all-am: Makefile all-local +installdirs: +install: install-am +install-exec: install-exec-am +install-data: install-data-am +uninstall: uninstall-am + +install-am: all-am + @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am + +installcheck: installcheck-am +install-strip: + if test -z '$(STRIP)'; then \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + install; \ + else \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \ + fi +mostlyclean-generic: + +clean-generic: + +distclean-generic: + -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) + -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + +maintainer-clean-generic: + @echo "This command is intended for maintainers to use" + @echo "it deletes files that may require special tools to rebuild." +clean: clean-am + +clean-am: clean-generic mostlyclean-am + +distclean: distclean-am + -rm -f Makefile +distclean-am: clean-am distclean-generic distclean-local + +dvi: dvi-am + +dvi-am: + +html: html-am + +html-am: + +info: info-am + +info-am: + +install-data-am: + +install-dvi: install-dvi-am + +install-dvi-am: + +install-exec-am: + +install-html: install-html-am + +install-html-am: + +install-info: install-info-am + +install-info-am: + +install-man: + +install-pdf: install-pdf-am + +install-pdf-am: + +install-ps: install-ps-am + +install-ps-am: + +installcheck-am: + +maintainer-clean: maintainer-clean-am + -rm -f Makefile +maintainer-clean-am: distclean-am maintainer-clean-generic + +mostlyclean: mostlyclean-am + +mostlyclean-am: mostlyclean-generic + +pdf: pdf-am + +pdf-am: + +ps: ps-am + +ps-am: + +uninstall-am: + +.MAKE: install-am install-strip + +.PHONY: all all-am all-local check check-am clean clean-generic \ + cscopelist-am ctags-am distclean distclean-generic \ + distclean-local distdir dvi dvi-am html html-am info info-am \ + install install-am install-data install-data-am install-dvi \ + install-dvi-am install-exec install-exec-am install-html \ + install-html-am install-info install-info-am install-man \ + install-pdf install-pdf-am install-ps install-ps-am \ + install-strip installcheck installcheck-am installdirs \ + maintainer-clean maintainer-clean-generic mostlyclean \ + mostlyclean-generic pdf pdf-am ps ps-am tags-am uninstall \ + uninstall-am + +.PRECIOUS: Makefile + +all-local: + @for file in $(hdr_links); do \ + test -f $$file || continue; \ + inst=`echo $$file | sed -e 's/^.*\///'`; \ + test -f $$inst || { \ + rm -f $$inst; \ + if $(AM_V_P); then echo "$(LN_S) $$file $$inst"; \ + else echo " INST $$inst"; fi; \ + $(LN_S) $$file $$inst; } || exit 1; \ + done + +distclean-local: + rm -f *.h + +# Tell versions [3.59,3.63) of GNU make to not export all variables. +# Otherwise a system limit (for SysV at least) may be exceeded. +.NOEXPORT: diff --git a/Build/source/libs/mpfi/m4/mpfi-configs.m4 b/Build/source/libs/mpfi/m4/mpfi-configs.m4 new file mode 100644 index 00000000000..e69de29bb2d diff --git a/Build/source/libs/mpfi/mpfi-src/AUTHORS b/Build/source/libs/mpfi/mpfi-src/AUTHORS new file mode 100644 index 00000000000..53f546d28a4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/AUTHORS @@ -0,0 +1,6 @@ +Nathalie Revol Nathalie.Revol@ens-lyon.fr +Fabrice Rouillier Fabrice.Rouillier@inria.fr +Sylvain Chevillard Sylvain.Chevillard@ens-lyon.org +Christoph Lauter Christoph.Lauter@ens-lyon.org +Hong Diep Nguyen Hong.Diep.Nguyen@ens-lyon.org +Philippe Theveny Philippe.Theveny@ens-lyon.org diff --git a/Build/source/libs/mpfi/mpfi-src/ChangeLog b/Build/source/libs/mpfi/mpfi-src/ChangeLog new file mode 100644 index 00000000000..5303d1cb2ef --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/ChangeLog @@ -0,0 +1,364 @@ +2009-04-28 03:00 clauter + + * configure.ac, doc/mpfi.info, doc/mpfi.texi: Changed version + number to something greater than all different version numbers in + the doc etc. Adapted documentation. + +2009-04-28 02:04 clauter + + * ChangeLog, NEWS, README: Some history editing for releasing + +2009-04-22 19:07 schevill + + * README: reverted nothing + +2009-04-22 19:05 schevill + + * README: nothing + +2009-04-22 19:02 schevill + + * configure.ac: + +2009-04-22 19:00 schevill + + * configure.ac: temporary situation with configure.ac + +2009-04-22 17:42 schevill + + * LinSys: Initial repository, after having created the branch for + Diep + +2009-04-22 17:22 schevill + + * AUTHORS: back to a clean situation + +2009-04-22 17:18 schevill + + * AUTHORS: + +2009-04-22 17:11 schevill + + * testFile: + +2009-04-22 17:08 schevill + + * testFile: + +2009-04-22 17:00 schevill + + * testFile: + +2009-04-22 16:58 schevill + + * testFile: + +2009-04-22 16:53 schevill + + * testFile: + +2009-04-22 16:19 schevill + + * testFile: removed testFile + +2009-04-22 16:16 schevill + + * testFile: added a file just for testing purpose + +2009-04-22 16:15 schevill + + * AUTHORS: True list of authors + +2009-04-22 15:47 schevill + + * AUTHORS: + +2009-04-22 15:47 schevill + + * AUTHORS: + +2009-04-22 15:46 schevill + + * AUTHORS: + +2009-04-22 14:48 schevill + + * AUTHORS: + +2009-04-22 14:48 schevill + + * AUTHORS: + +2009-04-22 14:46 schevill + + * AUTHORS: + +2009-04-22 14:46 schevill + + * AUTHORS: + +2009-04-22 14:41 schevill + + * AUTHORS: + +2009-04-22 14:36 schevill + + * AUTHORS: Back to something clean + +2009-04-22 14:17 schevill + + * AUTHORS: + +2009-04-22 13:58 schevill + + * AUTHORS: Another try + +2009-04-22 13:57 schevill + + * AUTHORS: Back to a clean version + +2009-04-22 13:48 schevill + + * AUTHORS: + +2009-04-22 13:43 schevill + + * AUTHORS: + +2009-04-22 13:41 schevill + + * AUTHORS: Another try + +2009-04-22 13:24 schevill + + * AUTHORS: Added Christoph as an author + +2009-04-22 13:08 schevill + + * AUTHORS: Added myself as an author for testing purpose + +2008-07-15 11:13 hnguyen + + * LinSys/src/mpfr_mat.c: change the cancellation test of all the + mpfr matrix operations. Return if encounter nan flag or overflow + flag. The result returned is the flags + +2008-07-07 08:52 hnguyen + + * LinSys/src/matrix_generator.c: read matrix from file + +2008-07-07 08:39 hnguyen + + * LinSys/src/mpfr_mat.c: test initialisation status + +2008-07-07 08:37 hnguyen + + * LinSys/src/mpfr_mat.c, LinSys/src/mpfr_mat.h: test initialisation + status + +2008-06-06 11:04 schevill + + * LinSys/tests/test_mpfi_mat.c, LinSys/tests/test_mpfr_mat.c: + corrected the address of the FSF + +2008-06-06 10:52 schevill + + * COPYING, NEWS, depcomp, missing, src/mpfi-impl.h, src/mpfi.c, + src/mpfi.h, src/mpfi_io.c, src/mpfi_io.h, src/mpfi_trigo.c, + tests/test_mpfi.c, tests/test_trigo.c: corrected the address of + the FSF + +2008-05-30 11:19 hnguyen + + * configure.ac: add LinSys to the compile source + +2008-05-26 14:07 hnguyen + + * LinSys/tests, LinSys/tests/Makefile.am, + LinSys/tests/test_mpfi_mat.c, LinSys/tests/test_mpfr_mat.c: + initial commit for the LinSys module's test + +2008-05-26 14:05 hnguyen + + * LinSys, LinSys/src, LinSys/src/Makefile.am, + LinSys/src/matrix_generator.c, LinSys/src/matrix_generator.h, + LinSys/src/mpfi_mat.c, LinSys/src/mpfi_mat.h, + LinSys/src/mpfi_mat_io.c, LinSys/src/mpfi_mat_lss.c, + LinSys/src/mpfi_mat_norm.c, LinSys/src/mpfr_mat.c, + LinSys/src/mpfr_mat.h: initial commit for the LinSys module + +2007-11-27 11:42 schevill + + * src/mpfi.c: Put back the previous version of functions modified + by C. Q. Lauter + (modifications were useless). + +2007-11-27 09:30 schevill + + * tests/test_mpfi, tests/test_trigo: Removed binary files that + should not be in the CVS repository. + +2007-11-26 17:04 clauter + + * src/mpfi.c, tests/test_mpfi, tests/test_trigo: Corrected + precision issues in si and d. Todo: z and q. + +2007-11-23 16:49 clauter + + * src/mpfi.c, tests/test_mpfi, tests/test_trigo: Corrected three + bugs in ui - functions. + +2007-11-23 15:57 clauter + + * src/mpfi.c, tests/test_mpfi, tests/test_trigo: Added a / in + beginning of mpfi.c for making compilation possible + +2007-11-23 15:17 schevill + + * src/mpfi.c: In mpfi_diam_rel, replaced an assignment in variable + diam by an + assignment in a temporary variable to avoid possible conflict + between + input and output variables. + +2007-11-23 13:12 schevill + + * src/mpfi_io.c, tests/test_mpfi, tests/test_trigo: Added + suggestion of Carl Witty for mpfi_set_str (strlen is now computed + only once ; a test asserts that the input string is not too long + for the + buffer). + +2007-11-22 16:31 schevill + + * README: Added an instruction about LD_LIBRARY_PATH in README. + I personnally did not know that I had to add /usr/local/lib to my + LD_LIBRARY_PATH in order for mpfi to run. + + Note that this concerns shared library only. Since we now compile + both + shared and static library, the error may happen for former users + when + upgrading their installation. That is why I think it is important + to + inform users in README. + +2007-11-22 15:33 schevill + + * Makefile.in, aclocal.m4, config.guess, config.sub, configure, + doc/Makefile.in, src/Makefile.in, tests/Makefile.in: Removing + files that should not be in a CVS repository: this files are + automatically generated and their content depends on the + configuration + of each user. + +2007-11-22 15:08 schevill + + * src/mpfi_io.c, tests/test_mpfi, tests/test_trigo: Fixed bug 1847 + submitted by Julien Clement concerning mpfi_set_str when + a single number was passed as argument. I am not totally + convinced that + this function is correct when a number is stored in an interval + with + more precision at its left endpoint than at its right endpoint. + Should + be checked. + +2007-11-21 18:26 schevill + + * src/mpfi.c, tests/test_mpfi, tests/test_trigo: Fixed bug 2004: + mpfi_diam_rel used to compute an absolute diameter. + There remain mysteries about this function. + +2007-11-21 17:48 schevill + + * src/mpfi.c, tests/test_mpfi, tests/test_trigo: mpfi.c: fixed a + bug in mpfi_ui_sub in the case a-0. + +2007-11-21 09:38 schevill + + * src/mpfi.c: Fixed bug number 4219 about incorrect bounds in + mpfi_ui_sub. + +2007-11-16 10:21 schevill + + * src/mpfi-impl.h, src/mpfi.c, src/mpfi.h, src/mpfi_trigo.c, + tests/test_mpfi, tests/test_trigo: Corrected a bug reported by + Carl Witty: MPFR_SIGN and mpfr_sgn do not have the same behavior + on 0. The right function to use was mpfr_sgn + Replaced mpfi_mpz_exact_set_fr by mpfr_get_z that have exactly + the same semantic. + +2007-10-29 13:18 schevill + + * Makefile.in, aclocal.m4, autogen.sh, config.guess, config.sub, + configure, configure.ac, doc/Makefile.in, mpfi_config.h.in, + src/Makefile.am, src/Makefile.in, src/mpfi_trigo.c, + tests/Makefile.am, tests/Makefile.in, tests/test_mpfi, + tests/test_trigo: Added autogen.sh: just run ./autogen.sh to + generate a new configure file after having + modified a Makefile.am or configure.ac + + The configure file in CVS is now up to date + + Patched a bug in mpfi_trigo.c affecting mpfi_sin when called on a + symetrical + interval + + Patched an old bug in mpfi_trigo.c in function + mpfi_mpz_exact_set_fr + This bug had already been patched once since the RC available as + a tgz on mpfi's + web page is correct. + It is quite surprising to find this bug in the CVS... + + Corrected the version number in configure.ac + + Patched configure.ac and some Makefile.am in order to use libtool + to + generate a dynamic library. + + Warning: the libraries are now compiled in src/.libs/ + +2006-06-07 21:21 rouillie + + * src/mpfi.h, src/mpfi_io.h: *** empty log message *** + +2006-01-03 09:09 rouillie + + * configure, configure.ac, doc/mpfi.info, doc/mpfi.texi, + src/mpfi-impl.h, src/mpfi.c, src/mpfi.h: *configure.ac : modify + the help for --with-mpfr-dir option + *mpfi-impl.h/mpfi.h : put the flags return by mpfi function into + mpfi.h + *modify the documentation of mpfi_cmp + *add the function char * mpfi_get_version() + +2005-11-22 16:23 rouillie + + * configure, configure.ac, doc/mpfi.info, src/mpfi.c, + src/mpfi_io.c, src/mpfi_trigo.c: Some *_ui* functions have been + upgraded + +2005-11-20 06:55 rouillie + + * AUTHORS, Makefile.in, aclocal.m4, configure, configure.ac, + doc/Makefile.in, src/Makefile.in, src/mpfi-impl.h, src/mpfi.c, + src/mpfi_io.c, src/mpfi_io.h, tests/Makefile.in, + tests/test_mpfi.c, tests/test_trigo.c: Modifications suggested by + the SPACES project. + MPFI is now compatible with mpfr-2.2.0 + +2005-11-08 17:24 rouillie + + * ., AUTHORS, COPYING, ChangeLog, INSTALL, Makefile.am, + Makefile.in, NEWS, README, aclocal.m4, config.guess, config.sub, + configure, configure.ac, depcomp, doc, doc/Makefile.am, + doc/Makefile.in, doc/mpfi.info, doc/mpfi.texi, install-sh, + missing, mkinstalldirs, mpfi_config.h.in, src, src/Makefile.am, + src/Makefile.in, src/mpfi-impl.h, src/mpfi.c, src/mpfi.h, + src/mpfi_io.c, src/mpfi_io.h, src/mpfi_trigo.c, tests, + tests/Makefile.am, tests/Makefile.in, tests/test_mpfi, + tests/test_mpfi.c, tests/test_trigo, tests/test_trigo.c: Initial + Release + diff --git a/Build/source/libs/mpfi/mpfi-src/Makefile.am b/Build/source/libs/mpfi/mpfi-src/Makefile.am new file mode 100644 index 00000000000..5c20375ea91 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/Makefile.am @@ -0,0 +1,43 @@ +# Copyright 2000-2020 Free Software Foundation, Inc. +# This Makefile.am is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + + +# Since we do not require GNU "make", let's select the POSIX behavior to +# uniformize the behavior a bit more with various "make" implementations +# and ease maintenance. This target should be removed only if one day, +# we need to require GNU "make". +.POSIX: + +AUTOMAKE_OPTIONS = gnu + +# ACLOCAL_AMFLAGS will be fully deprecated in Automake 2.0; +# AC_CONFIG_MACRO_DIRS (introduced in Automake 1.13) is now used instead, +# but we still set ACLOCAL_AMFLAGS to avoid a warning message from +# libtoolize and in case some developer needs to switch back to an +# old Automake version. +#ACLOCAL_AMFLAGS = -I m4 +ACLOCAL_AMFLAGS = + +include_HEADERS = src/mpfi.h src/mpfi_io.h +EXTRA_DIST = mpfi_config.h.in + +SUBDIRS = doc src tests + +pkgconfigdir = $(libdir)/pkgconfig +pkgconfig_DATA = mpfi.pc + +nobase_dist_doc_DATA = AUTHORS COPYING COPYING.LESSER NEWS TODO + +# Various checks for "make dist" / "make distcheck". +# Warning! With "make distcheck", neither the top-level directory nor +# the tools directory is writable. +# no checks for the time being... + +.PHONY: diff --git a/Build/source/libs/mpfi/mpfi-src/NEWS b/Build/source/libs/mpfi/mpfi-src/NEWS new file mode 100644 index 00000000000..c615dd37005 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/NEWS @@ -0,0 +1,91 @@ +Copyright 1999, 2000, 2001, 2002 - 2009, 2010, 2018 + OURAGAN project, Inria Paris, France + and ARIC project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA + +Changes between MPFI version 1.5.3 and 1.5.4 +* MPFI now requires MPFR 3.0 or higher +* mp_exp_t replaced by mpfr_exp_t, mp_prec_t replaced by mpfr_prec_t, mp_rnd_t replaced by mpfr_rnd_t + GMP_RNDx replaced by MPFR_RNDx +* incorporation of "new" functionalities offered by MPFR since MPFR version 2.4.2: + +Changes between MPFI version 1.5.2 and 1.5.3 +* compatible with MPFR version 4.0.0 +* minor warnings removed + +Changes between MPFI version 1.5 and 1.5.2 +* allow compilation as a DLL with Cygwin and Mingw on windows platforms + (reported by Jean-Pierre Flori) +* fix documentation of comparison functions (reported by Keith BRIGGS) +* fix bug in mpfi_sub_fr (reported by Takayuki YAMAGUCHI) +* now require at least GMP version 4.1.0 and MPFR version 2.4.2 +* new symbols MPFI_VERSION_MAJOR, MPFI_VERSION_MINOR, MPFI_VERSION_PATCHLEVEL, + and MPFI_VERSION_STRING in mpfi.h +* detect availability of mpfr_z_sub, mpfr_z_div, and mpfr_q_sub and use a + custom implementation for the ones not provided by MPFR (mpfr_z_sub appeared + in MPFR 3.1.0, the other ones are used in tests only) +* code cleanup (unused variables) +* tadd_q does no more check overflow by default (required too much memory) +* sign of zeros choice documented + +Changes between MPFI version 1.4 and 1.5 + +* new functions : Catalan's constant, cubic root, secant, cosecant, cotangent + and hyperbolic counterparts, atan2, hypot, get_version, urandom +* new test suite (99.7% LOC) +* can now be compiled outside the source directory +* change configure options to be consistent with the ones in MPFR and MPC: + --with-gmp-dir=DIR changed to --with-gmp=DIR + --with-gmp-libpath=DIR changed to --with-gmp-lib=DIR + --with-gmp-incpath=DIR changed to --with-gmp-include=DIR + --with-mpfr-dir=DIR changed to --with-mpfr=DIR + --with-mpfr-libpath=DIR changed to --with-mpfr-lib=DIR + --with-mpfr-incpath=DIR changed to --with-mpfr-include=DIR +* now require at least GMP version 4.1.0 and MPFR version 2.4.0 +* each function is in its own file (compile_time *= 8;) +* limitation to 1000 characters in mpfi_set_str removed. +* fix documentation for functions mpfi_blow, mpfi_is_inside at least. +* fix bug in mpfi_ui_sub when reusing a variable (bug reported by + Sisyphus 2010-01-19). +* fix bug in mpfi_blow: the result could be underestimated when the factor was + small compared to 1. +* fix double rounding error in basic arithmetic functions with a non-interval + parameter (like mpfi_add_si). +* the following functions now return 0 (false) if one or more of their + operands is NaN or has a NaN as an endpoint : mpfi_is_inside, + mpfi_is_inside_d, mpfi_is_inside_ui, mpfi_is_inside_si, mpfi_is_inside_z, + mpfi_is_inside_q, mpfi_is_inside_fr, mpfi_is_pos, mpfi_is_strictly_pos, + mpfi_is_nonneg, mpfi_is_neg, mpfi_is_strictly_neg, mpfi_is_nonpos, + mpfi_inf_p, mpfi_bounded_p + +Changes between MPFI 1.3.4-RC3 and 1.4 + +* bugfixes for trigonometric functions +* add compilation for a shared library + +Changes between MPFI version 1.1 and 1.3.4-RC3 + +* mainly, keep on par with new developments in MPFR during these years + +Changes between MPFI version 1.0 and 1.1 + +* GNU autoconf/automake standards +* mpfi-impl.h (non exported internal macros) diff --git a/Build/source/libs/mpfi/mpfi-src/README b/Build/source/libs/mpfi/mpfi-src/README new file mode 100644 index 00000000000..658ecef25b4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/README @@ -0,0 +1,41 @@ +To install MPFI library : + +For the impatient user, type in the source directory: + +./configure +make +make install + +This will install shared and static versions of libmpfi in the default install +directory. Read INSTALL in the source directory for details. + + +CONFIGURE EXTRA OPTIONS +(read INSTALL for general options) +You can specify the GMP and MPFR installation directories with the following +configure options: +--with-gmp= +--with-mpfr= + + +TEST FAILURE +With GMP 5.0.x, you may experience a failure in tcbrt like the following: + +rootrem.c:339: GNU MP assertion failed: bn>= qn +/bin/sh: line 5: 27307 Aborted ${dir}$tst +FAIL: tcbrt + +This is probably due to the fact that gcc version 4.3.2 miscompiles GMP +5.0.x. There is nothing to do but to recompile GMP with another version of gcc. + + +IMPORTANT: +Note that default installation path is /usr/local/lib. +If you configured MPFI with --prefix=some/path or if you are using a distribution +like Debian, the library may not be found at running time. + +If you compile a soft using mpfi and have an error at execution time such as: + +error while loading shared libraries: libmpfi.so.0: cannot open shared object file: No such file or directory + +try adding /some/path (or /usr/local/lib in the case of Debian) to LD_LIBRARY_PATH diff --git a/Build/source/libs/mpfi/mpfi-src/TODO b/Build/source/libs/mpfi/mpfi-src/TODO new file mode 100644 index 00000000000..b7ca5f0e4fe --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/TODO @@ -0,0 +1,58 @@ +* set_sj and set_uj + 2018-31-07 +I tried... and failed, to add mpfi_set_sj and mpfi_set_uj: +setting an interval from a huge interval. Pb with compilation: apparently I did not get how to test whether +the corresponding types (intmax_t and uintmax_t) are known, or not, by the compiler. +Everything is ready: the code for these functions, some tests (actually, the same as for set_si and set_ui, +thus more cases, and especially cornercases, should be added) and the lines in the Makefile.am. Makefile.in +are already written. But it does not compile... so far. + +* Fix predicates +From: "Sisyphus" +To: "philippe theveny" , + +Subject: mpfi-1.4: Some surprises wrt nans +Date: Mon, 1 Feb 2010 21:26:01 +1100 + +Hi, + +Here's the demo prog: + +############################### +#include +#include +#include + +int main(void) { +mpfi_t x; + +mpfi_init(x); +mpfi_out_str(stdout, 10, 0, x); + +printf("\n%d %d %d %d %d %d\n", + mpfi_is_pos(x), + mpfi_is_strictly_pos(x), + mpfi_is_nonneg(x), + mpfi_is_neg(x), + mpfi_is_strictly_neg(x), + mpfi_is_nonpos(x)); + +return 0; +} + +############################### + +It shows that mpfi_is_pos(), mpfi_is_strictly_pos(), mpfi_is_nonneg(), +mpfi_is_neg(), mpfi_is_strictly_neg() and mpfi_is_nonpos() all return true +for nans. + +I expected that they all would return false .... though there might be some +room for debate on that as regards nonpos and nonneg. + +(Btw, there's no need for any patches - I can wait for the next release. +Main purpose of this post is just to make sure you're aware of this +behaviour.) + +Cheers, +Rob +------ diff --git a/Build/source/libs/mpfi/mpfi-src/configure.ac b/Build/source/libs/mpfi/mpfi-src/configure.ac new file mode 100644 index 00000000000..658b691fc83 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/configure.ac @@ -0,0 +1,135 @@ +dnl -*- Autoconf -*- +dnl Process this file with autoconf to produce a configure script. + +AC_PREREQ(2.65) +AC_INIT([mpfi],[1.5.4],[mpfi-users@inria.fr],[mpfi],[https://gitlab.inria.fr/mpfi/mpfi/]) +AC_CONFIG_SRCDIR([src/mpfi.h]) +AC_CONFIG_HEADERS([mpfi_config.h]) + +dnl AC_CONFIG_MACRO_DIR([m4]) +AC_USE_SYSTEM_EXTENSIONS +dnl AM_SILENT_RULES([no]) +dnl AM_MAINTAINER_MODE([]) +AM_INIT_AUTOMAKE([1.13 no-define dist-bzip2 dist-xz dist-zip]) +AM_MAINTAINER_MODE(enable) + +dnl Extra arguments to configure +AC_ARG_WITH([mpfr_include], + [AS_HELP_STRING([--with-mpfr-include=DIR],[MPFR include directory])], + [CPPFLAGS="-I$withval $CPPFLAGS"]) +AC_ARG_WITH([mpfr_lib], + [AS_HELP_STRING([--with-mpfr-lib=DIR],[MPFR lib directory])], + [LDFLAGS="-L$withval $LDFLAGS"]) +AC_ARG_WITH([mpfr], + [AS_HELP_STRING([--with-mpfr=DIR],[MPFR install directory])], + [ + if test -z "$with_mpfr_include" -a -z "$with_mpfr_lib" ; then + CPPFLAGS="-I$withval/include $CPPFLAGS" + LDFLAGS="-L$withval/lib $LDFLAGS" + else + AC_MSG_FAILURE([Do not use --with-mpfr and --with-mpfr-include/--with-mpfr-lib options simultaneously.]) + fi + ]) +AC_ARG_WITH([gmp_include], + [AS_HELP_STRING([--with-gmp-include=DIR],[GMP include directory])], + [CPPFLAGS="-I$withval $CPPFLAGS"]) +AC_ARG_WITH([gmp_lib], + [AS_HELP_STRING([--with-gmp-lib=DIR],[GMP lib directory])], + [LDFLAGS="-L$withval $LDFLAGS"]) +AC_ARG_WITH([gmp], + [AS_HELP_STRING([--with-gmp=DIR],[GMP install directory])], + [ + if test -z "$with_gmp_lib" -a -z "$with_gmp_include" ; then + CPPFLAGS="-I$withval/include $CPPFLAGS" + LDFLAGS="-L$withval/lib $LDFLAGS" + else + AC_MSG_FAILURE([Do not use --with-gmp and --with-gmp-include/--with-gmp-lib options simultaneously.]) + fi + ]) + +dnl Checks for programs. +AC_PROG_CC +AC_PROG_CPP +AC_PROG_INSTALL +AC_PROG_LN_S +AC_PROG_MAKE_SET +dnl try to put this here +dnl AC_LANG(C) +AM_PROG_AR + +LT_INIT + +dnl Checks for libraries. +dnl Check GMP Header +AC_MSG_CHECKING(for gmp.h) +AC_COMPILE_IFELSE([AC_LANG_SOURCE([[ +#include "gmp.h" +]])],[AC_MSG_RESULT(yes)],[ + AC_MSG_RESULT(no) + AC_MSG_ERROR([gmp.h can't be found, or is unusable.]) +]) + +AC_CHECK_LIB([gmp], [__gmpz_init], + [LIBS="-lgmp $LIBS"], + [AC_MSG_ERROR([libgmp not found.])]) + +AC_MSG_CHECKING(for valid GMP) +AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[ +#include "gmp.h" +#if (__GNU_MP_VERSION*100+__GNU_MP_VERSION_MINOR*10 < 410) +# error "min: GMP 4.1.0" +#endif +]], [[]])],[AC_MSG_RESULT(yes)],[ + AC_MSG_RESULT(no) + AC_MSG_ERROR([GMP 4.1.0 min required]) +]) + +dnl Check MPFR Header +AC_MSG_CHECKING(for mpfr.h) +AC_COMPILE_IFELSE([AC_LANG_SOURCE([[ +#include "mpfr.h" +]])],[AC_MSG_RESULT(yes)],[ + AC_MSG_RESULT(no) + AC_MSG_ERROR([mpfr.h can't be found, or is unusable.]) +]) + +AC_CHECK_LIB([mpfr], [mpfr_init], + [LIBS="-lmpfr $LIBS"], + [AC_MSG_ERROR([libmpfr not found.])]) + +AC_MSG_CHECKING(for valid MPFR) +AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[ +#include "mpfr.h" +#if (MPFR_VERSION < MPFR_VERSION_NUM(4,0,1)) +# error "min: MPFR 4.0.1" +#endif +]], [[]])],[AC_MSG_RESULT(yes)],[ + AC_MSG_RESULT(no) + AC_MSG_ERROR([MPFR 4.0.1 min required]) +]) + +dnl Checks for header files. +AC_CHECK_HEADERS([float.h limits.h stdlib.h string.h sys/time.h unistd.h]) +AC_CHECK_HEADER([stdarg.h],[AC_DEFINE([HAVE_STDARG],1,[Define if stdarg])], + [AC_CHECK_HEADER([varargs.h],, + AC_MSG_ERROR([stdarg.h or varargs.h not found]))]) + +dnl Checks for typedefs, structures, and compiler characteristics. +AC_TYPE_SIZE_T + +dnl Checks for library functions. +AC_CHECK_FUNCS([dup2 gettimeofday]) +AC_CHECK_FUNCS([mpfr_q_sub mpfr_z_sub mpfr_z_div]) + +case $AC_PACKAGE_VERSION in + *-dev) + AC_DEFINE([WARN_IF_REVERTED_ENDPOINTS], 1, + [Define to 1 if it is a development version.]);; +esac + +AC_CONFIG_FILES([Makefile + mpfi.pc + doc/Makefile + src/Makefile + tests/Makefile]) +AC_OUTPUT diff --git a/Build/source/libs/mpfi/mpfi-src/doc/Makefile.am b/Build/source/libs/mpfi/mpfi-src/doc/Makefile.am new file mode 100644 index 00000000000..7180b654802 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/doc/Makefile.am @@ -0,0 +1,2 @@ +info_TEXINFOS = mpfi.texi +TEXINFO_TEX = ../texinfo.tex diff --git a/Build/source/libs/mpfi/mpfi-src/doc/Makefile.in b/Build/source/libs/mpfi/mpfi-src/doc/Makefile.in new file mode 100644 index 00000000000..9bd6fdc3d8c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/doc/Makefile.in @@ -0,0 +1,753 @@ +# Makefile.in generated by automake 1.16.5 from Makefile.am. +# @configure_input@ + +# Copyright (C) 1994-2021 Free Software Foundation, Inc. + +# This Makefile.in is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +@SET_MAKE@ +VPATH = @srcdir@ +am__is_gnu_make = { \ + if test -z '$(MAKELEVEL)'; then \ + false; \ + elif test -n '$(MAKE_HOST)'; then \ + true; \ + elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \ + true; \ + else \ + false; \ + fi; \ +} +am__make_running_with_option = \ + case $${target_option-} in \ + ?) ;; \ + *) echo "am__make_running_with_option: internal error: invalid" \ + "target option '$${target_option-}' specified" >&2; \ + exit 1;; \ + esac; \ + has_opt=no; \ + sane_makeflags=$$MAKEFLAGS; \ + if $(am__is_gnu_make); then \ + sane_makeflags=$$MFLAGS; \ + else \ + case $$MAKEFLAGS in \ + *\\[\ \ ]*) \ + bs=\\; \ + sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \ + | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \ + esac; \ + fi; \ + skip_next=no; \ + strip_trailopt () \ + { \ + flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \ + }; \ + for flg in $$sane_makeflags; do \ + test $$skip_next = yes && { skip_next=no; continue; }; \ + case $$flg in \ + *=*|--*) continue;; \ + -*I) strip_trailopt 'I'; skip_next=yes;; \ + -*I?*) strip_trailopt 'I';; \ + -*O) strip_trailopt 'O'; skip_next=yes;; \ + -*O?*) strip_trailopt 'O';; \ + -*l) strip_trailopt 'l'; skip_next=yes;; \ + -*l?*) strip_trailopt 'l';; \ + -[dEDm]) skip_next=yes;; \ + -[JT]) skip_next=yes;; \ + esac; \ + case $$flg in \ + *$$target_option*) has_opt=yes; break;; \ + esac; \ + done; \ + test $$has_opt = yes +am__make_dryrun = (target_option=n; $(am__make_running_with_option)) +am__make_keepgoing = (target_option=k; $(am__make_running_with_option)) +pkgdatadir = $(datadir)/@PACKAGE@ +pkgincludedir = $(includedir)/@PACKAGE@ +pkglibdir = $(libdir)/@PACKAGE@ +pkglibexecdir = $(libexecdir)/@PACKAGE@ +am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd +install_sh_DATA = $(install_sh) -c -m 644 +install_sh_PROGRAM = $(install_sh) -c +install_sh_SCRIPT = $(install_sh) -c +INSTALL_HEADER = $(INSTALL_DATA) +transform = $(program_transform_name) +NORMAL_INSTALL = : +PRE_INSTALL = : +POST_INSTALL = : +NORMAL_UNINSTALL = : +PRE_UNINSTALL = : +POST_UNINSTALL = : +build_triplet = @build@ +host_triplet = @host@ +subdir = doc +ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 +am__aclocal_m4_deps = $(top_srcdir)/configure.ac +am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ + $(ACLOCAL_M4) +DIST_COMMON = $(srcdir)/Makefile.am $(am__DIST_COMMON) +mkinstalldirs = $(install_sh) -d +CONFIG_HEADER = $(top_builddir)/mpfi_config.h +CONFIG_CLEAN_FILES = +CONFIG_CLEAN_VPATH_FILES = +AM_V_P = $(am__v_P_@AM_V@) +am__v_P_ = $(am__v_P_@AM_DEFAULT_V@) +am__v_P_0 = false +am__v_P_1 = : +AM_V_GEN = $(am__v_GEN_@AM_V@) +am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@) +am__v_GEN_0 = @echo " GEN " $@; +am__v_GEN_1 = +AM_V_at = $(am__v_at_@AM_V@) +am__v_at_ = $(am__v_at_@AM_DEFAULT_V@) +am__v_at_0 = @ +am__v_at_1 = +SOURCES = +DIST_SOURCES = +AM_V_DVIPS = $(am__v_DVIPS_@AM_V@) +am__v_DVIPS_ = $(am__v_DVIPS_@AM_DEFAULT_V@) +am__v_DVIPS_0 = @echo " DVIPS " $@; +am__v_DVIPS_1 = +AM_V_MAKEINFO = $(am__v_MAKEINFO_@AM_V@) +am__v_MAKEINFO_ = $(am__v_MAKEINFO_@AM_DEFAULT_V@) +am__v_MAKEINFO_0 = @echo " MAKEINFO" $@; +am__v_MAKEINFO_1 = +AM_V_INFOHTML = $(am__v_INFOHTML_@AM_V@) +am__v_INFOHTML_ = $(am__v_INFOHTML_@AM_DEFAULT_V@) +am__v_INFOHTML_0 = @echo " INFOHTML" $@; +am__v_INFOHTML_1 = +AM_V_TEXI2DVI = $(am__v_TEXI2DVI_@AM_V@) +am__v_TEXI2DVI_ = $(am__v_TEXI2DVI_@AM_DEFAULT_V@) +am__v_TEXI2DVI_0 = @echo " TEXI2DVI" $@; +am__v_TEXI2DVI_1 = +AM_V_TEXI2PDF = $(am__v_TEXI2PDF_@AM_V@) +am__v_TEXI2PDF_ = $(am__v_TEXI2PDF_@AM_DEFAULT_V@) +am__v_TEXI2PDF_0 = @echo " TEXI2PDF" $@; +am__v_TEXI2PDF_1 = +AM_V_texinfo = $(am__v_texinfo_@AM_V@) +am__v_texinfo_ = $(am__v_texinfo_@AM_DEFAULT_V@) +am__v_texinfo_0 = -q +am__v_texinfo_1 = +AM_V_texidevnull = $(am__v_texidevnull_@AM_V@) +am__v_texidevnull_ = $(am__v_texidevnull_@AM_DEFAULT_V@) +am__v_texidevnull_0 = > /dev/null +am__v_texidevnull_1 = +INFO_DEPS = $(srcdir)/mpfi.info +am__TEXINFO_TEX_DIR = $(srcdir)/.. +DVIS = mpfi.dvi +PDFS = mpfi.pdf +PSS = mpfi.ps +HTMLS = mpfi.html +TEXINFOS = mpfi.texi +TEXI2DVI = texi2dvi +TEXI2PDF = $(TEXI2DVI) --pdf --batch +MAKEINFOHTML = $(MAKEINFO) --html +AM_MAKEINFOHTMLFLAGS = $(AM_MAKEINFOFLAGS) +DVIPS = dvips +am__can_run_installinfo = \ + case $$AM_UPDATE_INFO_DIR in \ + n|no|NO) false;; \ + *) (install-info --version) >/dev/null 2>&1;; \ + esac +am__installdirs = "$(DESTDIR)$(infodir)" +am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; +am__vpath_adj = case $$p in \ + $(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \ + *) f=$$p;; \ + esac; +am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`; +am__install_max = 40 +am__nobase_strip_setup = \ + srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'` +am__nobase_strip = \ + for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||" +am__nobase_list = $(am__nobase_strip_setup); \ + for p in $$list; do echo "$$p $$p"; done | \ + sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \ + $(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \ + if (++n[$$2] == $(am__install_max)) \ + { print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \ + END { for (dir in files) print dir, files[dir] }' +am__base_list = \ + sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \ + sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g' +am__uninstall_files_from_dir = { \ + test -z "$$files" \ + || { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \ + || { echo " ( cd '$$dir' && rm -f" $$files ")"; \ + $(am__cd) "$$dir" && rm -f $$files; }; \ + } +am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP) +am__DIST_COMMON = $(srcdir)/Makefile.in +DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) +ACLOCAL = @ACLOCAL@ +AMTAR = @AMTAR@ +AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@ +AR = @AR@ +AUTOCONF = @AUTOCONF@ +AUTOHEADER = @AUTOHEADER@ +AUTOMAKE = @AUTOMAKE@ +AWK = @AWK@ +CC = @CC@ +CCDEPMODE = @CCDEPMODE@ +CFLAGS = @CFLAGS@ +CPP = @CPP@ +CPPFLAGS = @CPPFLAGS@ +CSCOPE = @CSCOPE@ +CTAGS = @CTAGS@ +CYGPATH_W = @CYGPATH_W@ +DEFS = @DEFS@ +DEPDIR = @DEPDIR@ +DLLTOOL = @DLLTOOL@ +DSYMUTIL = @DSYMUTIL@ +DUMPBIN = @DUMPBIN@ +ECHO_C = @ECHO_C@ +ECHO_N = @ECHO_N@ +ECHO_T = @ECHO_T@ +EGREP = @EGREP@ +ETAGS = @ETAGS@ +EXEEXT = @EXEEXT@ +FGREP = @FGREP@ +GREP = @GREP@ +INSTALL = @INSTALL@ +INSTALL_DATA = @INSTALL_DATA@ +INSTALL_PROGRAM = @INSTALL_PROGRAM@ +INSTALL_SCRIPT = @INSTALL_SCRIPT@ +INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ +LD = @LD@ +LDFLAGS = @LDFLAGS@ +LIBOBJS = @LIBOBJS@ +LIBS = @LIBS@ +LIBTOOL = @LIBTOOL@ +LIPO = @LIPO@ +LN_S = @LN_S@ +LTLIBOBJS = @LTLIBOBJS@ +LT_SYS_LIBRARY_PATH = @LT_SYS_LIBRARY_PATH@ +MAINT = @MAINT@ +MAKEINFO = @MAKEINFO@ +MANIFEST_TOOL = @MANIFEST_TOOL@ +MKDIR_P = @MKDIR_P@ +NM = @NM@ +NMEDIT = @NMEDIT@ +OBJDUMP = @OBJDUMP@ +OBJEXT = @OBJEXT@ +OTOOL = @OTOOL@ +OTOOL64 = @OTOOL64@ +PACKAGE = @PACKAGE@ +PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ +PACKAGE_NAME = @PACKAGE_NAME@ +PACKAGE_STRING = @PACKAGE_STRING@ +PACKAGE_TARNAME = @PACKAGE_TARNAME@ +PACKAGE_URL = @PACKAGE_URL@ +PACKAGE_VERSION = @PACKAGE_VERSION@ +PATH_SEPARATOR = @PATH_SEPARATOR@ +RANLIB = @RANLIB@ +SED = @SED@ +SET_MAKE = @SET_MAKE@ +SHELL = @SHELL@ +STRIP = @STRIP@ +VERSION = @VERSION@ +abs_builddir = @abs_builddir@ +abs_srcdir = @abs_srcdir@ +abs_top_builddir = @abs_top_builddir@ +abs_top_srcdir = @abs_top_srcdir@ +ac_ct_AR = @ac_ct_AR@ +ac_ct_CC = @ac_ct_CC@ +ac_ct_DUMPBIN = @ac_ct_DUMPBIN@ +am__include = @am__include@ +am__leading_dot = @am__leading_dot@ +am__quote = @am__quote@ +am__tar = @am__tar@ +am__untar = @am__untar@ +bindir = @bindir@ +build = @build@ +build_alias = @build_alias@ +build_cpu = @build_cpu@ +build_os = @build_os@ +build_vendor = @build_vendor@ +builddir = @builddir@ +datadir = @datadir@ +datarootdir = @datarootdir@ +docdir = @docdir@ +dvidir = @dvidir@ +exec_prefix = @exec_prefix@ +host = @host@ +host_alias = @host_alias@ +host_cpu = @host_cpu@ +host_os = @host_os@ +host_vendor = @host_vendor@ +htmldir = @htmldir@ +includedir = @includedir@ +infodir = @infodir@ +install_sh = @install_sh@ +libdir = @libdir@ +libexecdir = @libexecdir@ +localedir = @localedir@ +localstatedir = @localstatedir@ +mandir = @mandir@ +mkdir_p = @mkdir_p@ +oldincludedir = @oldincludedir@ +pdfdir = @pdfdir@ +prefix = @prefix@ +program_transform_name = @program_transform_name@ +psdir = @psdir@ +runstatedir = @runstatedir@ +sbindir = @sbindir@ +sharedstatedir = @sharedstatedir@ +srcdir = @srcdir@ +sysconfdir = @sysconfdir@ +target_alias = @target_alias@ +top_build_prefix = @top_build_prefix@ +top_builddir = @top_builddir@ +top_srcdir = @top_srcdir@ +info_TEXINFOS = mpfi.texi +TEXINFO_TEX = ../texinfo.tex +all: all-am + +.SUFFIXES: +.SUFFIXES: .dvi .html .info .pdf .ps .texi +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(am__configure_deps) + @for dep in $?; do \ + case '$(am__configure_deps)' in \ + *$$dep*) \ + ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \ + && { if test -f $@; then exit 0; else break; fi; }; \ + exit 1;; \ + esac; \ + done; \ + echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnu doc/Makefile'; \ + $(am__cd) $(top_srcdir) && \ + $(AUTOMAKE) --gnu doc/Makefile +Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status + @case '$?' in \ + *config.status*) \ + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \ + *) \ + echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles)'; \ + cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles);; \ + esac; + +$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh + +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(am__aclocal_m4_deps): + +mostlyclean-libtool: + -rm -f *.lo + +clean-libtool: + -rm -rf .libs _libs + +.texi.info: + $(AM_V_MAKEINFO)restore=: && backupdir="$(am__leading_dot)am$$$$" && \ + am__cwd=`pwd` && $(am__cd) $(srcdir) && \ + rm -rf $$backupdir && mkdir $$backupdir && \ + if ($(MAKEINFO) --version) >/dev/null 2>&1; then \ + for f in $@ $@-[0-9] $@-[0-9][0-9] $(@:.info=).i[0-9] $(@:.info=).i[0-9][0-9]; do \ + if test -f $$f; then mv $$f $$backupdir; restore=mv; else :; fi; \ + done; \ + else :; fi && \ + cd "$$am__cwd"; \ + if $(MAKEINFO) $(AM_MAKEINFOFLAGS) $(MAKEINFOFLAGS) -I $(srcdir) \ + -o $@ $<; \ + then \ + rc=0; \ + $(am__cd) $(srcdir); \ + else \ + rc=$$?; \ + $(am__cd) $(srcdir) && \ + $$restore $$backupdir/* `echo "./$@" | sed 's|[^/]*$$||'`; \ + fi; \ + rm -rf $$backupdir; exit $$rc + +.texi.dvi: + $(AM_V_TEXI2DVI)TEXINPUTS="$(am__TEXINFO_TEX_DIR)$(PATH_SEPARATOR)$$TEXINPUTS" \ + MAKEINFO='$(MAKEINFO) $(AM_MAKEINFOFLAGS) $(MAKEINFOFLAGS) -I $(srcdir)' \ + $(TEXI2DVI) $(AM_V_texinfo) --build-dir=$(@:.dvi=.t2d) -o $@ $(AM_V_texidevnull) \ + $< + +.texi.pdf: + $(AM_V_TEXI2PDF)TEXINPUTS="$(am__TEXINFO_TEX_DIR)$(PATH_SEPARATOR)$$TEXINPUTS" \ + MAKEINFO='$(MAKEINFO) $(AM_MAKEINFOFLAGS) $(MAKEINFOFLAGS) -I $(srcdir)' \ + $(TEXI2PDF) $(AM_V_texinfo) --build-dir=$(@:.pdf=.t2p) -o $@ $(AM_V_texidevnull) \ + $< + +.texi.html: + $(AM_V_MAKEINFO)rm -rf $(@:.html=.htp) + $(AM_V_at)if $(MAKEINFOHTML) $(AM_MAKEINFOHTMLFLAGS) $(MAKEINFOFLAGS) -I $(srcdir) \ + -o $(@:.html=.htp) $<; \ + then \ + rm -rf $@ && mv $(@:.html=.htp) $@; \ + else \ + rm -rf $(@:.html=.htp); exit 1; \ + fi +$(srcdir)/mpfi.info: mpfi.texi +mpfi.dvi: mpfi.texi +mpfi.pdf: mpfi.texi +mpfi.html: mpfi.texi +.dvi.ps: + $(AM_V_DVIPS)TEXINPUTS="$(am__TEXINFO_TEX_DIR)$(PATH_SEPARATOR)$$TEXINPUTS" \ + $(DVIPS) $(AM_V_texinfo) -o $@ $< + +uninstall-dvi-am: + @$(NORMAL_UNINSTALL) + @list='$(DVIS)'; test -n "$(dvidir)" || list=; \ + for p in $$list; do \ + $(am__strip_dir) \ + echo " rm -f '$(DESTDIR)$(dvidir)/$$f'"; \ + rm -f "$(DESTDIR)$(dvidir)/$$f"; \ + done + +uninstall-html-am: + @$(NORMAL_UNINSTALL) + @list='$(HTMLS)'; test -n "$(htmldir)" || list=; \ + for p in $$list; do \ + $(am__strip_dir) \ + echo " rm -rf '$(DESTDIR)$(htmldir)/$$f'"; \ + rm -rf "$(DESTDIR)$(htmldir)/$$f"; \ + done + +uninstall-info-am: + @$(PRE_UNINSTALL) + @if test -d '$(DESTDIR)$(infodir)' && $(am__can_run_installinfo); then \ + list='$(INFO_DEPS)'; \ + for file in $$list; do \ + relfile=`echo "$$file" | sed 's|^.*/||'`; \ + echo " install-info --info-dir='$(DESTDIR)$(infodir)' --remove '$(DESTDIR)$(infodir)/$$relfile'"; \ + if install-info --info-dir="$(DESTDIR)$(infodir)" --remove "$(DESTDIR)$(infodir)/$$relfile"; \ + then :; else test ! -f "$(DESTDIR)$(infodir)/$$relfile" || exit 1; fi; \ + done; \ + else :; fi + @$(NORMAL_UNINSTALL) + @list='$(INFO_DEPS)'; \ + for file in $$list; do \ + relfile=`echo "$$file" | sed 's|^.*/||'`; \ + relfile_i=`echo "$$relfile" | sed 's|\.info$$||;s|$$|.i|'`; \ + (if test -d "$(DESTDIR)$(infodir)" && cd "$(DESTDIR)$(infodir)"; then \ + echo " cd '$(DESTDIR)$(infodir)' && rm -f $$relfile $$relfile-[0-9] $$relfile-[0-9][0-9] $$relfile_i[0-9] $$relfile_i[0-9][0-9]"; \ + rm -f $$relfile $$relfile-[0-9] $$relfile-[0-9][0-9] $$relfile_i[0-9] $$relfile_i[0-9][0-9]; \ + else :; fi); \ + done + +uninstall-pdf-am: + @$(NORMAL_UNINSTALL) + @list='$(PDFS)'; test -n "$(pdfdir)" || list=; \ + for p in $$list; do \ + $(am__strip_dir) \ + echo " rm -f '$(DESTDIR)$(pdfdir)/$$f'"; \ + rm -f "$(DESTDIR)$(pdfdir)/$$f"; \ + done + +uninstall-ps-am: + @$(NORMAL_UNINSTALL) + @list='$(PSS)'; test -n "$(psdir)" || list=; \ + for p in $$list; do \ + $(am__strip_dir) \ + echo " rm -f '$(DESTDIR)$(psdir)/$$f'"; \ + rm -f "$(DESTDIR)$(psdir)/$$f"; \ + done + +dist-info: $(INFO_DEPS) + @srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; \ + list='$(INFO_DEPS)'; \ + for base in $$list; do \ + case $$base in \ + $(srcdir)/*) base=`echo "$$base" | sed "s|^$$srcdirstrip/||"`;; \ + esac; \ + if test -f $$base; then d=.; else d=$(srcdir); fi; \ + base_i=`echo "$$base" | sed 's|\.info$$||;s|$$|.i|'`; \ + for file in $$d/$$base $$d/$$base-[0-9] $$d/$$base-[0-9][0-9] $$d/$$base_i[0-9] $$d/$$base_i[0-9][0-9]; do \ + if test -f $$file; then \ + relfile=`expr "$$file" : "$$d/\(.*\)"`; \ + test -f "$(distdir)/$$relfile" || \ + cp -p $$file "$(distdir)/$$relfile"; \ + else :; fi; \ + done; \ + done + +mostlyclean-aminfo: + -rm -rf mpfi.t2d mpfi.t2p + +clean-aminfo: + -test -z "mpfi.dvi mpfi.pdf mpfi.ps mpfi.html" \ + || rm -rf mpfi.dvi mpfi.pdf mpfi.ps mpfi.html + +maintainer-clean-aminfo: + @list='$(INFO_DEPS)'; for i in $$list; do \ + i_i=`echo "$$i" | sed 's|\.info$$||;s|$$|.i|'`; \ + echo " rm -f $$i $$i-[0-9] $$i-[0-9][0-9] $$i_i[0-9] $$i_i[0-9][0-9]"; \ + rm -f $$i $$i-[0-9] $$i-[0-9][0-9] $$i_i[0-9] $$i_i[0-9][0-9]; \ + done +tags TAGS: + +ctags CTAGS: + +cscope cscopelist: + +distdir: $(BUILT_SOURCES) + $(MAKE) $(AM_MAKEFLAGS) distdir-am + +distdir-am: $(DISTFILES) + @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + list='$(DISTFILES)'; \ + dist_files=`for file in $$list; do echo $$file; done | \ + sed -e "s|^$$srcdirstrip/||;t" \ + -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ + case $$dist_files in \ + */*) $(MKDIR_P) `echo "$$dist_files" | \ + sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ + sort -u` ;; \ + esac; \ + for file in $$dist_files; do \ + if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ + if test -d $$d/$$file; then \ + dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ + if test -d "$(distdir)/$$file"; then \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ + cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ + else \ + test -f "$(distdir)/$$file" \ + || cp -p $$d/$$file "$(distdir)/$$file" \ + || exit 1; \ + fi; \ + done + $(MAKE) $(AM_MAKEFLAGS) \ + top_distdir="$(top_distdir)" distdir="$(distdir)" \ + dist-info +check-am: all-am +check: check-am +all-am: Makefile $(INFO_DEPS) +installdirs: + for dir in "$(DESTDIR)$(infodir)"; do \ + test -z "$$dir" || $(MKDIR_P) "$$dir"; \ + done +install: install-am +install-exec: install-exec-am +install-data: install-data-am +uninstall: uninstall-am + +install-am: all-am + @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am + +installcheck: installcheck-am +install-strip: + if test -z '$(STRIP)'; then \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + install; \ + else \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \ + fi +mostlyclean-generic: + +clean-generic: + +distclean-generic: + -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) + -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + +maintainer-clean-generic: + @echo "This command is intended for maintainers to use" + @echo "it deletes files that may require special tools to rebuild." +clean: clean-am + +clean-am: clean-aminfo clean-generic clean-libtool mostlyclean-am + +distclean: distclean-am + -rm -f Makefile +distclean-am: clean-am distclean-generic + +dvi: dvi-am + +dvi-am: $(DVIS) + +html: html-am + +html-am: $(HTMLS) + +info: info-am + +info-am: $(INFO_DEPS) + +install-data-am: install-info-am + +install-dvi: install-dvi-am + +install-dvi-am: $(DVIS) + @$(NORMAL_INSTALL) + @list='$(DVIS)'; test -n "$(dvidir)" || list=; \ + if test -n "$$list"; then \ + echo " $(MKDIR_P) '$(DESTDIR)$(dvidir)'"; \ + $(MKDIR_P) "$(DESTDIR)$(dvidir)" || exit 1; \ + fi; \ + for p in $$list; do \ + if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ + echo "$$d$$p"; \ + done | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(dvidir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(dvidir)" || exit $$?; \ + done +install-exec-am: + +install-html: install-html-am + +install-html-am: $(HTMLS) + @$(NORMAL_INSTALL) + @list='$(HTMLS)'; list2=; test -n "$(htmldir)" || list=; \ + if test -n "$$list"; then \ + echo " $(MKDIR_P) '$(DESTDIR)$(htmldir)'"; \ + $(MKDIR_P) "$(DESTDIR)$(htmldir)" || exit 1; \ + fi; \ + for p in $$list; do \ + if test -f "$$p" || test -d "$$p"; then d=; else d="$(srcdir)/"; fi; \ + $(am__strip_dir) \ + d2=$$d$$p; \ + if test -d "$$d2"; then \ + echo " $(MKDIR_P) '$(DESTDIR)$(htmldir)/$$f'"; \ + $(MKDIR_P) "$(DESTDIR)$(htmldir)/$$f" || exit 1; \ + echo " $(INSTALL_DATA) '$$d2'/* '$(DESTDIR)$(htmldir)/$$f'"; \ + $(INSTALL_DATA) "$$d2"/* "$(DESTDIR)$(htmldir)/$$f" || exit $$?; \ + else \ + list2="$$list2 $$d2"; \ + fi; \ + done; \ + test -z "$$list2" || { echo "$$list2" | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(htmldir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(htmldir)" || exit $$?; \ + done; } +install-info: install-info-am + +install-info-am: $(INFO_DEPS) + @$(NORMAL_INSTALL) + @srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; \ + list='$(INFO_DEPS)'; test -n "$(infodir)" || list=; \ + if test -n "$$list"; then \ + echo " $(MKDIR_P) '$(DESTDIR)$(infodir)'"; \ + $(MKDIR_P) "$(DESTDIR)$(infodir)" || exit 1; \ + fi; \ + for file in $$list; do \ + case $$file in \ + $(srcdir)/*) file=`echo "$$file" | sed "s|^$$srcdirstrip/||"`;; \ + esac; \ + if test -f $$file; then d=.; else d=$(srcdir); fi; \ + file_i=`echo "$$file" | sed 's|\.info$$||;s|$$|.i|'`; \ + for ifile in $$d/$$file $$d/$$file-[0-9] $$d/$$file-[0-9][0-9] \ + $$d/$$file_i[0-9] $$d/$$file_i[0-9][0-9] ; do \ + if test -f $$ifile; then \ + echo "$$ifile"; \ + else : ; fi; \ + done; \ + done | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(infodir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(infodir)" || exit $$?; done + @$(POST_INSTALL) + @if $(am__can_run_installinfo); then \ + list='$(INFO_DEPS)'; test -n "$(infodir)" || list=; \ + for file in $$list; do \ + relfile=`echo "$$file" | sed 's|^.*/||'`; \ + echo " install-info --info-dir='$(DESTDIR)$(infodir)' '$(DESTDIR)$(infodir)/$$relfile'";\ + install-info --info-dir="$(DESTDIR)$(infodir)" "$(DESTDIR)$(infodir)/$$relfile" || :;\ + done; \ + else : ; fi +install-man: + +install-pdf: install-pdf-am + +install-pdf-am: $(PDFS) + @$(NORMAL_INSTALL) + @list='$(PDFS)'; test -n "$(pdfdir)" || list=; \ + if test -n "$$list"; then \ + echo " $(MKDIR_P) '$(DESTDIR)$(pdfdir)'"; \ + $(MKDIR_P) "$(DESTDIR)$(pdfdir)" || exit 1; \ + fi; \ + for p in $$list; do \ + if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ + echo "$$d$$p"; \ + done | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(pdfdir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(pdfdir)" || exit $$?; done +install-ps: install-ps-am + +install-ps-am: $(PSS) + @$(NORMAL_INSTALL) + @list='$(PSS)'; test -n "$(psdir)" || list=; \ + if test -n "$$list"; then \ + echo " $(MKDIR_P) '$(DESTDIR)$(psdir)'"; \ + $(MKDIR_P) "$(DESTDIR)$(psdir)" || exit 1; \ + fi; \ + for p in $$list; do \ + if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ + echo "$$d$$p"; \ + done | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(psdir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(psdir)" || exit $$?; done +installcheck-am: + +maintainer-clean: maintainer-clean-am + -rm -f Makefile +maintainer-clean-am: distclean-am maintainer-clean-aminfo \ + maintainer-clean-generic + +mostlyclean: mostlyclean-am + +mostlyclean-am: mostlyclean-aminfo mostlyclean-generic \ + mostlyclean-libtool + +pdf: pdf-am + +pdf-am: $(PDFS) + +ps: ps-am + +ps-am: $(PSS) + +uninstall-am: uninstall-dvi-am uninstall-html-am uninstall-info-am \ + uninstall-pdf-am uninstall-ps-am + +.MAKE: install-am install-strip + +.PHONY: all all-am check check-am clean clean-aminfo clean-generic \ + clean-libtool cscopelist-am ctags-am dist-info distclean \ + distclean-generic distclean-libtool distdir dvi dvi-am html \ + html-am info info-am install install-am install-data \ + install-data-am install-dvi install-dvi-am install-exec \ + install-exec-am install-html install-html-am install-info \ + install-info-am install-man install-pdf install-pdf-am \ + install-ps install-ps-am install-strip installcheck \ + installcheck-am installdirs maintainer-clean \ + maintainer-clean-aminfo maintainer-clean-generic mostlyclean \ + mostlyclean-aminfo mostlyclean-generic mostlyclean-libtool pdf \ + pdf-am ps ps-am tags-am uninstall uninstall-am \ + uninstall-dvi-am uninstall-html-am uninstall-info-am \ + uninstall-pdf-am uninstall-ps-am + +.PRECIOUS: Makefile + + +# Tell versions [3.59,3.63) of GNU make to not export all variables. +# Otherwise a system limit (for SysV at least) may be exceeded. +.NOEXPORT: diff --git a/Build/source/libs/mpfi/mpfi-src/doc/mpfi.info b/Build/source/libs/mpfi/mpfi-src/doc/mpfi.info new file mode 100644 index 00000000000..3bd8b5aec05 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/doc/mpfi.info @@ -0,0 +1,1727 @@ +This is mpfi.info, produced by makeinfo version 6.8 from mpfi.texi. + +INFO-DIR-SECTION Software libraries +START-INFO-DIR-ENTRY +* mpfi: (mpfi.info). Multiple Precision Floating-Point Interval Library. +END-INFO-DIR-ENTRY + +This file documents MPFI, a library for interval arithmetic, which is +built upon the MPFR multiple precision floating-point arithmetic library + + Copyright (C) 2002-2022, Ouragan team, Inria Paris, France, Arenaire +team and AriC team, INRIA Rhône-Alpes and INRIA Lyon and LIP, ENS Lyon, +France, and Lab. ANO, University of Sciences and Technologies of Lille, +France. + + Permission is granted to make and distribute verbatim copies of this +manual provided the copyright notice and this permission notice are +preserved on all copies. + + Permission is granted to copy and distribute modified versions of +this manual under the conditions for verbatim copying, provided that the +entire resulting derived work is distributed under the terms of a +permission notice identical to this one. + + Permission is granted to copy and distribute translations of this +manual into another language, under the above conditions for modified +versions, except that this permission notice may be stated in a +translation approved by the Free Software Foundation. + + +File: mpfi.info, Node: Top, Next: Copying, Prev: (dir), Up: (dir) + +MPFI 1.5.4. +*********** + +This manual documents how to install and use the Multiple Precision +Floating-Point Interval Library + +* Menu: + +* Copying:: +* Introduction to MPFI:: +* Installing MPFI:: +* Reporting Bugs:: +* MPFI Basics:: +* Interval Functions:: +* Contributors:: +* References:: +* Concept Index:: +* Function Index:: + +Interval Functions + + +Initialization and Assignment Functions + +* Initializing Intervals:: +* Assigning Intervals:: +* Simultaneous Interval Init & Assign:: + + -- The Detailed Node Listing -- + +Interval Functions + +* Return Values:: +* Precision Handling:: +* Initializing and Assigning Intervals:: +* Floating-point Quantities:: +* Converting Intervals:: +* Interval Arithmetic:: +* Special Functions:: +* Interval Comparison:: +* I/O of Intervals:: +* Operating on the Endpoints:: +* Set Operations:: +* Miscellaneous Interval Functions:: +* Error Handling:: + +Initialization and Assignment Functions + +* Initializing Intervals:: +* Assigning Intervals:: +* Simultaneous Interval Init & Assign:: + + + +File: mpfi.info, Node: Copying, Next: Introduction to MPFI, Prev: Top, Up: Top + +MPFI Copying Conditions +*********************** + +This library is "free"; this means that everyone is free to use it and +free to redistribute it on a free basis. The library is not in the +public domain; it is copyrighted and there are restrictions on its +distribution, but these restrictions are designed to permit everything +that a good cooperating citizen would want to do. What is not allowed +is to try to prevent others from further sharing any version of this +library that they might get from you. + + Specifically, we want to make sure that you have the right to give +away copies of the library, that you receive source code or else can get +it if you want it, that you can change this library or use pieces of it +in new free programs, and that you know you can do these things. + + To make sure that everyone has such rights, we have to forbid you to +deprive anyone else of these rights. For example, if you distribute +copies of the MPFI library, you must give the recipients all the rights +that you have. You must make sure that they, too, receive or can get +the source code. And you must tell them their rights. + + Also, for our own protection, we must make certain that everyone +finds out that there is no warranty for the MPFI library. If it is +modified by someone else and passed on, we want their recipients to know +that what they have is not what we distributed, so that any problems +introduced by others will not reflect on our reputation. + + The precise conditions of the license for the MPFI library are found +in the Lesser General Public License that accompany the source code. As +MPFI is built upon MPFR and share its license, see the file +COPYING.LESSER in the main MPFR directory. + + +File: mpfi.info, Node: Introduction to MPFI, Next: Installing MPFI, Prev: Copying, Up: Top + +1 Introduction to MPFI +********************** + +MPFI is intended to be a portable library written in C for arbitrary +precision interval arithmetic with intervals represented using MPFR +reliable floating-point numbers. It is based on the GNU MP library and +on the MPFR library. The purpose of an arbitrary precision interval +arithmetic is on the one hand to get "guaranteed" results, thanks to +interval computation, and on the other hand to obtain accurate results, +thanks to multiple precision arithmetic. The MPFI library is built upon +MPFR in order to benefit from the correct rounding provided, for each +operation or function, by MPFR. Further advantages of using MPFR are its +portability and compliance with the IEEE 754 standard for floating-point +arithmetic. + + This version of MPFI is released under the GNU Lesser General Public +License. It is permitted to link MPFI to non-free programs, as long as +when distributing them the MPFI source code and a means to re-link with +a modified MPFI is provided. + + As interval arithmetic has been standardized, see the IEEE 1788-2015 +standard, the next version of MPFI will evolve in order to incorporate +the standardized definitions and behaviours. + + +File: mpfi.info, Node: Installing MPFI, Next: Reporting Bugs, Prev: Introduction to MPFI, Up: Top + +2 Installing MPFI +***************** + +To build MPFI, you first have to install MPFR (version 4.0.1 or above) +on your computer. You need a C compiler, preferably GCC, but any +reasonable compiler should work. And you need a standard Unix 'make' +program, plus some other standard Unix utility programs. + +2.1 How to Install +================== + +Here are the steps needed to install the MPFI library on Unix systems. +In the MPFI source directory, type the following commands. + + 1. './configure' + + This will prepare the build and setup the options according to your + system. You can give options to specify the install directories + (instead of the default '/usr/local'), and so on. + + You can specify the path to GMP and MPFR libraries with configure + options: '--with-gmp=DIR' assumes that GMP is installed in the + 'DIR' directory. Alternatively, you can use the + '--with-gmp-lib=DIR' and '--with-gmp-include=DIR' to specify + respectively the GMP lib and GMP include directories. Options + '--with-mpfr=DIR', '--with-mpfr-include=DIR', and + '--with-mpfr-lib=DIR' have the same usage for the MPFR library. + + See the 'INSTALL' file and the output of './configure --help' for a + description of standard options. + + 2. 'make' + + This will compile MPFI, and create a library archive file + 'libmpfi.a'. On most platforms, a dynamic library will be produced + too. + + 3. 'make check' + + This will make sure MPFI was built correctly. If any test fails, + information about this failure can be found in the + 'tests/test-suite.log' file. If you want the contents of this file + to be automatically output in case of failure, you can set the + 'VERBOSE' environment variable to 1 before running 'make check', + for instance by typing: + + 'VERBOSE=1 make check' + + If you get error messages from the test program, please report this + to 'mpfi-users@inria.fr'. (*Note Reporting Bugs::, for information + on what to include in useful bug reports.) + + 4. 'make install' + + This will copy the file 'mpfi.h' to the directory + '/usr/local/include', the library files ('libmpfi.a' and possibly + others) to the directory '/usr/local/lib', the file 'mpfi.info' to + the directory '/usr/local/share/info', and some other documentation + files to the directory '/usr/local/share/doc/mpfi' (or if you + passed the '--prefix' option to 'configure', using the prefix + directory given as argument to '--prefix' instead of '/usr/local'). + +2.2 Other 'make' targets +======================== + +There are some other useful make targets: + + * 'info' + + Create an info version of the manual, in 'mpfi.info'. + + This file is already provided in the MPFI archives. + + * 'pdf' + + Create a PDF version of the manual, in 'mpfi.pdf'. + + * 'dvi' + + Create a DVI version of the manual, in 'mpfi.dvi'. + + * 'ps' + + Create a Postscript version of the manual, in 'mpfi.ps'. + + * 'html' Create a HTML version of the manual, in 'mpfi.html'. + + * 'clean' + + Delete all object files and archive files, but not the + configuration files. + + * 'uninstall' Delete all files copied by 'make install'. + +2.3 Known Build Problems +======================== + +The installation procedure and MPFI itself have been tested only on some +Linux distributions. Since it has not been intensively tested, you may +discover that MPFI suffers from all bugs of the underlying libraries, +plus many many more. + + Please report any problem to 'mpfi-users@inria.fr'. *Note Reporting +Bugs::. + +2.4 Getting the Latest Version of MPFI +====================================== + +The latest version of MPFI is available from +. + + +File: mpfi.info, Node: Reporting Bugs, Next: MPFI Basics, Prev: Installing MPFI, Up: Top + +3 Reporting Bugs +**************** + +If you think you have found a bug in the MPFI library, please +investigate it and report it. We have made this library available to +you, and we expect you will report the bugs that you find. + + There are a few things you should think about when you put your bug +report together. + + You have to send us a test case that makes it possible for us to +reproduce the bug. Include instructions on how to run the test case. + + You also have to explain what is wrong; if you get a crash, or if the +results printed are incorrect and in that case, in what way. + + Please include compiler version information in your bug report. This +can be extracted using 'cc -V' on some machines or, if you're using gcc, +'gcc -v'. Also, include the output from 'uname -a', along with the +version of GMP and of MPFR you use. + + If your bug report is good, we will do our best to help you to get a +corrected version of the library; if the bug report is poor, we won't do +anything about it (except kidding you for sending poor bug reports). + + Send your bug report to: 'mpfi-users@inria.fr'. + + If you think something in this manual is unclear, or downright +incorrect, or if the language needs to be improved, please send a note +to the same address. + + +File: mpfi.info, Node: MPFI Basics, Next: Interval Functions, Prev: Reporting Bugs, Up: Top + +4 MPFI Basics +************* + +All declarations needed to use MPFI are collected in the include file +'mpfi.h'. The declarations useful for inputs and outputs are to be +found in 'mpfi_io.h'. It is designed to work with both C and C++ +compilers. You should include these files in any program using the MPFI +library: + + #include "mpfi.h" + #include "mpfi_io.h" + +4.1 Nomenclature and Types +========================== + +As MPFI is built upon MPFR, it is advisable to read MPFR's manual first. + +An "interval" is a closed connected set of real numbers, it is +represented in MPFI by its endpoints which are MPFR floating-point +numbers. The C data type for these objects is 'mpfi_t'. + + MPFI functions operate on valid intervals (defined below), their +behavior with non-valid intervals as input is undefined. + * A "valid interval" can have finite or infinite endpoints, but its + left endpoint is not larger than its right endpoint and cannot be + +infinity or -0 (respectively, the right endpoint cannot be + -infinity or +0). (1) As a consequence, the unique representation + of the zero singleton is [+0, -0]. + + MPFI functions may return intervals that are not valid as input +value. Their semantic defined as follows: + * One (or both) NaN endpoint(s) indicates that an invalid operation + has been performed and that the resulting interval has no + mathematical meaning. + * An "empty interval" has its left endpoint larger than its right + endpoint. + + Both the meaning of "invalid operation", the representation of the +empty set and its handling may change in future versions of MPFI, +according to the standardization of interval arithmetic in IEEE-1788. + + Some functions on intervals return a floating-point value: among such +functions are 'mpfi_get_left' that returns the left endpoint of an +interval and 'mpfi_diam_abs' that gets the width of the input interval. + +A "Floating point number" or "Float" for short, is an arbitrary +precision significand (aslso called mantissa) with a limited precision +exponent. The C data type for such objects is 'mpfr_t'. + +The "Precision" is the number of bits used to represent the significand +of a floating-point number; the corresponding C data type is +'mpfr_prec_t' (renamed 'mpfr_prec_t' since MPFR version 3.0.0, both +types are compatible). + + MPFI assumes that both endpoints of an interval use the same +precision. However when this does not hold, the largest precision is +considered. + +4.2 Function Classes +==================== + +There is only one class of functions in the MPFI library: + + 1. Functions for interval arithmetic based on floating-point numbers, + with names beginning with 'mpfi_'. The associated type is + 'mpfi_t'. There are around 170 functions in this class. + +4.3 MPFI Variable Conventions +============================= + +As a general rule, all MPFI functions expect output arguments before +input arguments. This notation is based on an analogy with the +assignment operator. + + MPFI allows you to use the same variable for both input and output in +the same expression. For example, the function for the exponential, +'mpfi_exp', can be used like this: 'mpfi_exp (x, x)'. This computes the +set of exponentials of every real belonging to X and puts the result +back in X. + + Before you can give a value to an MPFI variable, you need to +initialize it by calling one of the special initialization functions. +When you're done with a variable, you need to clear it out, using one of +the appropriate functions. + + A variable should be initialized only once, or at least be cleared +out between different initializations. After a variable has been +initialized, it can be assigned any number of times. + + For efficiency reasons, avoid to initialize and clear out a variable +in loops. Instead, initialize it before entering the loop, and clear it +out after exiting the loop. + + You don't need to be concerned about allocating additional space for +MPFI variables, since any variable uses a memory space of fixed size. +Hence unless you change its precision, or clear and reinitialize it, an +interval variable will have the same allocated space during all its +lifetime. + + ---------- Footnotes ---------- + + (1) The restriction on the infinite values follows the definition of +interval, and the sign of the zero bounds allows a simple implementation +of the four arithmetic operations as explained in the paper of T. +Hickey, Q. Ju, and M. H. Van Emden, 'Interval arithmetic: From +principles to implementation' (*Note References::). + + +File: mpfi.info, Node: Interval Functions, Next: Contributors, Prev: MPFI Basics, Up: Top + +5 Interval Functions +******************** + +The interval functions expect arguments of type 'mpfi_t'. + + The MPFI interval functions have an interface that is close to the +corresponding MPFR functions. The function prefix for interval +operations is 'mpfi_'. + + MPFI intervals are represented by their endpoints; this +representation should be invisible to the user, unfortunately it is +not... It is assumed that both endpoints have the same precision; +however when this does not hold, the largest precision is considered. +The user has to specify the precision of each variable. A computation +that assigns a variable will take place with the precision of the +assigned variable. For more information on precision (precision of a +variable, precision of a calculation), see the MPFR documentation. + +* Menu: + +* Return Values:: +* Precision Handling:: +* Initializing and Assigning Intervals:: +* Floating-point Quantities:: +* Converting Intervals:: +* Interval Arithmetic:: +* Special Functions:: +* Interval Comparison:: +* I/O of Intervals:: +* Operating on the Endpoints:: +* Set Operations:: +* Miscellaneous Interval Functions:: +* Error Handling:: + + +File: mpfi.info, Node: Return Values, Next: Precision Handling, Prev: Interval Functions, Up: Interval Functions + +5.1 Return Values +================= + +Four integer values (of C type 'int') can be returned by a typical +'mpfi' function. These values indicate whether none, one or two +endpoints of the computed interval are exact: since they are rounded +values, they can differ from the exact result. Here are their names: + * 'MPFI_FLAGS_BOTH_ENDPOINTS_EXACT' + * 'MPFI_FLAGS_LEFT_ENDPOINT_INEXACT': the left endpoint is inexact + whereas the right endpoint is exact; + * 'MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT': the right endpoint is inexact + whereas the left endpoint is exact; + * 'MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT' + To test the exactness of one endpoint, the following functions are +available (their names are self-explanatory): + * 'MPFI_BOTH_ARE_EXACT' + * 'MPFI_LEFT_IS_INEXACT' + * 'MPFI_RIGHT_IS_INEXACT' + * 'MPFI_BOTH_ARE_INEXACT' + + +File: mpfi.info, Node: Precision Handling, Next: Initializing and Assigning Intervals, Prev: Return Values, Up: Interval Functions + +5.2 Precision Handling +====================== + +The default computing precision is handled by MPFR, getting or setting +its value is performed using the following MPFR functions (cf. MPFR +documentation): + + -- Macro: void mpfr_set_default_prec (mpfr_prec_t PREC) + Sets the default precision to be *exactly* PREC bits. The + precision of a variable means the number of bits used to store the + significands of its endpoints. All subsequent calls to 'mpfi_init' + will use this precision, but previously initialized variables are + unaffected. This default precision is set to 53 bits initially. + The precision PREC can be any integer between 'MPFR_PREC_MIN' and + 'MPFR_PREC_MAX'. + + Note: when MPFR is built with the '--enable-thread-safe' configure + option, the default precision is local to each thread. See MPFR + documentation for more information. + + -- Macro: mpfr_prec_t mpfr_get_default_prec () + Returns the default MPFR/MPFI precision in bits. + + The following two functions are useful for changing the precision +during a calculation. A typical use would be for adjusting the +precision gradually in iterative algorithms like Newton-Raphson, making +the computation precision closely match the actual accurate part of the +numbers. + + -- Function: void mpfi_set_prec (mpfi_t X, mpfr_prec_t PREC) + Resets the precision of X to be *exactly* PREC bits. The previous + value stored in X is lost. It is equivalent to a call to + 'mpfi_clear(x)' followed by a call to 'mpfi_init2(x, prec)', but + more efficient as no allocation is done in case the current + allocated space for the significands of the endpoints of X is + enough. The precision PREC can be any integer between + 'MPFR_PREC_MIN' and 'MPFR_PREC_MAX'. In case you want to keep the + previous value stored in X, use 'mpfi_round_prec' instead. + + -- Function: mpfr_prec_t mpfi_get_prec (mpfi_t X) + Return the largest precision actually used for assignments of X, + i.e.\ the number of bits used to store the significands of its + endpoints. Should the two endpoints have different precisions, the + largest one is returned. + + -- Function: int mpfi_round_prec (mpfi_t X, mpfr_prec_t PREC) + Rounds X with precision PREC, which may be different from that of + X. If PREC is greater or equal to the precision of X, then new + space is allocated for the endpoints' significands, and they are + filled with zeroes. Otherwise, the significands are rounded + outwards to precision PREC. In both cases, the precision of X is + changed to PREC. It returns a value indicating whether the + possibly rounded endpoints are exact or not, cf. *note Return + Values::. + + +File: mpfi.info, Node: Initializing and Assigning Intervals, Next: Floating-point Quantities, Prev: Precision Handling, Up: Interval Functions + +5.3 Initialization and Assignment Functions +=========================================== + +* Menu: + +* Initializing Intervals:: +* Assigning Intervals:: +* Simultaneous Interval Init & Assign:: + + +File: mpfi.info, Node: Initializing Intervals, Next: Assigning Intervals, Prev: Initializing and Assigning Intervals, Up: Initializing and Assigning Intervals + +5.3.1 Initialization Functions +------------------------------ + +An 'mpfi_t' object must be initialized before storing the first value in +it. The functions 'mpfi_init' and 'mpfi_init2' are used for that +purpose. + + -- Function: void mpfi_init (mpfi_t X) + Initializes X, and sets its value to NaN, to prevent from using an + unassigned variable inadvertently. Normally, a variable should be + initialized once only or at least be cleared, using 'mpfi_clear', + between consecutive initializations. The precision of X is the + default precision, which can be changed by a call to + 'mpfr_set_default_prec'. + + Warning! In a given program, some other libraries might change the + default precision and not restore it. Thus it is safer to use + 'mpfi_init2'. + + -- Function: void mpfi_init2 (mpfi_t X, mpfr_prec_t PREC) + Initializes X, sets its precision (or more precisely the precision + of its endpoints) to be *exactly* PREC bits, and sets its endpoints + to NaN. Normally, a variable should be initialized once only or at + least be cleared, using 'mpfi_clear', between consecutive + initializations. To change the precision of a variable which has + already been initialized, use 'mpfi_set_prec' instead, or + 'mpfi_round_prec' if you want to keep its value. + + -- Function: void mpfi_clear (mpfi_t X) + Frees the space occupied by the significands of the endpoints of X. + Make sure to call this function for all 'mpfi_t' variables when you + are done with them. + + Here is an example on how to initialize interval variables: + { + mpfi_t x, y; + mpfi_init (x); /* use default precision */ + mpfi_init2 (y, 256); /* precision _exactly_ 256 bits */ + ... + /* Unless the program is about to exit, do ... */ + mpfi_clear (x); + mpfi_clear (y); + } + + -- Function: void mpfi_inits (mpfi_t X, ...) + Initialize all the 'mpfi_t' variables of the given 'va_list', set + their precision to the default precision and their value to NaN. + See 'mpfi_init' for more details. The 'va_list' is assumed to be + composed only of type 'mpfi_t' (or equivalently 'mpfi_ptr'). It + begins from X, and ends when it encounters a null pointer (whose + type must also be 'mpfi_ptr'). + + Warning! In a given program, some other libraries might change the + default precision and not restore it. Thus it is safer to use + 'mpfi_inits2'. + + -- Function: void mpfi_inits2 (mpfr_prec_t PREC, mpfi_t X, ...) + Initialize all the 'mpfi_t' variables of the given variable + argument 'va_list', set their precision to be *exactly* PREC bits + and their value to NaN. See 'mpfi_init2' for more details. The + 'va_list' is assumed to be composed only of type 'mpfi_t' (or + equivalently 'mpfi_ptr'). It begins from X, and ends when it + encounters a null pointer (whose type must also be 'mpfi_ptr'). + + -- Function: void mpfi_clears (mpfi_t X, ...) + Free the space occupied by all the 'mpfi_t' variables of the given + 'va_list'. See 'mpfi_clear' for more details. The 'va_list' is + assumed to be composed only of type 'mpfi_t' (or equivalently + 'mpfi_ptr'). It begins from X, and ends when it encounters a null + pointer (whose type must also be 'mpfi_ptr'). + + Here is an example of how to use multiple initialization functions +(since 'NULL' is not necessarily defined in this context, we use +'(mpfi_ptr) 0' instead, but '(mpfi_ptr) NULL' is also correct). + + { + mpfi_t a, b, c; + + mpfi_inits (a, b, c, (mpfi_ptr) 0); /* Use default precision */ + ... + mpfi_clears (a, b, c, (mpfi_ptr) 0); + + /* Another possibility is to specify the precision */ + mpfi_inits2 (200, a, b, c, (mpfi_ptr) 0); /* Use _exactly_ 200 bits */ + ... + mpfi_clears (a, b, c, (mpfi_ptr) 0); + } + + +File: mpfi.info, Node: Assigning Intervals, Next: Simultaneous Interval Init & Assign, Prev: Initializing Intervals, Up: Initializing and Assigning Intervals + +5.3.2 Assignment Functions +-------------------------- + +These functions assign new values to already initialized intervals +(*note Initializing Intervals::). + + -- Function: int mpfi_set (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_set_ui (mpfi_t ROP, unsigned long int OP) + -- Function: int mpfi_set_si (mpfi_t ROP, long int OP) + -- Function: int mpfi_set_d (mpfi_t ROP, double OP) + -- Function: int mpfi_set_flt (mpfi_t ROP, float OP) + -- Function: int mpfi_set_ld (mpfi_t ROP, long double OP) + -- Function: int mpfi_set_z (mpfi_t ROP, mpz_t OP) + -- Function: int mpfi_set_q (mpfi_t ROP, mpq_t OP) + -- Function: int mpfi_set_fr (mpfi_t ROP, mpfr_t OP) + Sets the value of ROP from OP, rounded outward to the precision of + ROP: OP then belongs to ROP. The returned value indicates whether + none, one or both endpoints are exact. Please note that even a + 'long int' may have to be rounded, if the destination precision is + less than the machine word width. + + No support (yet) for huge (signed or unsigned) integer, nor for + float128, nor for decimal64. + + -- Function: int mpfi_set_str (mpfi_t ROP, char *S, int BASE) + Sets ROP to the value of the string S, in base BASE (between 2 and + 36), outward rounded to the precision of ROP: OP then belongs to + ROP. The exponent is read in decimal. The string is of the form + 'number' or '[ number1 , number 2 ]'. Each endpoint has the form + 'M@N' or, if the base is 10 or less, alternatively 'MeN' or 'MEN'. + 'M' is the significand and 'N' is the exponent. The significand is + always in the specified base. The exponent is in decimal. The + argument BASE may be in the ranges 2 to 36. + + This function returns 1 if the input is incorrect, and 0 otherwise. + + -- Function: void mpfi_swap (mpfi_t X, mpfi_t Y) + Swaps the values X and Y efficiently. Warning: the precisions are + exchanged too; in case the precisions are different, 'mpfi_swap' is + thus not equivalent to three 'mpfi_set' calls using a third + auxiliary variable. + + +File: mpfi.info, Node: Simultaneous Interval Init & Assign, Prev: Assigning Intervals, Up: Initializing and Assigning Intervals + +5.3.3 Combined Initialization and Assignment Functions +------------------------------------------------------ + + -- Function: int mpfi_init_set (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_init_set_ui (mpfi_t ROP, unsigned long int OP) + -- Function: int mpfi_init_set_si (mpfi_t ROP, long int OP) + -- Function: int mpfi_init_set_d (mpfi_t ROP, double OP) + -- Function: int mpfi_init_set_z (mpfi_t ROP, mpz_t OP) + -- Function: int mpfi_init_set_q (mpfi_t ROP, mpq_t OP) + -- Function: int mpfi_init_set_fr (mpfi_t ROP, mpfr_t OP) + Initializes ROP and sets its value from OP, outward rounded so that + OP belongs to ROP. The precision of ROP will be taken from the + active default precision, as set by 'mpfr_set_default_prec'. The + returned value indicates whether none, one or both endpoints are + exact. + + -- Function: int mpfi_init_set_str (mpfi_t ROP, char *S, int BASE) + Initializes ROP and sets its value to the value of the string S, in + base BASE (between 2 and 36), outward rounded to the precision of + ROP: OP then belongs to ROP. The exponent is read in decimal. See + 'mpfi_set_str'. + + +File: mpfi.info, Node: Floating-point Quantities, Next: Converting Intervals, Prev: Initializing and Assigning Intervals, Up: Interval Functions + +5.4 Interval Functions with Floating-point Results +================================================== + +Some functions on intervals return floating-point results, such as the +center or the width, also called diameter, of an interval. + + -- Function: int mpfi_diam_abs (mpfr_t ROP, mpfi_t OP) + Sets the value of ROP to the upward rounded diameter of OP, or in + other words to the upward rounded difference between the right + endpoint of OP and its left endpoint. Returns 0 if the diameter is + exact and a positive value if the rounded value is greater than the + exact diameter. + + -- Function: int mpfi_diam_rel (mpfr_t ROP, mpfi_t OP) + Sets the value of ROP to the upward rounded relative diameter of + OP, or in other words to the upward rounded difference between the + right endpoint of OP and its left endpoint, divided by the absolute + value of the center of OP if it is not zero. Returns 0 if the + result is exact and a positive value if the returned value is an + overestimation, in this case the returned value may not be the + correct rounding of the exact value. + + -- Function: int mpfi_diam (mpfr_t ROP, mpfi_t OP) + Sets the value of ROP to the relative diameter of OP if OP does not + contain zero and to its absolute diameter otherwise. Returns 0 if + the result is exact and a positive value if the returned value is + an overestimation, it may not be the correct rounding of the exact + value in the latter case. + + -- Function: int mpfi_mag (mpfr_t rop, mpfi_t op) + Sets the value of ROP to the magnitude of OP, i.e.\ to the largest + absolute value of the elements of OP. Returns 0 if the result is + exact and a positive value if the returned value is an + overestimation. + + -- Function: int mpfi_mig (mpfr_t rop, mpfi_t op) + Sets the value of ROP to the mignitude of OP, i.e.\ to the smallest + absolute value of the elements of OP. Returns 0 if the result is + exact and a negative value if the returned value is an + underestimation. + + -- Function: int mpfi_mid (mpfr_t rop, mpfi_t op) + Sets ROP to the middle of OP. Returns 0 if the result is exact, a + positive value if ROP > the middle of OP and a negative value if + ROP < the middle of OP. + + -- Function: void mpfi_alea (mpfr_t rop, mpfi_t op) + Sets ROP to a floating-point number picked up at random in OP, + according to a uniform distribution. + + This function is deprecated and may disappear in future versions of + MPFI; 'mpfi_urandom' should be used instead. + + -- Function: void mpfi_urandom (mpfr_t rop, mpfi_t op, gmp_randstate_t + state) + Sets ROP to a floating-point number picked up at random in OP, + according to a uniform distribution. + + The argument STATE should be initialized with one of the GMP random + state initialization functions (*note (gmp.info)Random State + Initialization::). + + -- Function: void mpfi_nrandom (mpfr_t rop, mpfi_t op, gmp_randstate_t + state) + Sets ROP to a floating-point number picked up at random in OP, + according to a normal distribution. + + The argument STATE should be initialized as for 'mpfi_urandom'. + + Caveat: the normal distribution on the set of floating-point + numbers is different from the normal distribution on the set of + real numbers. No guarantee is given on the quality of the + distribution. + + -- Function: void mpfi_erandom (mpfr_t rop, mpfi_t op, gmp_randstate_t + state) + Sets ROP to a floating-point number picked up at random in OP, + according to an exponential distribution. + + The argument STATE should be initialized as for 'mpfi_urandom'. + + Caveat: the exponential distribution on the set of floating-point + numbers is different from the exponential distribution on the set + of real numbers. No guarantee is given on the quality of the + distribution. + + +File: mpfi.info, Node: Converting Intervals, Next: Interval Arithmetic, Prev: Floating-point Quantities, Up: Interval Functions + +5.5 Conversion Functions +======================== + + -- Function: double mpfi_get_d (mpfi_t OP) + Converts OP to a double, which is the center of OP rounded to the + nearest double. + + -- Function: void mpfi_get_fr (mpfr_t ROP, mpfi_t OP) + Converts OP to a floating-point number, which is the center of OP + rounded to nearest. + + +File: mpfi.info, Node: Interval Arithmetic, Next: Special Functions, Prev: Converting Intervals, Up: Interval Functions + +5.6 Basic Arithmetic Functions +============================== + + -- Function: int mpfi_add (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + -- Function: int mpfi_add_d (mpfi_t ROP, mpfi_t OP1, double OP2) + -- Function: int mpfi_add_ui (mpfi_t ROP, mpfi_t OP1, unsigned long int + OP2) + -- Function: int mpfi_add_si (mpfi_t ROP, mpfi_t OP1, long int OP2) + -- Function: int mpfi_add_z (mpfi_t ROP, mpfi_t OP1, mpz_t OP2) + -- Function: int mpfi_add_q (mpfi_t ROP, mpfi_t OP1, mpq_t OP2) + -- Function: int mpfi_add_fr (mpfi_t ROP, mpfi_t OP1, mpfr_t OP2) + Sets ROP to OP1 + OP2. Returns a value indicating whether none, + one or both endpoints are exact. + + -- Function: int mpfi_sub (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + -- Function: int mpfi_sub_d (mpfi_t ROP, mpfi_t OP1, double OP2) + -- Function: int mpfi_d_sub (mpfi_t ROP, double OP1, mpfi_t OP2) + -- Function: int mpfi_sub_ui (mpfi_t ROP, mpfi_t OP1, unsigned long int + OP2) + -- Function: int mpfi_ui_sub (mpfi_t ROP, unsigned long int OP1, mpfi_t + OP2) + -- Function: int mpfi_sub_si (mpfi_t ROP, mpfi_t OP1, long int OP2) + -- Function: int mpfi_si_sub (mpfi_t ROP, long int OP1, mpfi_t OP2) + -- Function: int mpfi_sub_z (mpfi_t ROP, mpfi_t OP1, mpz_t OP2) + -- Function: int mpfi_z_sub (mpfi_t ROP, mpz_t OP1, mpfi_t OP2) + -- Function: int mpfi_sub_q (mpfi_t ROP, mpfi_t OP1, mpq_t OP2) + -- Function: int mpfi_q_sub (mpfi_t ROP, mpq_t OP1, mpfi_t OP2) + -- Function: int mpfi_sub_fr (mpfi_t ROP, mpfi_t OP1, mpfr_t OP2) + -- Function: int mpfi_fr_sub (mpfi_t ROP, mpfr_t OP1, mpfi_t OP2) + Sets ROP to OP1 - OP2. Returns a value indicating whether none, + one or both endpoints are exact. + + -- Function: int mpfi_mul (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + -- Function: int mpfi_mul_d (mpfi_t ROP, mpfi_t OP1, double OP2) + -- Function: int mpfi_mul_ui (mpfi_t ROP, mpfi_t OP1, unsigned long int + OP2) + -- Function: int mpfi_mul_si (mpfi_t ROP, mpfi_t OP1, long int OP2) + -- Function: int mpfi_mul_z (mpfi_t ROP, mpfi_t OP1, mpz_t OP2) + -- Function: int mpfi_mul_q (mpfi_t ROP, mpfi_t OP1, mpq_t OP2) + -- Function: int mpfi_mul_fr (mpfi_t ROP, mpfi_t OP1, mpfr_t OP2) + Sets ROP to OP1 * OP2. Multiplication by an interval containing + only zero results in 0. Returns a value indicating whether none, + one or both endpoints are exact. + + Division is defined even if the divisor contains zero: when the +divisor contains zero in its interior, the result is the whole real +interval [-Inf, Inf]. When the divisor has one of its endpoints equal +to 0, for instance, [1,2]/[+0,1] results in [1, Inf]. It is not +guaranteed in the current version that everything behaves properly if +the divisor contains only 0. In this example, both endpoints are exact. + + The extended interval division, returning two semi-infinite intervals +when the divisor contains 0, should be available soon. + + -- Function: int mpfi_div (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + -- Function: int mpfi_div_d (mpfi_t ROP, mpfi_t OP1, double OP2) + -- Function: int mpfi_d_div (mpfi_t ROP, double OP1, mpfi_t OP2) + -- Function: int mpfi_div_ui (mpfi_t ROP, mpfi_t OP1, unsigned long int + OP2) + -- Function: int mpfi_ui_div (mpfi_t ROP, unsigned long int OP1, mpfi_t + OP2) + -- Function: int mpfi_div_si (mpfi_t ROP, mpfi_t OP1, long int OP2) + -- Function: int mpfi_si_div (mpfi_t ROP, long int OP1, mpfi_t OP2) + -- Function: int mpfi_div_z (mpfi_t ROP, mpfi_t OP1, mpz_t OP2) + -- Function: int mpfi_z_div (mpfi_t ROP, mpz_t OP1, mpfi_t OP2) + -- Function: int mpfi_div_q (mpfi_t ROP, mpfi_t OP1, mpq_t OP2) + -- Function: int mpfi_q_div (mpfi_t ROP, mpq_t OP1, mpfi_t OP2) + -- Function: int mpfi_div_fr (mpfi_t ROP, mpfi_t OP1, mpfr_t OP2) + -- Function: int mpfi_fr_div (mpfi_t ROP, mpfr_t OP1, mpfi_t OP2) + Sets ROP to OP1/OP2. Returns an indication of whether none, one or + both endpoints are exact. + + -- Function: int mpfi_div_ext (mpfi_t ROP1, mpfi_t ROP2, mpfi_t OP1, + mpfi_t OP2) + Returns 0, 1 or 2 depending on the number of intervals + corresponding to the result of the extended division of OP1 by OP2: + if OP2 contains 0, then it returns 2 and both ROP1 and ROP2 are + set: ROP1 and ROP2 correspond to the results of the division of OP1 + by [inf(OP2), 0] and [0, sup(OP2], in ascending order; otherwise + the usual division is performed and 0 or 1 result is set, the other + one(s) being NaN. + + -- Function: int mpfi_neg (mpfi_t ROP, mpfi_t OP) + Sets ROP to -OP. Returns an indication of whether none, one or + both endpoints are exact. + + -- Function: int mpfi_sqr (mpfi_t ROP, mpfi_t OP) + Sets ROP to the nonnegative square of OP. Returns an indication of + whether none, one or both endpoints are exact. Indeed, in interval + arithmetic, the square of an interval is a nonnegative interval + whereas the product of an interval by itself can contain negative + values. + + -- Function: int mpfi_inv (mpfi_t ROP, mpfi_t OP) + Sets ROP to 1/OP. Inverse is defined even if the interval contains + zero: when the denominator contains zero, the result is the whole + real interval ]-Inf, Inf[. Returns an indication of whether none, + one or both endpoints are exact. + + -- Function: int mpfi_sqrt (mpfi_t ROP, mpfi_t OP) + Sets ROP to the square root of OP. Sets ROP to NaN if OP is + negative. Returns an indication of whether none, one or both + endpoints are exact. + + -- Function: int mpfi_rec_sqrt (mpfi_t ROP, mpfi_t OP) + Sets ROP to the inverse of square root of OP. Sets ROP to NaN if + OP is negative. Returns an indication of whether none, one or both + endpoints are exact. + + -- Function: int mpfi_cbrt (mpfi_t ROP, mpfi_t OP) + Sets ROP to the cubic root of OP. Returns an indication of whether + none, one or both endpoints are exact. + + -- Function: int mpfi_abs (mpfi_t ROP, mpfi_t OP) + Sets ROP to the interval containing the absolute value of every + element of OP. Returns an indication of whether none, one or both + endpoints are exact. + + -- Function: int mpfi_mul_2exp (mpfi_t ROP, mpfi_t OP1, unsigned long + int OP2) + -- Function: int mpfi_mul_2ui (mpfi_t ROP, mpfi_t OP1, unsigned long + int OP2) + -- Function: int mpfi_mul_2si (mpfi_t ROP, mpfi_t OP1, long int OP2) + Sets ROP to OP1 times 2 raised to OP2. + + 'mpfi_mul_2exp' is identical to 'mpfi_mul_2ui' and is kept for + compatibility with former versions of MPFI only. It is deprecated + and could disappear in future versions of MPFI. Returns an + indication of whether none, one or both endpoints are exact. Just + increases the exponents of the endpoints by OP2 when ROP and OP1 + are identical. + + -- Function: int mpfi_div_2exp (mpfi_t ROP, mpfi_t OP1, unsigned long + int OP2) + -- Function: int mpfi_div_2ui (mpfi_t ROP, mpfi_t OP1, unsigned long + int OP2) + -- Function: int mpfi_div_2si (mpfi_t ROP, mpfi_t OP1, long int OP2) + Sets ROP to OP1 divided by 2 raised to OP2. Returns an indication + of whether none, one or both endpoints are exact. Just decreases + the exponents of the endpoints by OP2 when ROP and OP1 are + identical. + + +File: mpfi.info, Node: Special Functions, Next: Interval Comparison, Prev: Interval Arithmetic, Up: Interval Functions + +5.7 Special Functions +===================== + +These functions are based on their MPFR counterparts. For more +information, see the MPFR documentation or related bibliography. + + -- Function: int mpfi_log (mpfi_t ROP, mpfi_t OP) + Sets ROP to the natural logarithm of OP, with the precision of ROP. + Returns an indication of whether none, one or both endpoints are + exact. If OP contains negative numbers, then ROP has at least one + NaN endpoint. + + -- Function: int mpfi_exp (mpfi_t ROP, mpfi_t OP) + Sets ROP to the exponential of OP, with the precision of ROP. + Returns an indication of whether none, one or both endpoints are + exact. + + -- Function: int mpfi_exp2 (mpfi_t ROP, mpfi_t OP) + Sets ROP to 2 to the power OP, with the precision of ROP. Returns + an indication of whether none, one or both endpoints are exact. + + -- Function: int mpfi_exp10 (mpfi_t ROP, mpfi_t OP) + Sets ROP to 10 to the power OP, with the precision of ROP. Returns + an indication of whether none, one or both endpoints are exact. + + -- Function: int mpfi_cos (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_sin (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_tan (mpfi_t ROP, mpfi_t OP) + Sets ROP to the cosine, sine or tangent of OP, with the precision + of ROP. Returns an indication of whether none, one or both + endpoints are exact. + + -- Function: int mpfi_sec (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_csc (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_cot (mpfi_t ROP, mpfi_t OP) + Sets ROP to the secant, cosecant or cotangent of OP, with the + precision of ROP. Returns an indication of whether none, one or + both endpoints are exact. + + -- Function: int mpfi_acos (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_asin (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_atan (mpfi_t ROP, mpfi_t OP) + Sets ROP to the arc-cosine, arc-sine or arc-tangent of OP, with the + precision of ROP. Returns an indication of whether none, one or + both endpoints are exact. + + -- Function: int mpfi_atan2 (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + Sets ROP to the arc-tangent2 of OP1 and OP2, with the precision of + ROP. Returns an indication of whether none, one or both endpoints + are exact. + + -- Function: int mpfi_cosh (mpfi_t COP, mpfi_t OP) + -- Function: int mpfi_sinh (mpfi_t SOP, mpfi_t OP) + -- Function: int mpfi_tanh (mpfi_t TOP, mpfi_t OP) + Sets COP to the hyperbolic cosine of OP, SOP to the hyperbolic sine + of OP, TOP to the hyperbolic tangent of OP, with the precision of + the result. Returns an indication of whether none, one or both + endpoints are exact. + + -- Function: int mpfi_sech (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_csch (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_coth (mpfi_t ROP, mpfi_t OP) + Sets ROP to the hyperbolic secant, cosecant or cotangent of OP, + with the precision of ROP. Returns an indication of whether none, + one or both endpoints are exact. + + -- Function: int mpfi_acosh (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_asinh (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_atanh (mpfi_t ROP, mpfi_t OP) + Sets ROP to the inverse hyperbolic cosine, sine or tangent of OP, + with the precision of ROP. Returns an indication of whether none, + one or both endpoints are exact. + + -- Function: int mpfi_log1p (mpfi_t ROP, mpfi_t OP) + Sets ROP to the natural logarithm of one plus OP, with the + precision of ROP. Returns an indication of whether none, one or + both endpoints are exact. If OP contains negative numbers, then + ROP has at least one NaN endpoint. + + -- Function: int mpfi_log2p1 (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_log10p1 (mpfi_t ROP, mpfi_t OP) + Sets ROP to the logarithm in base t of (OP plus one), with the + precision of ROP. The base t can be equal to 2 or 10. Returns an + indication of whether none, one or both endpoints are exact. + + -- Function: int mpfi_expm1 (mpfi_t ROP, mpfi_t OP) + Sets ROP to the exponential of OP, minus one, with the precision of + ROP. Returns an indication of whether none, one or both endpoints + are exact. + + -- Function: int mpfi_exp2m1 (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_exp10m1 (mpfi_t ROP, mpfi_t OP) + Sets ROP to the exponential in base t of OP, minus one, with the + precision of ROP. The base t can be equal to 2 or 10. Returns an + indication of whether none, one or both endpoints are exact. + + -- Function: int mpfi_log2 (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_log10 (mpfi_t ROP, mpfi_t OP) + Sets ROP to log[t] OP with t=2 or 10 the base for the logarithm, + with the precision of ROP. Returns an indication of whether none, + one or both endpoints are exact. If OP contains negative numbers, + then ROP has at least one NaN endpoint. + + -- Function: int mpfi_hypot (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + Sets ROP to the euclidean distance between points in OP1 and points + in OP2, with the precision of ROP. Returns an indication of + whether none, one or both endpoints are exact. + + -- Function: int mpfi_const_log2 (mpfi_t ROP) + -- Function: int mpfi_const_pi (mpfi_t ROP) + -- Function: int mpfi_const_euler (mpfi_t ROP) + -- Function: int mpfi_const_catalan (mpfi_t ROP) + Sets ROP respectively to the logarithm of 2, to the value of Pi, to + the Euler's constant, and to the Catalan's constant, with the + precision of ROP. + + Returns an indication of whether none, one or both endpoints are + exact. + + +File: mpfi.info, Node: Interval Comparison, Next: I/O of Intervals, Prev: Special Functions, Up: Interval Functions + +5.8 Comparison Functions +======================== + +The comparison of two intervals is not clearly defined when they +overlap. MPFI proposes default comparison functions, but they can +easily be customized according to the user's needs. The default +comparison functions return a positive value if the first interval has +all its elements strictly greater than all elements of the second one, a +negative value if the first interval has all its elements strictly lower +than all elements of the second one and 0 otherwise, i.e.\ if they +overlap or if one is contained in the other. + + -- Function: int mpfi_cmp (mpfi_t OP1, mpfi_t OP2) + -- Function: int mpfi_cmp_d (mpfi_t OP1, double OP2) + -- Function: int mpfi_cmp_ui (mpfi_t OP1, unsigned long int OP2) + -- Function: int mpfi_cmp_si (mpfi_t OP1, long int OP2) + -- Function: int mpfi_cmp_z (mpfi_t OP1, mpz_t OP2) + -- Function: int mpfi_cmp_q (mpfi_t OP1, mpq_t OP2) + -- Function: int mpfi_cmp_fr (mpfi_t OP1, mpfr_t OP2) + Compares OP1 and OP2. Return a positive value if OP1 > OP2, zero + if OP1 overlaps or contains OP2, and a negative value if OP1 < OP2. + In case one of the operands is invalid (which is represented by at + least one NaN endpoint), it returns 1, even if both are invalid. + + -- Function: int mpfi_is_pos (mpfi_t OP) + Returns a positive value if OP contains only positive numbers, the + left endpoint can be zero. + + -- Function: int mpfi_is_strictly_pos (mpfi_t OP) + Returns a positive value if OP contains only positive numbers. + + -- Function: int mpfi_is_nonneg (mpfi_t OP) + Returns a positive value if OP contains only nonnegative numbers. + + -- Function: int mpfi_is_neg (mpfi_t OP) + Returns a positive value if OP contains only negative numbers, the + right endpoint can be zero. + + -- Function: int mpfi_is_strictly_neg (mpfi_t OP) + Returns a positive value if OP contains only negative numbers. + + -- Function: int mpfi_is_nonpos (mpfi_t OP) + Returns a positive value if OP contains only nonpositive numbers. + + -- Function: int mpfi_is_zero (mpfi_t OP) + Returns a positive value if OP contains only 0. + + -- Function: int mpfi_has_zero (mpfi_t OP) + Returns a positive value if OP contains 0 (and possibly other + numbers). + + -- Function: int mpfi_nan_p (mpfi_t OP) + Returns non-zero if OP is invalid, i.e.\ at least one of its + endpoints is a Not-a-Number (NaN), zero otherwise. + + -- Function: int mpfi_inf_p (mpfi_t OP) + Returns non-zero if at least one of the endpoints of OP is plus or + minus infinity, zero otherwise. + + -- Function: int mpfi_bounded_p (mpfi_t OP) + Returns non-zero if OP is a bounded interval, i.e.\ neither invalid + nor (semi-)infinite. + + +File: mpfi.info, Node: I/O of Intervals, Next: Operating on the Endpoints, Prev: Interval Comparison, Up: Interval Functions + +5.9 Input and Output Functions +============================== + +Functions that perform input from a stdio stream, and functions that +output to a stdio stream. Passing a NULL pointer for a STREAM argument +to any of these functions will make them read from 'stdin' and write to +'stdout', respectively. + + When using any of these functions, it is a good idea to include +'stdio.h' before 'mpfr.h', since that will allow 'mpfr.h' to define +prototypes for these functions. + + The input and output functions are based on the representation by +endpoints. The input function has to be improved. For the time being, +it is mandatory to insert spaces between the interval brackets and the +endpoints and also around the comma separating the endpoints. + + -- Function: size_t mpfi_out_str (FILE *STREAM, int BASE, size_t + N_DIGITS, mpfi_t OP) + Outputs OP on stdio stream STREAM, as a string of digits in base + BASE. The output is an opening square bracket "[", followed by the + lower endpoint, a separating comma, the upper endpoint and a + closing square bracket "]". + + For each endpoint, the output is performed by 'mpfr_out_str'. The + following piece of information is taken from MPFR documentation. + The base may vary from 2 to 36. For each endpoint, it prints at + most N_DIGITS significant digits, or if N_DIGITS is 0, the maximum + number of digits accurately representable by OP. In addition to + the significant digits, a decimal point at the right of the first + digit and a trailing exponent, in the form 'eNNN', are printed. If + BASE is greater than 10, '@' will be used instead of 'e' as + exponent delimiter. + + Returns the number of bytes written, or if an error occurred, + return 0. + + As 'mpfi_out_str' outputs an enclosure of the input interval, and + as 'mpfi_inp_str' provides an enclosure of the interval it reads, + these functions are not reciprocal. More precisely, when they are + called one after the other, the resulting interval contains the + initial one, and this inclusion may be strict. + + -- Function: size_t mpfi_inp_str (mpfi_t ROP, FILE *STREAM, int BASE) + Inputs a string in base BASE from stdio stream STREAM, and puts the + read float in ROP. The string is of the form 'number' or '[ + number1 , number 2 ]'. Each endpoint has the form 'M@N' or, if the + base is 10 or less, alternatively 'MeN' or 'MEN'. 'M' is the + significand and 'N' is the exponent. The significand is always in + the specified base. The exponent is in decimal. + + The argument BASE may be in the ranges 2 to 36. + + Unlike the corresponding 'mpz' function, the base will not be + determined from the leading characters of the string if BASE is 0. + This is so that numbers like '0.23' are not interpreted as octal. + + Returns the number of bytes read, or if an error occurred, return + 0. + + -- Function: void mpfi_print_binary (mpfi_t OP) + Outputs OP on stdout in raw binary format for each endpoint (the + exponent is in decimal, yet). The last bits from the least + significant limb which do not belong to the significand are printed + between square brackets; they should always be zero. + + +File: mpfi.info, Node: Operating on the Endpoints, Next: Set Operations, Prev: I/O of Intervals, Up: Interval Functions + +5.10 Functions Operating on Endpoints +===================================== + + -- Function: int mpfi_get_left (mpfr_t ROP, mpfi_t OP) + Sets ROP to the left endpoint of OP, rounded toward minus infinity. + It returns a negative value if ROP differs from the left endpoint + of OP (due to rounding) and 0 otherwise. + + -- Function: int mpfi_get_right (mpfr_t ROP, mpfi_t OP) + Sets ROP to the right endpoint of OP, rounded toward plus infinity. + It returns a positive value if ROP differs from the right endpoint + of OP (due to rounding) and 0 otherwise. + + The following function should never be used... but it helps to +return correct intervals when there is a bug. + + -- Function: int mpfi_revert_if_needed (mpfi_t ROP) + Swaps the endpoints of ROP if they are not properly ordered, i.e.\ + if the lower endpoint is greater than the right one. It returns a + non-zero value if the endpoints have been swapped, zero otherwise. + + -- Function: int mpfi_put (mpfi_t ROP, mpfi_t OP) + -- Function: int mpfi_put_d (mpfi_t ROP, double OP) + -- Function: int mpfi_put_ui (mpfi_t ROP, unsigned long int OP) + -- Function: int mpfi_put_si (mpfi_t ROP, long int OP) + -- Function: int mpfi_put_z (mpfi_t ROP, mpz_t OP) + -- Function: int mpfi_put_q (mpfi_t ROP, mpq_t OP) + -- Function: int mpfi_put_fr (mpfi_t ROP, mpfr_t OP) + Extends the interval ROP so that it contains OP. In other words, + ROP is set to the convex hull of ROP and OP. It returns a value + indicating whether none, one or both endpoints are inexact (due to + possible roundings). + + -- Function: int mpfi_interv_d (mpfi_t ROP, double OP1, double OP2) + -- Function: int mpfi_interv_ui (mpfi_t ROP, unsigned long int OP1, + unsigned long int OP2) + -- Function: int mpfi_interv_si (mpfi_t ROP, long int OP1, long int + OP2) + -- Function: int mpfi_interv_z (mpfi_t ROP, mpz_t OP1, mpz_t OP2) + -- Function: int mpfi_interv_q (mpfi_t ROP, mpq_t OP1, mpq_t OP2) + -- Function: int mpfi_interv_fr (mpfi_t ROP, mpfr_t OP1, mpfr_t OP2) + Sets ROP to the interval having as endpoints OP1 and OP2. The + values of OP1 and OP2 are given in any order, the left endpoints of + ROP is always the minimum of OP1 and ROP2. It returns a value + indicating whether none, one or both endpoints are inexact (due to + possible roundings). + + +File: mpfi.info, Node: Set Operations, Next: Miscellaneous Interval Functions, Prev: Operating on the Endpoints, Up: Interval Functions + +5.11 Set Functions on Intervals +=============================== + + -- Function: int mpfi_is_strictly_inside (mpfi_t OP1, mpfi_t OP2) + Returns a positive value if the second interval OP2 is contained in + the interior of OP1, 0 otherwise. + + -- Function: int mpfi_is_inside (mpfi_t OP1, mpfi_t OP2) + -- Function: int mpfi_is_inside_d (double OP1, mpfi_t OP2) + -- Function: int mpfi_is_inside_ui (unsigned long OP1, mpfi_t OP2) + -- Function: int mpfi_is_inside_si (long int OP1, mpfi_t OP2) + -- Function: int mpfi_is_inside_z (mpz_t OP1, mpfi_t OP2) + -- Function: int mpfi_is_inside_q (mpq_t OP1, mpfi_t OP2) + -- Function: int mpfi_is_inside_fr (mpfr_t OP1, mpfi_t OP2) + Returns a positive value if OP1 is contained in OP2, 0 otherwise. + Return 0 if at least one argument is NaN or an invalid interval. + + -- Function: int mpfi_is_empty (mpfi_t OP) + Returns a positive value if OP is empty (its endpoints are in + reverse order) and 0 otherwise. Nothing is done in arithmetic or + special functions to handle empty intervals: this is the + responsibility of the user to avoid computing with empty intervals. + + -- Function: int mpfi_intersect (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + Sets ROP to the intersection (possibly empty) of the intervals OP1 + and OP2. It returns a value indicating whether none, one or both + endpoints are inexact (due to possible roundings). Warning: this + function can return an empty interval (i.e.\ with endpoints in + reverse order). + + -- Function: int mpfi_union (mpfi_t ROP, mpfi_t OP1, mpfi_t OP2) + Sets ROP to the convex hull of the union of the intervals OP1 and + OP2. It returns a value indicating whether none, one or both + endpoints are inexact (due to possible roundings). + + +File: mpfi.info, Node: Miscellaneous Interval Functions, Next: Error Handling, Prev: Set Operations, Up: Interval Functions + +5.12 Miscellaneous Interval Functions +===================================== + + -- Function: int mpfi_increase (mpfi_t ROP, mpfr_t OP) + Subtracts OP to the lower endpoint of ROP and adds it to the upper + endpoint of ROP, sets the resulting interval to ROP. It returns a + value indicating whether none, one or both endpoints are inexact. + + -- Function: int mpfi_blow (mpfi_t ROP, mpfi_t OP1, double OP2) + Sets ROP to the interval whose center is the center of OP1 and + whose radius is the radius of OP1 multiplied by (1 + abs(OP2)). It + returns a value indicating whether none, one or both endpoints are + inexact. + + -- Function: int mpfi_bisect (mpfi_t ROP1, mpfi_t ROP2, mpfi_t OP) + Splits OP into two halves and sets them to ROP1 and ROP2. Due to + outward rounding, the two halves ROP1 and ROP2 may overlap. It + returns a value >0 if the splitting point is greater than the exact + centre, <0 if it is smaller and 0 if it is the exact centre. + + -- Function: const char * mpfi_get_version () + Returns the MPFI version number as a NULL terminated string. + + +File: mpfi.info, Node: Error Handling, Prev: Miscellaneous Interval Functions, Up: Interval Functions + +5.13 Error Handling +=================== + + -- Macro: void MPFI_ERROR (char * MSG) + If there is no previous error, sets the error number to 1 and + prints the message MSG to the standard error stream. If the error + number is already set, do nothing. + + -- Function: int mpfi_is_error () + Returns 1 if the error number is set (to 1). + + -- Function: void mpfi_set_error (int OP) + Sets the error number to OP. + + -- Function: void mpfi_reset_error () + Resets the error number to 0. + + +File: mpfi.info, Node: Contributors, Next: References, Prev: Interval Functions, Up: Top + +Contributors +************ + +MPFI has been written by Fabrice Rouillier, Nathalie Revol, Sylvain +Chevillard, Hong Diep Nguyen, Christoph Lauter and Philippe Théveny. +Its development has greatly benefited from the patient and supportive +help of the MPFR team. + + +File: mpfi.info, Node: References, Next: Concept Index, Prev: Contributors, Up: Top + +References +********** + +This is a largely lacunary list of introductory references. + + * MPFR team (SPACES project, INRIA Lorraine and LORIA), "MPFR. The + Multiple Precision Floating-Point Reliable Library", available at + 'http://www.mpfr.org'. + + * The main Web site for interval computations is + . + + * The Web site of the IEEE-1788 working group for the standardization + of interval arithmetic is . + + * G. Alefeld and J. Herzberger, "Introduction to interval analysis", + Academic Press, 1983. + + * R. Baker Kearfott, "Rigorous global search: continuous problems", + Kluwer, 1996. + + * T. Hickey and Q. Ju and M. H. Van Emden, "Interval arithmetic: From + principles to implementation", Journal of the ACM, vol. 48, no 4, + pp 1038-1068, September 2001. + + * E. Hansen, "Global optimization using interval analysis", Marcel + Dekker, 1992. + + * A. Neumaier, "Interval methods for systems of equations", Cambridge + University Press, 1990. + + * H. Ratschek and J. Rokne, "New computer methods for global + optimization", Ellis Horwood Ltd, 1988. + + * N. Revol and F. Rouillier, "Motivations for an arbitrary precision + interval arithmetic and the MPFI library", Reliable Computing, vol. + 11, no 4, pp 275-290, 2005. + + +File: mpfi.info, Node: Concept Index, Next: Function Index, Prev: References, Up: Top + +Concept Index +************* + +[index] +* Menu: + +* Arithmetic functions: Interval Arithmetic. (line 6) +* Comparison functions: Interval Comparison. (line 6) +* Conditions for copying MPFI: Copying. (line 6) +* Conversion functions: Converting Intervals. (line 6) +* Copying conditions: Copying. (line 6) +* Error handling: Error Handling. (line 6) +* Floating-point number: MPFI Basics. (line 48) +* Functions operating on endpoints: Operating on the Endpoints. + (line 6) +* I/O functions: I/O of Intervals. (line 6) +* Initialization and assignment functions: Simultaneous Interval Init & Assign. + (line 6) +* Input functions: I/O of Intervals. (line 6) +* Installation: Installing MPFI. (line 6) +* Interval: MPFI Basics. (line 20) +* Interval arithmetic functions: Interval Arithmetic. (line 6) +* Interval assignment functions: Assigning Intervals. (line 6) +* Interval comparisons functions: Interval Comparison. (line 6) +* Interval functions: Interval Functions. (line 6) +* Interval functions with floating-point results: Floating-point Quantities. + (line 6) +* Interval initialization functions: Initializing Intervals. + (line 6) +* Interval input and output functions: I/O of Intervals. (line 6) +* Miscellaneous interval functions: Miscellaneous Interval Functions. + (line 6) +* mpfi.h: MPFI Basics. (line 6) +* Output functions: I/O of Intervals. (line 6) +* Precision: MPFI Basics. (line 52) +* Precision <1>: Precision Handling. (line 3) +* Reporting bugs: Reporting Bugs. (line 6) +* Return values: Return Values. (line 3) +* Set functions on intervals: Set Operations. (line 6) +* Special functions: Special Functions. (line 6) +* User-defined precision: Interval Functions. (line 18) + + +File: mpfi.info, Node: Function Index, Prev: Concept Index, Up: Top + +Function and Type Index +*********************** + +[index] +* Menu: + +* mpfi_abs: Interval Arithmetic. (line 116) +* mpfi_acos: Special Functions. (line 42) +* mpfi_acosh: Special Functions. (line 69) +* mpfi_add: Interval Arithmetic. (line 6) +* mpfi_add_d: Interval Arithmetic. (line 7) +* mpfi_add_fr: Interval Arithmetic. (line 13) +* mpfi_add_q: Interval Arithmetic. (line 12) +* mpfi_add_si: Interval Arithmetic. (line 10) +* mpfi_add_ui: Interval Arithmetic. (line 8) +* mpfi_add_z: Interval Arithmetic. (line 11) +* mpfi_alea: Floating-point Quantities. + (line 49) +* mpfi_asin: Special Functions. (line 43) +* mpfi_asinh: Special Functions. (line 70) +* mpfi_atan: Special Functions. (line 44) +* mpfi_atan2: Special Functions. (line 49) +* mpfi_atanh: Special Functions. (line 71) +* mpfi_bisect: Miscellaneous Interval Functions. + (line 17) +* mpfi_blow: Miscellaneous Interval Functions. + (line 11) +* MPFI_BOTH_ARE_EXACT: Return Values. (line 18) +* MPFI_BOTH_ARE_INEXACT: Return Values. (line 20) +* mpfi_bounded_p: Interval Comparison. (line 62) +* mpfi_cbrt: Interval Arithmetic. (line 112) +* mpfi_clear: Initializing Intervals. + (line 31) +* mpfi_clears: Initializing Intervals. + (line 67) +* mpfi_cmp: Interval Comparison. (line 15) +* mpfi_cmp_d: Interval Comparison. (line 16) +* mpfi_cmp_fr: Interval Comparison. (line 21) +* mpfi_cmp_q: Interval Comparison. (line 20) +* mpfi_cmp_si: Interval Comparison. (line 18) +* mpfi_cmp_ui: Interval Comparison. (line 17) +* mpfi_cmp_z: Interval Comparison. (line 19) +* mpfi_const_catalan: Special Functions. (line 114) +* mpfi_const_euler: Special Functions. (line 113) +* mpfi_const_log2: Special Functions. (line 111) +* mpfi_const_pi: Special Functions. (line 112) +* mpfi_cos: Special Functions. (line 28) +* mpfi_cosh: Special Functions. (line 54) +* mpfi_cot: Special Functions. (line 37) +* mpfi_coth: Special Functions. (line 64) +* mpfi_csc: Special Functions. (line 36) +* mpfi_csch: Special Functions. (line 63) +* mpfi_diam: Floating-point Quantities. + (line 25) +* mpfi_diam_abs: Floating-point Quantities. + (line 9) +* mpfi_diam_rel: Floating-point Quantities. + (line 16) +* mpfi_div: Interval Arithmetic. (line 57) +* mpfi_div_2exp: Interval Arithmetic. (line 135) +* mpfi_div_2si: Interval Arithmetic. (line 139) +* mpfi_div_2ui: Interval Arithmetic. (line 137) +* mpfi_div_d: Interval Arithmetic. (line 58) +* mpfi_div_ext: Interval Arithmetic. (line 75) +* mpfi_div_fr: Interval Arithmetic. (line 70) +* mpfi_div_q: Interval Arithmetic. (line 68) +* mpfi_div_si: Interval Arithmetic. (line 64) +* mpfi_div_ui: Interval Arithmetic. (line 60) +* mpfi_div_z: Interval Arithmetic. (line 66) +* mpfi_d_div: Interval Arithmetic. (line 59) +* mpfi_d_sub: Interval Arithmetic. (line 19) +* mpfi_erandom: Floating-point Quantities. + (line 77) +* MPFI_ERROR: Error Handling. (line 6) +* mpfi_exp: Special Functions. (line 15) +* mpfi_exp10: Special Functions. (line 24) +* mpfi_exp10m1: Special Functions. (line 94) +* mpfi_exp2: Special Functions. (line 20) +* mpfi_exp2m1: Special Functions. (line 93) +* mpfi_expm1: Special Functions. (line 88) +* MPFI_FLAGS_BOTH_ENDPOINTS_EXACT: Return Values. (line 10) +* MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT: Return Values. (line 14) +* MPFI_FLAGS_LEFT_ENDPOINT_INEXACT: Return Values. (line 10) +* MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT: Return Values. (line 12) +* mpfi_fr_div: Interval Arithmetic. (line 71) +* mpfi_fr_sub: Interval Arithmetic. (line 31) +* mpfi_get_d: Converting Intervals. + (line 6) +* mpfi_get_fr: Converting Intervals. + (line 10) +* mpfi_get_left: Operating on the Endpoints. + (line 6) +* mpfi_get_prec: Precision Handling. (line 42) +* mpfi_get_right: Operating on the Endpoints. + (line 11) +* mpfi_get_version: Miscellaneous Interval Functions. + (line 23) +* mpfi_has_zero: Interval Comparison. (line 50) +* mpfi_hypot: Special Functions. (line 106) +* mpfi_increase: Miscellaneous Interval Functions. + (line 6) +* mpfi_inf_p: Interval Comparison. (line 58) +* mpfi_init: Initializing Intervals. + (line 10) +* mpfi_init2: Initializing Intervals. + (line 22) +* mpfi_inits: Initializing Intervals. + (line 47) +* mpfi_inits2: Initializing Intervals. + (line 59) +* mpfi_init_set: Simultaneous Interval Init & Assign. + (line 6) +* mpfi_init_set_d: Simultaneous Interval Init & Assign. + (line 9) +* mpfi_init_set_fr: Simultaneous Interval Init & Assign. + (line 12) +* mpfi_init_set_q: Simultaneous Interval Init & Assign. + (line 11) +* mpfi_init_set_si: Simultaneous Interval Init & Assign. + (line 8) +* mpfi_init_set_str: Simultaneous Interval Init & Assign. + (line 19) +* mpfi_init_set_ui: Simultaneous Interval Init & Assign. + (line 7) +* mpfi_init_set_z: Simultaneous Interval Init & Assign. + (line 10) +* mpfi_inp_str: I/O of Intervals. (line 46) +* mpfi_intersect: Set Operations. (line 26) +* mpfi_interv_d: Operating on the Endpoints. + (line 36) +* mpfi_interv_fr: Operating on the Endpoints. + (line 43) +* mpfi_interv_q: Operating on the Endpoints. + (line 42) +* mpfi_interv_si: Operating on the Endpoints. + (line 39) +* mpfi_interv_ui: Operating on the Endpoints. + (line 37) +* mpfi_interv_z: Operating on the Endpoints. + (line 41) +* mpfi_inv: Interval Arithmetic. (line 96) +* mpfi_is_empty: Set Operations. (line 20) +* mpfi_is_error: Error Handling. (line 11) +* mpfi_is_inside: Set Operations. (line 10) +* mpfi_is_inside_d: Set Operations. (line 11) +* mpfi_is_inside_fr: Set Operations. (line 16) +* mpfi_is_inside_q: Set Operations. (line 15) +* mpfi_is_inside_si: Set Operations. (line 13) +* mpfi_is_inside_ui: Set Operations. (line 12) +* mpfi_is_inside_z: Set Operations. (line 14) +* mpfi_is_neg: Interval Comparison. (line 37) +* mpfi_is_nonneg: Interval Comparison. (line 34) +* mpfi_is_nonpos: Interval Comparison. (line 44) +* mpfi_is_pos: Interval Comparison. (line 27) +* mpfi_is_strictly_inside: Set Operations. (line 6) +* mpfi_is_strictly_neg: Interval Comparison. (line 41) +* mpfi_is_strictly_pos: Interval Comparison. (line 31) +* mpfi_is_zero: Interval Comparison. (line 47) +* MPFI_LEFT_IS_INEXACT: Return Values. (line 18) +* mpfi_log: Special Functions. (line 9) +* mpfi_log10: Special Functions. (line 100) +* mpfi_log10p1: Special Functions. (line 83) +* mpfi_log1p: Special Functions. (line 76) +* mpfi_log2: Special Functions. (line 99) +* mpfi_log2p1: Special Functions. (line 82) +* mpfi_mag: Floating-point Quantities. + (line 32) +* mpfi_mid: Floating-point Quantities. + (line 44) +* mpfi_mig: Floating-point Quantities. + (line 38) +* mpfi_mul: Interval Arithmetic. (line 35) +* mpfi_mul_2exp: Interval Arithmetic. (line 121) +* mpfi_mul_2si: Interval Arithmetic. (line 125) +* mpfi_mul_2ui: Interval Arithmetic. (line 123) +* mpfi_mul_d: Interval Arithmetic. (line 36) +* mpfi_mul_fr: Interval Arithmetic. (line 42) +* mpfi_mul_q: Interval Arithmetic. (line 41) +* mpfi_mul_si: Interval Arithmetic. (line 39) +* mpfi_mul_ui: Interval Arithmetic. (line 37) +* mpfi_mul_z: Interval Arithmetic. (line 40) +* mpfi_nan_p: Interval Comparison. (line 54) +* mpfi_neg: Interval Arithmetic. (line 85) +* mpfi_nrandom: Floating-point Quantities. + (line 65) +* mpfi_out_str: I/O of Intervals. (line 20) +* mpfi_print_binary: I/O of Intervals. (line 63) +* mpfi_put: Operating on the Endpoints. + (line 24) +* mpfi_put_d: Operating on the Endpoints. + (line 25) +* mpfi_put_fr: Operating on the Endpoints. + (line 30) +* mpfi_put_q: Operating on the Endpoints. + (line 29) +* mpfi_put_si: Operating on the Endpoints. + (line 27) +* mpfi_put_ui: Operating on the Endpoints. + (line 26) +* mpfi_put_z: Operating on the Endpoints. + (line 28) +* mpfi_q_div: Interval Arithmetic. (line 69) +* mpfi_q_sub: Interval Arithmetic. (line 29) +* mpfi_rec_sqrt: Interval Arithmetic. (line 107) +* mpfi_reset_error: Error Handling. (line 17) +* mpfi_revert_if_needed: Operating on the Endpoints. + (line 19) +* MPFI_RIGHT_IS_INEXACT: Return Values. (line 19) +* mpfi_round_prec: Precision Handling. (line 48) +* mpfi_sec: Special Functions. (line 35) +* mpfi_sech: Special Functions. (line 62) +* mpfi_set: Assigning Intervals. (line 9) +* mpfi_set_d: Assigning Intervals. (line 12) +* mpfi_set_error: Error Handling. (line 14) +* mpfi_set_flt: Assigning Intervals. (line 13) +* mpfi_set_fr: Assigning Intervals. (line 17) +* mpfi_set_ld: Assigning Intervals. (line 14) +* mpfi_set_prec: Precision Handling. (line 32) +* mpfi_set_q: Assigning Intervals. (line 16) +* mpfi_set_si: Assigning Intervals. (line 11) +* mpfi_set_str: Assigning Intervals. (line 27) +* mpfi_set_ui: Assigning Intervals. (line 10) +* mpfi_set_z: Assigning Intervals. (line 15) +* mpfi_sin: Special Functions. (line 29) +* mpfi_sinh: Special Functions. (line 55) +* mpfi_si_div: Interval Arithmetic. (line 65) +* mpfi_si_sub: Interval Arithmetic. (line 25) +* mpfi_sqr: Interval Arithmetic. (line 89) +* mpfi_sqrt: Interval Arithmetic. (line 102) +* mpfi_sub: Interval Arithmetic. (line 17) +* mpfi_sub_d: Interval Arithmetic. (line 18) +* mpfi_sub_fr: Interval Arithmetic. (line 30) +* mpfi_sub_q: Interval Arithmetic. (line 28) +* mpfi_sub_si: Interval Arithmetic. (line 24) +* mpfi_sub_ui: Interval Arithmetic. (line 20) +* mpfi_sub_z: Interval Arithmetic. (line 26) +* mpfi_swap: Assigning Intervals. (line 39) +* mpfi_t: MPFI Basics. (line 20) +* mpfi_t <1>: MPFI Basics. (line 66) +* mpfi_tan: Special Functions. (line 30) +* mpfi_tanh: Special Functions. (line 56) +* mpfi_ui_div: Interval Arithmetic. (line 62) +* mpfi_ui_sub: Interval Arithmetic. (line 22) +* mpfi_union: Set Operations. (line 33) +* mpfi_urandom: Floating-point Quantities. + (line 56) +* mpfi_z_div: Interval Arithmetic. (line 67) +* mpfi_z_sub: Interval Arithmetic. (line 27) +* mpfr_get_default_prec: Precision Handling. (line 23) +* mpfr_prec_t: MPFI Basics. (line 52) +* mpfr_set_default_prec: Precision Handling. (line 10) +* mpfr_t: MPFI Basics. (line 48) + + + +Tag Table: +Node: Top1278 +Node: Copying2348 +Node: Introduction to MPFI4144 +Node: Installing MPFI5445 +Node: Reporting Bugs9273 +Node: MPFI Basics10636 +Ref: MPFI Basics-Footnote-114946 +Node: Interval Functions15273 +Node: Return Values16513 +Node: Precision Handling17476 +Node: Initializing and Assigning Intervals20341 +Node: Initializing Intervals20681 +Node: Assigning Intervals24714 +Node: Simultaneous Interval Init & Assign26932 +Node: Floating-point Quantities28198 +Node: Converting Intervals32260 +Node: Interval Arithmetic32735 +Node: Special Functions40053 +Node: Interval Comparison45707 +Node: I/O of Intervals48538 +Node: Operating on the Endpoints51900 +Node: Set Operations54374 +Node: Miscellaneous Interval Functions56285 +Node: Error Handling57520 +Node: Contributors58128 +Node: References58483 +Node: Concept Index59931 +Node: Function Index62631 + +End Tag Table + + +Local Variables: +coding: utf-8 +End: diff --git a/Build/source/libs/mpfi/mpfi-src/doc/mpfi.texi b/Build/source/libs/mpfi/mpfi-src/doc/mpfi.texi new file mode 100644 index 00000000000..17eec187aeb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/doc/mpfi.texi @@ -0,0 +1,1791 @@ +\input texinfo @c -*-texinfo-*- +@c %**start of header +@setfilename mpfi.info +@settitle MPFI 1.5.4. +@synindex tp fn +@iftex +@afourpaper +@end iftex +@comment %**end of header + +@dircategory Software libraries +@direntry +* mpfi: (mpfi.info). Multiple Precision Floating-Point Interval Library. +@end direntry + +@c smallbook + +@iftex +@finalout +@end iftex + +@c Note: the edition number is listed in *three* places; please update +@c all three. Also, update the month and year where appropriate. + +@c ==> Update edition number for settitle and subtitle, and in the +@c ==> following paragraph; update date, too. + + +@ifinfo +This file documents MPFI, a library for interval arithmetic, +which is built upon the MPFR multiple precision floating-point +arithmetic library + +Copyright (C) 2002-2022, Ouragan team, Inria Paris, France, +Arenaire team and AriC team, INRIA Rhône-Alpes and INRIA Lyon and LIP, ENS Lyon, France, +and Lab. ANO, University of Sciences and Technologies of Lille, France. + +Permission is granted to make and distribute verbatim copies of +this manual provided the copyright notice and this permission notice +are preserved on all copies. + +@ignore +Permission is granted to process this file through TeX and print the +results, provided the printed document carries copying permission +notice identical to this one except for the removal of this paragraph +(this paragraph not being relevant to the printed manual). + +@end ignore +Permission is granted to copy and distribute modified versions of this +manual under the conditions for verbatim copying, provided that the entire +resulting derived work is distributed under the terms of a permission +notice identical to this one. + +Permission is granted to copy and distribute translations of this manual +into another language, under the above conditions for modified versions, +except that this permission notice may be stated in a translation approved +by the Free Software Foundation. +@end ifinfo + +@setchapternewpage on +@titlepage +@c use the new format for titles + +@title MPFI 1.5.4. +@subtitle Multiple Precision Floating-Point Interval Library +@subtitle March 2022 + +@author AriC, INRIA Grenoble - Rhône-Alpes and INRIA Lyon, +@author Spaces, INRIA Lorraine, +@author Arenaire, INRIA Rhone-Alpes, +@author Lab. ANO, USTL (Univ. of Lille) + +@c Include the Distribution inside the titlepage so +@c that headings are turned off. + +@tex +\global\parindent=0pt +\global\parskip=8pt +\global\baselineskip=13pt +@end tex + +@page +@vskip 0pt plus 1filll +@c Copyright @copyright{} 2002-2022 Spaces, Arenaire and AriC INRIA projects, Lab. ANO - USTL + +@sp 2 + +Permission is granted to make and distribute verbatim copies of +this manual provided the copyright notice and this permission notice +are preserved on all copies. + +Permission is granted to copy and distribute modified versions of this +manual under the conditions for verbatim copying, provided that the entire +resulting derived work is distributed under the terms of a permission +notice identical to this one. + +Permission is granted to copy and distribute translations of this manual +into another language, under the above conditions for modified versions, +except that this permission notice may be stated in a translation approved +by the Free Software Foundation. +@end titlepage +@headings double + +@ifinfo +@node Top, Copying, (dir), (dir) + +@top MPFI 1.5.4. + +This manual documents how to install and use the Multiple Precision +Floating-Point Interval Library + +@end ifinfo + +@menu +* Copying:: +* Introduction to MPFI:: +* Installing MPFI:: +* Reporting Bugs:: +* MPFI Basics:: +* Interval Functions:: +* Contributors:: +* References:: +* Concept Index:: +* Function Index:: + +Interval Functions + + +Initialization and Assignment Functions + +* Initializing Intervals:: +* Assigning Intervals:: +* Simultaneous Interval Init & Assign:: + +@detailmenu + --- The Detailed Node Listing --- + +Interval Functions + +* Return Values:: +* Precision Handling:: +* Initializing and Assigning Intervals:: +* Floating-point Quantities:: +* Converting Intervals:: +* Interval Arithmetic:: +* Special Functions:: +* Interval Comparison:: +* I/O of Intervals:: +* Operating on the Endpoints:: +* Set Operations:: +* Miscellaneous Interval Functions:: +* Error Handling:: + +Initialization and Assignment Functions + +* Initializing Intervals:: +* Assigning Intervals:: +* Simultaneous Interval Init & Assign:: + +@end detailmenu +@end menu + +@node Copying, Introduction to MPFI, Top, Top +@comment node-name, next, previous, up +@unnumbered MPFI Copying Conditions +@cindex Copying conditions +@cindex Conditions for copying MPFI + +This library is @dfn{free}; this means that everyone is free to use it and +free to redistribute it on a free basis. The library is not in the public +domain; it is copyrighted and there are restrictions on its distribution, but +these restrictions are designed to permit everything that a good cooperating +citizen would want to do. What is not allowed is to try to prevent others +from further sharing any version of this library that they might get from +you.@refill + +Specifically, we want to make sure that you have the right to give away copies +of the library, that you receive source code or else can get it if you want +it, that you can change this library or use pieces of it in new free programs, +and that you know you can do these things.@refill + +To make sure that everyone has such rights, we have to forbid you to deprive +anyone else of these rights. For example, if you distribute copies of the +MPFI library, you must give the recipients all the rights that you have. You +must make sure that they, too, receive or can get the source code. And you +must tell them their rights.@refill + +Also, for our own protection, we must make certain that everyone finds out +that there is no warranty for the MPFI library. If it is modified by +someone else and passed on, we want their recipients to know that what they +have is not what we distributed, so that any problems introduced by others +will not reflect on our reputation.@refill + +The precise conditions of the license for the MPFI library are found in the +Lesser General Public License that accompany the source code. +As MPFI is built upon MPFR and share its license, +see the file COPYING.LESSER in the main MPFR directory.@refill + +@node Introduction to MPFI, Installing MPFI, Copying, Top +@comment node-name, next, previous, up +@chapter Introduction to MPFI + + +MPFI is intended to be a portable library written in C for arbitrary precision +interval arithmetic with intervals represented using MPFR reliable +floating-point numbers. It is based on the GNU MP library and on the MPFR +library. The purpose of an arbitrary precision interval arithmetic is on the +one hand to get @dfn{guaranteed} results, thanks to interval computation, and +on the other hand to obtain accurate results, thanks to multiple precision +arithmetic. The MPFI library is built upon MPFR in order to benefit from the +correct rounding provided, for each operation or function, by MPFR. Further +advantages of using MPFR are its portability and compliance with the IEEE 754 +standard for floating-point arithmetic. + + +This version of MPFI is released under the GNU Lesser General Public +License. +It is permitted to link MPFI to non-free programs, as long as when +distributing them the MPFI source code and a means to re-link with a +modified MPFI is provided. + +As interval arithmetic has been standardized, see the IEEE 1788-2015 standard, +the next version of MPFI +will evolve in order to incorporate the standardized definitions and behaviours. + + +@c @section How to use this Manual +@c +@c Everyone should read @ref{MPFI Basics}. If you need to install the library +@c yourself, you need to read @ref{Installing MPFI}, too. +@c +@c The rest of the manual can be used for later reference, although it is +@c probably a good idea to glance through it. + + +@node Installing MPFI, Reporting Bugs, Introduction to MPFI, Top +@comment node-name, next, previous, up +@chapter Installing MPFI +@cindex Installation + +To build MPFI, you first have to install MPFR (version 4.0.1 or above) +on your computer. +You need a C compiler, preferably GCC, but any reasonable compiler +should work. +And you need a standard Unix @samp{make} program, plus some other +standard Unix utility programs. + +@section How to Install + +Here are the steps needed to install the MPFI library on Unix systems. +In the MPFI source directory, type the following commands. + +@enumerate +@item +@samp{./configure} + +This will prepare the build and setup the options according to your system. +You can give options to specify the install directories (instead of the +default @file{/usr/local}), and so on. + +You can specify the path to GMP and MPFR libraries with configure +options: @samp{--with-gmp=DIR} assumes that GMP is installed in the +@samp{DIR} directory. +Alternatively, you can use the @samp{--with-gmp-lib=DIR} and +@samp{--with-gmp-include=DIR} to specify respectively the GMP lib and GMP +include directories. +Options @samp{--with-mpfr=DIR}, @samp{--with-mpfr-include=DIR}, and +@samp{--with-mpfr-lib=DIR} have the same usage for the MPFR library. + +See the @file{INSTALL} file and the output of @samp{./configure +--help} for a description of standard options. + +@item +@samp{make} + +This will compile MPFI, and create a library archive file @file{libmpfi.a}. +On most platforms, a dynamic library will be produced too. + +@item +@samp{make check} + +This will make sure MPFI was built correctly. +If any test fails, information about this failure can be found in the +@file{tests/test-suite.log} file. If you want the contents of this file to +be automatically output in case of failure, you can set the @samp{VERBOSE} +environment variable to 1 before running @samp{make check}, for instance +by typing: + +@samp{VERBOSE=1 make check} + +If you get error messages from the test program, please +report this to +@samp{mpfi-users@@inria.fr}. +(@xref{Reporting Bugs}, for information on what to include in useful +bug reports.) + +@item +@samp{make install} + +This will copy +the file @file{mpfi.h} to the directory @file{/usr/local/include}, +the library files (@file{libmpfi.a} and possibly others) to the directory +@file{/usr/local/lib}, +the file @file{mpfi.info} to the directory @file{/usr/local/share/info}, +and some other documentation files to the directory +@file{/usr/local/share/doc/mpfi} +(or if you passed the @samp{--prefix} option to @file{configure}, +using the prefix directory given as argument to @samp{--prefix} +instead of @file{/usr/local}). +@end enumerate + +@section Other `make' targets + +There are some other useful make targets: + +@itemize @bullet +@item +@samp{info} + +Create an info version of the manual, in @file{mpfi.info}. + +This file is already provided in the MPFI archives. + +@item +@samp{pdf} + +Create a PDF version of the manual, in @file{mpfi.pdf}. + +@item +@samp{dvi} + +Create a DVI version of the manual, in @file{mpfi.dvi}. + +@item +@samp{ps} + +Create a Postscript version of the manual, in @file{mpfi.ps}. + +@item +@samp{html} +Create a HTML version of the manual, in @file{mpfi.html}. + +@item +@samp{clean} + +Delete all object files and archive files, but not the configuration files. + +@item +@samp{uninstall} +Delete all files copied by @samp{make install}. +@end itemize + + +@section Known Build Problems + +The installation procedure and MPFI itself have been tested +only on some Linux distributions. +Since it has not been intensively tested, +you may discover that +MPFI suffers from all bugs of the underlying libraries, plus many many more. + +Please report any problem to @samp{mpfi-users@@inria.fr}. +@xref{Reporting Bugs}. + +@section Getting the Latest Version of MPFI + +The latest version of MPFI is available from +@url{https://gitlab.inria.fr/mpfi/mpfi/}. + + +@node Reporting Bugs, MPFI Basics, Installing MPFI, Top +@comment node-name, next, previous, up +@chapter Reporting Bugs +@cindex Reporting bugs + +If you think you have found a bug in the MPFI library, please investigate it +and report it. We have made this library available to you, and we expect +you will report the bugs that you find. + +There are a few things you should think about when you put your bug report +together. + +You have to send us a test case that makes it possible for us to reproduce the +bug. Include instructions on how to run the test case. + +You also have to explain what is wrong; if you get a crash, or if the results +printed are incorrect and in that case, in what way. + +Please include compiler version information +in your bug report. This can be extracted using @samp{cc -V} on some machines or, +if you're using gcc, @samp{gcc -v}. Also, include the output from @samp{uname +-a}, along with the version of GMP and of MPFR you use. + +If your bug report is good, we will do our best to help you to get a corrected +version of the library; if the bug report is poor, we won't do anything about +it (except kidding you for sending poor bug reports). + +Send your bug report to: @samp{mpfi-users@@inria.fr}. + +If you think something in this manual is unclear, or downright incorrect, or if +the language needs to be improved, please send a note to the same address. + + +@node MPFI Basics, Interval Functions, Reporting Bugs, Top +@comment node-name, next, previous, up +@chapter MPFI Basics + + +@cindex @file{mpfi.h} +All declarations needed to use MPFI are collected in the include file +@file{mpfi.h}. The declarations useful for inputs and outputs are to be found +in @file{mpfi_io.h}. It is designed to work with both C and C++ compilers. +You should include these files in any program using the MPFI library: + +@example +#include "mpfi.h" +#include "mpfi_io.h" +@end example + +@section Nomenclature and Types + +As MPFI is built upon MPFR, it is advisable to read MPFR's manual first. + +@cindex Interval +@tindex @code{mpfi_t} +@noindent +An @dfn{interval} is a closed connected set of real numbers, it is represented +in MPFI by its endpoints which are MPFR floating-point numbers. +The C data type for these objects is @code{mpfi_t}. + +MPFI functions operate on valid intervals (defined below), their behavior with +non-valid intervals as input is undefined. +@itemize +@item +A @dfn{valid interval} can have finite or infinite endpoints, but its left +endpoint is not larger than its right endpoint and cannot be +infinity or -0 +(respectively, the right endpoint cannot be -infinity or +0). @footnote{The +restriction on the infinite values follows the definition of interval, and the +sign of the zero bounds allows a simple implementation of the four arithmetic +operations as explained in the paper of T. Hickey, Q. Ju, and M. H. Van Emden, +@cite{Interval arithmetic: From principles to implementation} +(@xref{References}).} As a consequence, the unique representation of the zero +singleton is @math{[+0, -0]}. +@end itemize + +MPFI functions may return intervals that are not valid as input value. Their +semantic defined as follows: +@itemize +@item +One (or both) NaN endpoint(s) indicates that an invalid operation has been +performed and that the resulting interval has no mathematical meaning. +@item +An @dfn{empty interval} has its left endpoint larger than its right endpoint. +@end itemize + +Both the meaning of "invalid operation", the representation of the empty set +and its handling may change in future versions of MPFI, according to the +standardization of interval arithmetic in IEEE-1788. + +Some functions on intervals return a floating-point value: among such +functions are @code{mpfi_get_left} that returns the left endpoint of +an interval and @code{mpfi_diam_abs} that gets the width of the +input interval. + +@cindex Floating-point number +@tindex @code{mpfr_t} +@noindent +A @dfn{Floating point number} or @dfn{Float} for short, is an arbitrary precision +significand (aslso called mantissa) with a limited precision exponent. The C data type for such objects +is @code{mpfr_t}. + +@cindex Precision +@tindex @code{mpfr_prec_t} +@comment a changer en mpfr_prec_t quand on demandera MPFR 3.0.0 ou plus +@noindent +The @dfn{Precision} is the number of bits used to represent the significand +of a floating-point number; +the corresponding C data type is @code{mpfr_prec_t} (renamed +@code{mpfr_prec_t} since MPFR version 3.0.0, both types are +compatible). + +MPFI assumes that both endpoints of an interval use the same precision. +@c The behaviour is undefined if this is not the case. +However when this does not hold, the largest precision is considered. + + +@section Function Classes + +There is only one class of functions in the MPFI library: + +@enumerate +@item +@tindex @code{mpfi_t} +Functions for interval arithmetic based on floating-point numbers, +with names beginning with +@code{mpfi_}. The associated type is @code{mpfi_t}. There are around 170 +functions in this class. +@end enumerate + + +@section MPFI Variable Conventions + +As a general rule, all MPFI functions expect output arguments before input +arguments. This notation is based on an analogy with the assignment operator. + +MPFI allows you to use the same variable for both input and output in the same +expression. For example, the function for the exponential, +@code{mpfi_exp}, can be used like this: @code{mpfi_exp (x, x)}. +This +computes the set of exponentials of every real belonging to @var{x} +and puts the result back in @var{x}. + +Before you can give a value to an MPFI variable, you need to initialize it by calling +one of the special initialization functions. When you're done with a +variable, you need to clear it out, using one of the appropriate +functions. + +A variable should be initialized only once, or at least be cleared out between +different initializations. After a variable has been initialized, it can be +assigned any number of times. + +For efficiency reasons, avoid to initialize and clear out a variable in loops. +Instead, initialize it before entering the loop, and clear it out after +exiting the loop. + +You don't need to be concerned about allocating additional space for MPFI +variables, since any variable uses a memory space of fixed size. +Hence unless you change its precision, or clear and reinitialize it, +an interval variable will have the same allocated space during all its +lifetime. + +@c TO DO later: a section on "Special values and exceptions" and possibly a section on "Memory handling / Multithreading" + +@node Interval Functions, Contributors, MPFI Basics, Top +@comment node-name, next, previous, up +@chapter Interval Functions +@cindex Interval functions + +The interval functions expect arguments of type @code{mpfi_t}. + +The MPFI interval functions have an interface that is close to the +corresponding MPFR +functions. The function prefix for interval operations is +@code{mpfi_}. + +MPFI intervals are represented by their endpoints; this representation +should be invisible to the user, unfortunately it is not... +@c An alternative representation could be to store the center and the +@c radius of the interval. +It is assumed that both endpoints have the +same precision; however when this does not hold, the largest precision +is considered. The user has +to specify the precision of each variable. A computation that assigns a +variable will take place with the precision of the assigned variable. +@cindex User-defined precision +For more information on precision (precision of a variable, +precision of a calculation), see the MPFR documentation. + + +@menu +* Return Values:: +* Precision Handling:: +* Initializing and Assigning Intervals:: +* Floating-point Quantities:: +* Converting Intervals:: +* Interval Arithmetic:: +* Special Functions:: +* Interval Comparison:: +* I/O of Intervals:: +* Operating on the Endpoints:: +* Set Operations:: +* Miscellaneous Interval Functions:: +* Error Handling:: +@end menu + +@comment @node Return Values, Rounding Modes and Precision Handling, Interval Functions, Interval Functions +@node Return Values, Precision Handling, Interval Functions, Interval Functions +@comment node-name, next, previous, up +@cindex Return values +@section Return Values + +Four integer values (of C type @code{int}) +can be returned by a typical @code{mpfi} function. These values +indicate whether none, one or two endpoints of the computed interval are +exact: since they are rounded values, they can differ from the exact +result. Here are their names: +@itemize @bullet +@tindex @code{MPFI_FLAGS_BOTH_ENDPOINTS_EXACT} +@item @code{MPFI_FLAGS_BOTH_ENDPOINTS_EXACT} +@tindex @code{MPFI_FLAGS_LEFT_ENDPOINT_INEXACT} +@item @code{MPFI_FLAGS_LEFT_ENDPOINT_INEXACT}: the left endpoint is inexact +whereas the right endpoint is exact; +@tindex @code{MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT} +@item @code{MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT}: the right endpoint is inexact +whereas the left endpoint is exact; +@tindex @code{MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT} +@item @code{MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT} +@end itemize +To test the exactness of one endpoint, the following functions are available +(their names are self-explanatory): +@itemize @bullet +@tindex @code{MPFI_BOTH_ARE_EXACT} +@item @code{MPFI_BOTH_ARE_EXACT} +@tindex @code{MPFI_LEFT_IS_INEXACT} +@item @code{MPFI_LEFT_IS_INEXACT} +@tindex @code{MPFI_RIGHT_IS_INEXACT} +@item @code{MPFI_RIGHT_IS_INEXACT} +@tindex @code{MPFI_BOTH_ARE_INEXACT} +@item @code{MPFI_BOTH_ARE_INEXACT} +@end itemize + + +@comment @node Rounding Modes and Precision Handling, Initializing and Assigning Intervals, Return Values, Interval Functions +@node Precision Handling, Initializing and Assigning Intervals, Return Values, Interval Functions +@comment node-name, next, previous, up +@comment @cindex Rounding modes +@cindex Precision +@section Precision Handling + +@comment Only two rounding modes are useful when computing with intervals +@comment represented by their endpoints, namely downward and upward roundings +@comment used for outward rounding: +@comment @itemize @bullet +@comment @item @code{MPFI_RNDU}: round towards plus infinity +@comment @item @code{MPFI_RNDD}: round towards minus infinity +@comment @end itemize +@comment The four rounding modes provided by MPFR are still available, +@comment see MPFR documentation to get their names and information on how +@comment to modify them. + +The default computing precision is handled by MPFR, getting or setting +its value is performed using the following MPFR functions +(cf. MPFR documentation): + +@deftypefn Macro void mpfr_set_default_prec (mpfr_prec_t @var{prec}) +Sets the default precision to be @strong{exactly} @var{prec} bits. The +precision of a variable means the number of bits used to store the significands +of its endpoints. +All +subsequent calls to @code{mpfi_init} will use this precision, but previously +initialized variables are unaffected. +This default precision is set to 53 bits initially. +The precision @var{prec} can be any integer between @code{MPFR_PREC_MIN} and +@code{MPFR_PREC_MAX}. + +Note: when MPFR is built with the @samp{--enable-thread-safe} configure option, +the default precision is local to each thread. See MPFR documentation for more information. +@end deftypefn + +@deftypefn Macro mpfr_prec_t mpfr_get_default_prec () +Returns the default MPFR/MPFI precision in bits. +@end deftypefn + +The following two functions are useful for changing the precision during a +calculation. A typical use would be for adjusting the precision gradually in +iterative algorithms like Newton-Raphson, making the computation precision +closely match the actual accurate part of the numbers. + +@deftypefun void mpfi_set_prec (mpfi_t @var{x}, mpfr_prec_t @var{prec}) +Resets the precision of @var{x} to be @strong{exactly} @var{prec} bits. +The previous value stored in @var{x} is lost. It is equivalent to +a call to @code{mpfi_clear(x)} followed by a call to +@code{mpfi_init2(x, prec)}, but more efficient as no allocation is done in +case the current allocated space for the significands of the endpoints +of @var{x} is enough. +The precision @var{prec} can be any integer between @code{MPFR_PREC_MIN} and +@code{MPFR_PREC_MAX}. +In case you want to keep the previous value stored in @var{x}, +use @code{mpfi_round_prec} instead. +@end deftypefun + +@deftypefun mpfr_prec_t mpfi_get_prec (mpfi_t @var{x}) +Return the largest precision actually used for assignments of @var{x}, i.e.\ +the number of bits used to store the significands of its endpoints. +Should the two endpoints have different precisions, the largest one is returned. +@end deftypefun + +@deftypefun int mpfi_round_prec (mpfi_t @var{x}, mpfr_prec_t @var{prec}) +Rounds @var{x} with precision @var{prec}, which +may be different from that of @var{x}. +If @var{prec} is greater or equal to the precision of @var{x}, then new +space is allocated for the endpoints' significands, and they are filled with zeroes. +Otherwise, the significands are rounded outwards to precision @var{prec}. +In both cases, the precision of @var{x} is changed to @var{prec}. +It returns a value indicating whether the possibly rounded endpoints are exact or not, +cf. @ref{Return Values}. +@end deftypefun + +@comment @node Initializing and Assigning Intervals, Floating-point Quantities, Rounding Modes and Precision Handling, Interval Functions +@node Initializing and Assigning Intervals, Floating-point Quantities, Precision Handling, Interval Functions +@comment node-name, next, previous, up +@section Initialization and Assignment Functions + +@menu +* Initializing Intervals:: +* Assigning Intervals:: +* Simultaneous Interval Init & Assign:: +@end menu + +@node Initializing Intervals, Assigning Intervals, Initializing and Assigning Intervals, Initializing and Assigning Intervals +@comment node-name, next, previous, up +@subsection Initialization Functions +@cindex Interval initialization functions + +An @code{mpfi_t} object must be initialized before storing the first value in +it. The functions @code{mpfi_init} and @code{mpfi_init2} are used for that +purpose. + +@deftypefun void mpfi_init (mpfi_t @var{x}) +Initializes @var{x}, and sets its value to NaN, to prevent from using +an unassigned variable inadvertently. +Normally, a variable should be initialized once only +or at least be cleared, using @code{mpfi_clear}, between consecutive +initializations. The +precision of @var{x} is the default precision, which can be changed +by a call to @code{mpfr_set_default_prec}. + +Warning! In a given program, some other libraries might change the default +precision and not restore it. Thus it is safer to use @code{mpfi_init2}. +@end deftypefun + +@deftypefun void mpfi_init2 (mpfi_t @var{x}, mpfr_prec_t @var{prec}) +Initializes @var{x}, sets its precision (or more precisely the precision +of its endpoints) to be @strong{exactly} +@var{prec} bits, and sets its endpoints to NaN. +Normally, a variable should be initialized once only or at +least be cleared, using @code{mpfi_clear}, between consecutive initializations. +To change the precision of a variable which has already been initialized, +use @code{mpfi_set_prec} instead, or @code{mpfi_round_prec} if you want to keep its value. +@end deftypefun + +@deftypefun void mpfi_clear (mpfi_t @var{x}) +Frees the space occupied by the significands of the endpoints of @var{x}. Make sure to call this function for all +@code{mpfi_t} variables when you are done with them. +@end deftypefun + + +@need 2000 +Here is an example on how to initialize interval variables: +@example +@{ + mpfi_t x, y; + mpfi_init (x); /* use default precision */ + mpfi_init2 (y, 256); /* precision @emph{exactly} 256 bits */ + @dots{} + /* Unless the program is about to exit, do ... */ + mpfi_clear (x); + mpfi_clear (y); +@} +@end example + +@deftypefun void mpfi_inits (mpfi_t @var{x}, ...) +Initialize all the @code{mpfi_t} variables of the given @code{va_list}, +set their precision to the default precision and their value to NaN@. +See @code{mpfi_init} for more details. +The @code{va_list} is assumed to be composed only of type @code{mpfi_t} +(or equivalently @code{mpfi_ptr}). +It begins from @var{x}, and ends when it encounters a null pointer (whose +type must also be @code{mpfi_ptr}). + +Warning! In a given program, some other libraries might change the default +precision and not restore it. Thus it is safer to use @code{mpfi_inits2}. +@end deftypefun + +@deftypefun void mpfi_inits2 (mpfr_prec_t @var{prec}, mpfi_t @var{x}, ...) +Initialize all the @code{mpfi_t} variables of the given variable +argument @code{va_list}, set their precision to be @strong{exactly} +@var{prec} bits and their value to NaN@. +See @code{mpfi_init2} for more details. +The @code{va_list} is assumed to be composed only of type @code{mpfi_t} +(or equivalently @code{mpfi_ptr}). +It begins from @var{x}, and ends when it encounters a null pointer (whose +type must also be @code{mpfi_ptr}). +@end deftypefun + +@deftypefun void mpfi_clears (mpfi_t @var{x}, ...) +Free the space occupied by all the @code{mpfi_t} variables of the given +@code{va_list}. See @code{mpfi_clear} for more details. +The @code{va_list} is assumed to be composed only of type @code{mpfi_t} +(or equivalently @code{mpfi_ptr}). +It begins from @var{x}, and ends when it encounters a null pointer (whose +type must also be @code{mpfi_ptr}). +@end deftypefun + +Here is an example of how to use multiple initialization functions +(since @code{NULL} is not necessarily defined in this context, we use +@code{(mpfi_ptr) 0} instead, but @code{(mpfi_ptr) NULL} is also correct). + +@example +@{ + mpfi_t a, b, c; + + mpfi_inits (a, b, c, (mpfi_ptr) 0); /* Use default precision */ + @dots{} + mpfi_clears (a, b, c, (mpfi_ptr) 0); + + /* Another possibility is to specify the precision */ + mpfi_inits2 (200, a, b, c, (mpfi_ptr) 0); /* Use @emph{exactly} 200 bits */ + @dots{} + mpfi_clears (a, b, c, (mpfi_ptr) 0); +@} +@end example + + +@node Assigning Intervals, Simultaneous Interval Init & Assign, Initializing Intervals, Initializing and Assigning Intervals +@comment node-name, next, previous, up +@subsection Assignment Functions +@cindex Interval assignment functions + +These functions assign new values to already initialized intervals +(@pxref{Initializing Intervals}). + +@deftypefun int mpfi_set (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_set_ui (mpfi_t @var{rop}, unsigned long int @var{op}) +@deftypefunx int mpfi_set_si (mpfi_t @var{rop}, long int @var{op}) +@deftypefunx int mpfi_set_d (mpfi_t @var{rop}, double @var{op}) +@deftypefunx int mpfi_set_flt (mpfi_t @var{rop}, float @var{op}) +@deftypefunx int mpfi_set_ld (mpfi_t @var{rop}, long double @var{op}) +@deftypefunx int mpfi_set_z (mpfi_t @var{rop}, mpz_t @var{op}) +@deftypefunx int mpfi_set_q (mpfi_t @var{rop}, mpq_t @var{op}) +@deftypefunx int mpfi_set_fr (mpfi_t @var{rop}, mpfr_t @var{op}) +Sets the value of @var{rop} from @var{op}, rounded outward to the precision of @var{rop}: +@var{op} then belongs to @var{rop}. +The returned value indicates whether none, one or both endpoints are exact. +Please note that even a @code{long int} may have to be rounded, +if the destination precision is less than the machine word width. + +No support (yet) for huge (signed or unsigned) integer, nor for float128, nor for decimal64. +@end deftypefun + +@deftypefun int mpfi_set_str (mpfi_t @var{rop}, char *@var{s}, int @var{base}) +Sets @var{rop} to the value of the string @var{s}, in base @var{base} (between +2 and 36), outward rounded to the precision of @var{rop}: +@var{op} then belongs to @var{rop}. +The exponent is read in decimal. +The string is of the form @samp{number} or +@samp{[ number1 , number 2 ]}. +@c where the spaces around the floating-point endpoints are mandatory. +Each endpoint has the form @samp{M@@N} or, if the +base is 10 or less, alternatively @samp{MeN} or @samp{MEN}. +@samp{M} is the significand and +@samp{N} is the exponent. The significand is always in the specified base. The +exponent is +@c either in the specified base or, if @var{base} is negative, +in decimal. +The argument @var{base} may be in the ranges 2 to 36. + +This function returns 1 if the input is incorrect, and 0 otherwise. +@end deftypefun + +@deftypefun void mpfi_swap (mpfi_t @var{x}, mpfi_t @var{y}) +Swaps the values @var{x} and @var{y} efficiently. Warning: the +precisions are exchanged too; in case the precisions are different, +@code{mpfi_swap} is thus not equivalent to three @code{mpfi_set} calls +using a third auxiliary variable. +@end deftypefun + +@node Simultaneous Interval Init & Assign, , Assigning Intervals, Initializing and Assigning Intervals +@comment node-name, next, previous, up +@subsection Combined Initialization and Assignment Functions +@cindex Initialization and assignment functions + +@deftypefun int mpfi_init_set (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_init_set_ui (mpfi_t @var{rop}, unsigned long int @var{op}) +@deftypefunx int mpfi_init_set_si (mpfi_t @var{rop}, long int @var{op}) +@deftypefunx int mpfi_init_set_d (mpfi_t @var{rop}, double @var{op}) +@deftypefunx int mpfi_init_set_z (mpfi_t @var{rop}, mpz_t @var{op}) +@deftypefunx int mpfi_init_set_q (mpfi_t @var{rop}, mpq_t @var{op}) +@deftypefunx int mpfi_init_set_fr (mpfi_t @var{rop}, mpfr_t @var{op}) +Initializes @var{rop} and sets its value from @var{op}, outward rounded so +that @var{op} belongs to @var{rop}. +The precision of @var{rop} will be taken from the active default precision, +as set by @code{mpfr_set_default_prec}. +The returned value indicates whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_init_set_str (mpfi_t @var{rop}, char *@var{s}, int @var{base}) +Initializes @var{rop} and sets its value +to the value of the string @var{s}, in base @var{base} (between +2 and 36), outward rounded to the precision of @var{rop}: +@var{op} then belongs to @var{rop}. The exponent is read in decimal. +See @code{mpfi_set_str}. +@end deftypefun + + +@node Floating-point Quantities, Converting Intervals, Initializing and Assigning Intervals, Interval Functions +@comment node-name, next, previous, up +@section Interval Functions with Floating-point Results +@cindex Interval functions with floating-point results + +Some functions on intervals return floating-point results, +such as the center or the width, also called diameter, of an interval. + +@deftypefun int mpfi_diam_abs (mpfr_t @var{rop}, mpfi_t @var{op}) +Sets the value of @var{rop} to the upward rounded diameter of @var{op}, +or in other words to the upward rounded difference between the right endpoint +of @var{op} and its left endpoint. +Returns 0 if the diameter is exact and a positive value if the rounded +value is greater than the exact diameter. +@end deftypefun + +@deftypefun int mpfi_diam_rel (mpfr_t @var{rop}, mpfi_t @var{op}) +Sets the value of @var{rop} to the upward rounded relative diameter of @var{op}, +or in other words to the upward rounded difference between the right endpoint +of @var{op} and its left endpoint, divided by the absolute value +of the center of @var{op} if it is not zero. +Returns 0 if the result is exact and a positive value if the returned value +is an overestimation, in this case the returned value may not be the correct +rounding of the exact value. +@end deftypefun + +@deftypefun int mpfi_diam (mpfr_t @var{rop}, mpfi_t @var{op}) +Sets the value of @var{rop} to the relative diameter of @var{op} +if @var{op} does not contain zero and to its absolute diameter otherwise. +Returns 0 if the result is exact and a positive value if the returned value +is an overestimation, it may not be the correct rounding of the exact value +in the latter case. +@end deftypefun + +@deftypefun int mpfi_mag (mpfr_t rop, mpfi_t op) +Sets the value of @var{rop} to the magnitude of @var{op}, +i.e.\ to the largest absolute value of the elements of @var{op}. +Returns 0 if the result is exact and a positive value if the returned value +is an overestimation. +@end deftypefun + +@deftypefun int mpfi_mig (mpfr_t rop, mpfi_t op) +Sets the value of @var{rop} to the mignitude of @var{op}, +i.e.\ to the smallest absolute value of the elements of @var{op}. +Returns 0 if the result is exact and a negative value if the returned value +is an underestimation. +@end deftypefun + +@deftypefun int mpfi_mid (mpfr_t rop, mpfi_t op) +Sets @var{rop} to the middle of @var{op}. +Returns 0 if the result is exact, a positive value if @var{rop} > the +middle of @var{op} and a negative value if @var{rop} < the middle of @var{op}. +@end deftypefun + +@deftypefun void mpfi_alea (mpfr_t rop, mpfi_t op) +Sets @var{rop} to a floating-point number +picked up at random in @var{op}, according to a uniform distribution. + +This function is deprecated and may disappear in future versions of MPFI; +@code{mpfi_urandom} should be used instead. +@end deftypefun + +@deftypefun void mpfi_urandom (mpfr_t rop, mpfi_t op, gmp_randstate_t state) +Sets @var{rop} to a floating-point number picked up at random in +@var{op}, according to a uniform distribution. + +The argument @var{state} should be initialized with one of the GMP +random state initialization functions +@ifinfo +(@pxref{Random State Initialization,,, gmp.info,GNU MP}). +@end ifinfo +@ifnotinfo +(see Section ``Random State Initialization'' in @cite{GNU MP} manual). +@end ifnotinfo +@end deftypefun + +@deftypefun void mpfi_nrandom (mpfr_t rop, mpfi_t op, gmp_randstate_t state) +Sets @var{rop} to a floating-point number picked up at random in +@var{op}, according to a normal distribution. + +The argument @var{state} should be initialized as for @code{mpfi_urandom}. + +Caveat: the normal distribution on the set of floating-point numbers is different from the normal distribution on the set of real numbers. No guarantee is given on the quality of the distribution. +@end deftypefun + +@deftypefun void mpfi_erandom (mpfr_t rop, mpfi_t op, gmp_randstate_t state) +Sets @var{rop} to a floating-point number picked up at random in +@var{op}, according to an exponential distribution. + +The argument @var{state} should be initialized as for @code{mpfi_urandom}. + +Caveat: the exponential distribution on the set of floating-point numbers is different from the exponential distribution on the set of real numbers. No guarantee is given on the quality of the distribution. +@end deftypefun + + +@node Converting Intervals, Interval Arithmetic, Floating-point Quantities, Interval Functions +@comment node-name, next, previous, up +@section Conversion Functions +@cindex Conversion functions + +@deftypefun double mpfi_get_d (mpfi_t @var{op}) +Converts @var{op} to a double, which is the center of @var{op} rounded to the +nearest double. +@end deftypefun + +@deftypefun void mpfi_get_fr (mpfr_t @var{rop}, mpfi_t @var{op}) +Converts @var{op} to a floating-point number, which is the center of @var{op} +rounded to nearest. +@end deftypefun + + +@node Interval Arithmetic, Special Functions, Converting Intervals, Interval Functions +@comment node-name, next, previous, up +@section Basic Arithmetic Functions +@cindex Interval arithmetic functions +@cindex Arithmetic functions + +@deftypefun int mpfi_add (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_add_d (mpfi_t @var{rop}, mpfi_t @var{op1}, double @var{op2}) +@deftypefunx int mpfi_add_ui (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_add_si (mpfi_t @var{rop}, mpfi_t @var{op1}, long int @var{op2}) +@deftypefunx int mpfi_add_z (mpfi_t @var{rop}, mpfi_t @var{op1}, mpz_t @var{op2}) +@deftypefunx int mpfi_add_q (mpfi_t @var{rop}, mpfi_t @var{op1}, mpq_t @var{op2}) +@deftypefunx int mpfi_add_fr (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfr_t @var{op2}) +Sets @var{rop} to @var{op1} + @var{op2}. +Returns a value indicating whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_sub (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_sub_d (mpfi_t @var{rop}, mpfi_t @var{op1}, double @var{op2}) +@deftypefunx int mpfi_d_sub (mpfi_t @var{rop}, double @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_sub_ui (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_ui_sub (mpfi_t @var{rop}, unsigned long int @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_sub_si (mpfi_t @var{rop}, mpfi_t @var{op1}, long int @var{op2}) +@deftypefunx int mpfi_si_sub (mpfi_t @var{rop}, long int @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_sub_z (mpfi_t @var{rop}, mpfi_t @var{op1}, mpz_t @var{op2}) +@deftypefunx int mpfi_z_sub (mpfi_t @var{rop}, mpz_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_sub_q (mpfi_t @var{rop}, mpfi_t @var{op1}, mpq_t @var{op2}) +@deftypefunx int mpfi_q_sub (mpfi_t @var{rop}, mpq_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_sub_fr (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfr_t @var{op2}) +@deftypefunx int mpfi_fr_sub (mpfi_t @var{rop}, mpfr_t @var{op1}, mpfi_t @var{op2}) +Sets @var{rop} to @var{op1} @minus{} @var{op2}. +Returns a value indicating whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_mul (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_mul_d (mpfi_t @var{rop}, mpfi_t @var{op1}, double @var{op2}) +@deftypefunx int mpfi_mul_ui (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_mul_si (mpfi_t @var{rop}, mpfi_t @var{op1}, long int @var{op2}) +@deftypefunx int mpfi_mul_z (mpfi_t @var{rop}, mpfi_t @var{op1}, mpz_t @var{op2}) +@deftypefunx int mpfi_mul_q (mpfi_t @var{rop}, mpfi_t @var{op1}, mpq_t @var{op2}) +@deftypefunx int mpfi_mul_fr (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfr_t @var{op2}) +@c @ifinfo +Sets @var{rop} to @var{op1} * @var{op2}. +@c @end ifinfo +@c @iftex +@c @tex +@c Set @var{rop} to $@var{op1} \times @var{op2}$. +@c @end tex +@c @end iftex +Multiplication by an interval containing only zero results in 0. +Returns a value indicating whether none, one or both endpoints are exact. +@end deftypefun + + +@ifinfo +Division is defined even if the divisor contains zero: when the divisor +contains zero in its interior, the result is the whole real interval [-Inf, Inf]. +When the divisor has one of its endpoints equal to 0, +@c the rules defined by the IEEE 754 norm for the division by signed zeroes apply: +for instance, [1,2]/[+0,1] results in [1, Inf]. +It is not guaranteed in the current version that everything behaves properly +if the divisor contains only 0. +@end ifinfo +@iftex +@tex +Division is defined even if the divisor contains zero: when the divisor +contains zero in its interior, the result is the whole real interval $[-\infty, \infty]$. +When the divisor has one of its endpoints equal to 0, +the rules defined by the IEEE 754 norm for the division by signed zeroes +apply: for instance, $[1,2]/[0^+,1]$ results in $[1, \infty]$. +@end tex +@end iftex +In this example, both endpoints are exact. + +The extended interval division, returning two semi-infinite intervals when +the divisor contains 0, should be available soon. + +@deftypefun int mpfi_div (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_div_d (mpfi_t @var{rop}, mpfi_t @var{op1}, double @var{op2}) +@deftypefunx int mpfi_d_div (mpfi_t @var{rop}, double @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_div_ui (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_ui_div (mpfi_t @var{rop}, unsigned long int @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_div_si (mpfi_t @var{rop}, mpfi_t @var{op1}, long int @var{op2}) +@deftypefunx int mpfi_si_div (mpfi_t @var{rop}, long int @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_div_z (mpfi_t @var{rop}, mpfi_t @var{op1}, mpz_t @var{op2}) +@deftypefunx int mpfi_z_div (mpfi_t @var{rop}, mpz_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_div_q (mpfi_t @var{rop}, mpfi_t @var{op1}, mpq_t @var{op2}) +@deftypefunx int mpfi_q_div (mpfi_t @var{rop}, mpq_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_div_fr (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfr_t @var{op2}) +@deftypefunx int mpfi_fr_div (mpfi_t @var{rop}, mpfr_t @var{op1}, mpfi_t @var{op2}) +Sets @var{rop} to @var{op1}/@var{op2}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_div_ext (mpfi_t @var{rop1}, mpfi_t @var{rop2}, mpfi_t @var{op1}, mpfi_t @var{op2}) +Returns 0, 1 or 2 depending on the number of intervals corresponding to the result of the extended division of @var{op1} by @var{op2}: +@ifinfo +if @var{op2} contains 0, then it returns 2 and both @var{rop1} and @var{rop2} are set: @var{rop1} and @var{rop2} correspond to the results of the division of @var{op1} by [inf(@var{op2}), 0] and [0, sup(@var{op2}], in ascending order; otherwise the usual division is performed and 0 or 1 result is set, the other one(s) being NaN. +@end ifinfo +@iftex +@tex +if @var{op2} contains $0$, then it returns $2$ and both @var{rop1} and @var{rop2} are set: @var{rop1} and @var{rop2} correspond to the results of the division of @var{op1} by $[\inf(@var{op2}), 0]$ and $[0, \sup(@var{op2}]$, in ascending order; otherwise the usual division is performed and $0$ or $1$ result is set, the other one(s) being NaN. +@end tex +@end iftex +@end deftypefun + +@deftypefun int mpfi_neg (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to @minus{}@var{op}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_sqr (mpfi_t @var{rop}, mpfi_t @var{op}) +@ifinfo +Sets @var{rop} to the nonnegative square of @var{op}. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $@var{op} ^2$. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +Indeed, in interval arithmetic, the square of an interval is a nonnegative interval +whereas the product of an interval by itself can contain negative values. +@end deftypefun + +@deftypefun int mpfi_inv (mpfi_t @var{rop}, mpfi_t @var{op}) +@ifinfo +Sets @var{rop} to 1/@var{op}. +Inverse is defined even if the interval contains zero: when the denominator +contains zero, the result is the whole real interval ]-Inf, Inf[. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $1/@var{op}$. +Inversion is defined even if the interval contains zero: when the denominator +contains zero, the result is the whole real interval $[-\infty, \infty]$. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +@c Signed zeroes, introduced in the IEEE 754 norm for +@c interval arithmetic, are not yet taken into account. +@end deftypefun + +@deftypefun int mpfi_sqrt (mpfi_t @var{rop}, mpfi_t @var{op}) +@ifinfo +Sets @var{rop} to the square root of @var{op}. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $\sqrt{@var{op}}$. +@end tex +@end iftex +Sets @var{rop} to NaN if @var{op} is negative. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_rec_sqrt (mpfi_t @var{rop}, mpfi_t @var{op}) +@ifinfo +Sets @var{rop} to the inverse of square root of @var{op}. +Sets @var{rop} to NaN if @var{op} is negative. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $1/\sqrt{@var{op}}$. +Sets @var{rop} to NaN if @var{op} is negative. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_cbrt (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the cubic root of @var{op}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_abs (mpfi_t @var{rop}, mpfi_t @var{op}) +@ifinfo +Sets @var{rop} to the interval containing the absolute value of every element of @var{op}. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $|@var{op} |$, the absolute value of @var{op}. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_mul_2exp (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_mul_2ui (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_mul_2si (mpfi_t @var{rop}, mpfi_t @var{op1}, long int @var{op2}) +@ifinfo +Sets @var{rop} to @var{op1} times 2 raised to @var{op2}. + +@code{mpfi_mul_2exp} is identical to @code{mpfi_mul_2ui} and is kept for compatibility +with former versions of MPFI only. It is deprecated and could disappear in future versions of MPFI. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $@var{op1} \times 2^{op2}$. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +Just increases the exponents of the endpoints by @var{op2} +when @var{rop} and @var{op1} are identical. +@end deftypefun + +@deftypefun int mpfi_div_2exp (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_div_2ui (mpfi_t @var{rop}, mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_div_2si (mpfi_t @var{rop}, mpfi_t @var{op1}, long int @var{op2}) +@ifinfo +Sets @var{rop} to @var{op1} divided by 2 raised to @var{op2}. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $@var{op1}/2^{op2}$. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +Just decreases the exponents of the endpoints by @var{op2} +when @var{rop} and @var{op1} are identical. +@end deftypefun + +@node Special Functions, Interval Comparison, Interval Arithmetic, Interval Functions +@comment node-name, next, previous, up +@section Special Functions +@cindex Special functions + +These functions are based on their MPFR counterparts. For more information, +see the MPFR documentation or related bibliography. + +@deftypefun int mpfi_log (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the natural logarithm of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +If @var{op} contains negative numbers, then @var{rop} has at least one +NaN endpoint. +@end deftypefun + +@deftypefun int mpfi_exp (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the exponential of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_exp2 (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to 2 to the power @var{op}, with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_exp10 (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to 10 to the power @var{op}, with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_cos (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_sin (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_tan (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the cosine, sine or tangent of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + + +@deftypefun int mpfi_sec (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_csc (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_cot (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the secant, cosecant or cotangent of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + + +@c @deftypefun void mpfi_sin_cos (mpfi_t @var{sop}, mpfi_t @var{cop}, mpfi_t @var{op}) +@c Sets @var{sop} to the sine of @var{op}, @var{cop} to the cosine of @var{op}, +@c with the precision of the result (@var{sop} and @var{cop}). +@c @var{sop} and @var{cop} must be different variables. +@c If one of @var{sop} or @var{cop} is NULL, only the other value is returned. +@c @end deftypefun + +@deftypefun int mpfi_acos (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_asin (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_atan (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the arc-cosine, arc-sine or arc-tangent of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_atan2 (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +Sets @var{rop} to the arc-tangent2 of @var{op1} and @var{op2}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_cosh (mpfi_t @var{cop}, mpfi_t @var{op}) +@deftypefunx int mpfi_sinh (mpfi_t @var{sop}, mpfi_t @var{op}) +@deftypefunx int mpfi_tanh (mpfi_t @var{top}, mpfi_t @var{op}) +Sets @var{cop} to the hyperbolic cosine of @var{op}, +@var{sop} to the hyperbolic sine of @var{op}, +@var{top} to the hyperbolic tangent of @var{op}, +with the precision of the result. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_sech (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_csch (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_coth (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the hyperbolic secant, cosecant or cotangent of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + + +@deftypefun int mpfi_acosh (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_asinh (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_atanh (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the inverse hyperbolic cosine, sine or tangent of @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_log1p (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the natural logarithm of one plus @var{op}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +If @var{op} contains negative numbers, then @var{rop} has at least one +NaN endpoint. +@end deftypefun + +@deftypefun int mpfi_log2p1 (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_log10p1 (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the logarithm in base t of (@var{op} plus one), +with the precision of @var{rop}. +The base t can be equal to 2 or 10. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_expm1 (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the exponential of @var{op}, minus one, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_exp2m1 (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_exp10m1 (mpfi_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the exponential in base t of @var{op}, minus one, +with the precision of @var{rop}. +The base t can be equal to 2 or 10. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_log2 (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_log10 (mpfi_t @var{rop}, mpfi_t @var{op}) +@ifinfo +Sets @var{rop} to log[t] @var{op} with t=2 or 10 the base for the +logarithm, with the precision of @var{rop}. +@end ifinfo +@iftex +@tex +Sets @var{rop} to $\log _t @var{op}$, with $t=2$ or 10 the base for +the logarithm, with the precision of @var{rop}. +@end tex +@end iftex +Returns an indication of whether none, one or both endpoints are exact. +If @var{op} contains negative numbers, then @var{rop} has at least one +NaN endpoint. +@end deftypefun + +@deftypefun int mpfi_hypot (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +Sets @var{rop} to the euclidean distance between points in @var{op1} and points in @var{op2}, +with the precision of @var{rop}. +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@deftypefun int mpfi_const_log2 (mpfi_t @var{rop}) +@deftypefunx int mpfi_const_pi (mpfi_t @var{rop}) +@deftypefunx int mpfi_const_euler (mpfi_t @var{rop}) +@deftypefunx int mpfi_const_catalan (mpfi_t @var{rop}) +@ifinfo +Sets @var{rop} respectively to the logarithm of 2, to the value of Pi, +to the Euler's constant, and to the Catalan's constant, with the +precision of @var{rop}. +@end ifinfo +@iftex +@tex +Sets @var{rop} respectively to the logarithm of 2, to the value of +$\pi$, to the Euler's constant, and to the Catalan's constant, with +the precision of @var{rop}. +@end tex +@end iftex + +Returns an indication of whether none, one or both endpoints are exact. +@end deftypefun + +@node Interval Comparison, I/O of Intervals, Special Functions, Interval Functions +@comment node-name, next, previous, up +@section Comparison Functions +@cindex Interval comparisons functions +@cindex Comparison functions + +The comparison of two intervals is not clearly defined when they overlap. +MPFI proposes default comparison functions, but they can easily be customized +according to the user's needs. +The default comparison functions return a positive value if the first interval +has all its elements strictly greater than all elements of the second one, a +negative value if the first interval has all its elements strictly lower than +all elements of the second one and 0 otherwise, i.e.\ if they overlap or if one +is contained in the other. + +@deftypefun int mpfi_cmp (mpfi_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_cmp_d (mpfi_t @var{op1}, double @var{op2}) +@deftypefunx int mpfi_cmp_ui (mpfi_t @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_cmp_si (mpfi_t @var{op1}, long int @var{op2}) +@deftypefunx int mpfi_cmp_z (mpfi_t @var{op1}, mpz_t @var{op2}) +@deftypefunx int mpfi_cmp_q (mpfi_t @var{op1}, mpq_t @var{op2}) +@deftypefunx int mpfi_cmp_fr (mpfi_t @var{op1}, mpfr_t @var{op2}) +@ifinfo +Compares @var{op1} and @var{op2}. Return a positive value if @var{op1} > +@var{op2}, zero if @var{op1} overlaps or contains @var{op2}, and a negative value if @var{op1} < +@var{op2}. +@end ifinfo +@iftex +@tex +Compares @var{op1} and @var{op2}. Return a positive value if $@var{op1} > +@var{op2}$, zero if @var{op1} overlaps, contains or is contained in @var{op2}, and a negative value if $@var{op1} +< @var{op2}$. +@end tex +@end iftex +In case one of the operands is invalid (which is represented by at least one NaN endpoint), it returns 1, even if +both are invalid. +@end deftypefun + +@deftypefun int mpfi_is_pos (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only positive numbers, +the left endpoint can be zero. +@end deftypefun + +@deftypefun int mpfi_is_strictly_pos (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only positive numbers. +@end deftypefun + +@deftypefun int mpfi_is_nonneg (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only nonnegative numbers. +@end deftypefun + +@deftypefun int mpfi_is_neg (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only negative numbers, +the right endpoint can be zero. +@end deftypefun + +@deftypefun int mpfi_is_strictly_neg (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only negative numbers. +@end deftypefun + +@deftypefun int mpfi_is_nonpos (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only nonpositive numbers. +@end deftypefun + +@deftypefun int mpfi_is_zero (mpfi_t @var{op}) +Returns a positive value if @var{op} contains only 0. +@end deftypefun + +@deftypefun int mpfi_has_zero (mpfi_t @var{op}) +Returns a positive value if @var{op} contains 0 (and possibly other numbers). +@end deftypefun + +@deftypefun int mpfi_nan_p (mpfi_t @var{op}) +Returns non-zero if @var{op} is invalid, i.e.\ at least one of its +endpoints is a Not-a-Number (NaN), zero otherwise. +@end deftypefun + +@deftypefun int mpfi_inf_p (mpfi_t @var{op}) +Returns non-zero if at least one of the endpoints of @var{op} is +plus or minus infinity, zero otherwise. +@end deftypefun + +@deftypefun int mpfi_bounded_p (mpfi_t @var{op}) +Returns non-zero if @var{op} is a bounded interval, i.e.\ neither invalid +nor (semi-)infinite. +@end deftypefun + + +@node I/O of Intervals, Operating on the Endpoints, Interval Comparison, Interval Functions +@comment node-name, next, previous, up +@section Input and Output Functions +@cindex Interval input and output functions +@cindex Input functions +@cindex Output functions +@cindex I/O functions + +Functions that perform input from a stdio stream, and functions that output to +a stdio stream. Passing a NULL pointer for a @var{stream} argument to any of +these functions will make them read from @code{stdin} and write to +@code{stdout}, respectively. + +When using any of these functions, it is a good idea to include @file{stdio.h} +before @file{mpfr.h}, since that will allow @file{mpfr.h} to define prototypes +for these functions. + +The input and output functions are based on the representation by endpoints. +The input function has to be improved. For the time being, it is +mandatory to insert spaces between the interval brackets and the +endpoints and also around the comma separating the endpoints. + +@deftypefun size_t mpfi_out_str (FILE *@var{stream}, int @var{base}, size_t @var{n_digits}, mpfi_t @var{op}) +Outputs @var{op} on stdio stream @var{stream}, as a string of digits in +base @var{base}. The output is an opening square bracket "[", followed by the lower +endpoint, a separating comma, the upper endpoint and a closing square bracket "]". + +For each endpoint, the output is performed by @code{mpfr_out_str}. +The following piece of information is taken from MPFR documentation. +The base may vary from 2 to 36. For each endpoint, it prints at most +@var{n_digits} significant digits, or if @var{n_digits} is 0, the maximum +number of digits accurately representable by @var{op}. +In addition to the significant digits, a decimal point at the right of the +first digit and a +trailing exponent, in the form @samp{eNNN}, are printed. If @var{base} +is greater than 10, @samp{@@} will be used instead of @samp{e} as +exponent delimiter. + +Returns the number of bytes written, or if an error occurred, return 0. + +As @code{mpfi_out_str} outputs an enclosure of the input interval, and as +@code{mpfi_inp_str} provides an enclosure of the interval it reads, these +functions are not reciprocal. More precisely, when they are called one after +the other, the resulting interval contains the initial one, and this inclusion +may be strict. +@end deftypefun + +@deftypefun size_t mpfi_inp_str (mpfi_t @var{rop}, FILE *@var{stream}, int @var{base}) +Inputs a string in base @var{base} from stdio stream @var{stream}, +and puts the +read float in @var{rop}. The string is of the form @samp{number} or +@samp{[ number1 , number 2 ]}. +@c where the spaces around the floating-point endpoints are mandatory. +Each endpoint has the form @samp{M@@N} or, if the +base is 10 or less, alternatively @samp{MeN} or @samp{MEN}. +@samp{M} is the significand and +@samp{N} is the exponent. The significand is always in the specified base. The +exponent is +@c either in the specified base or, if @var{base} is negative, +in decimal. + +The argument @var{base} may be in the ranges 2 to 36. +@c , or @minus{}36 to +@c @minus{}2. Negative values are used to specify that the exponent is in +@c decimal. + +Unlike the corresponding @code{mpz} function, the base will not be determined +from the leading characters of the string if @var{base} is 0. This is so that +numbers like @samp{0.23} are not interpreted as octal. + +Returns the number of bytes read, or if an error occurred, return 0. +@end deftypefun + +@deftypefun void mpfi_print_binary (mpfi_t @var{op}) +Outputs @var{op} on stdout +in raw binary format for each endpoint (the exponent is in decimal, yet). +The last bits from the least significant limb which do not belong to +the significand are printed between square brackets; +they should always be zero. +@end deftypefun + + +@node Operating on the Endpoints, Set Operations, I/O of Intervals, Interval Functions +@comment node-name, next, previous, up +@section Functions Operating on Endpoints +@cindex Functions operating on endpoints + +@deftypefun int mpfi_get_left (mpfr_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the left endpoint of @var{op}, rounded toward minus infinity. +It returns a negative value if @var{rop} differs from the left endpoint +of @var{op} (due to rounding) and 0 otherwise. +@end deftypefun + +@deftypefun int mpfi_get_right (mpfr_t @var{rop}, mpfi_t @var{op}) +Sets @var{rop} to the right endpoint of @var{op}, rounded toward plus infinity. +It returns a positive value if @var{rop} differs from the right endpoint +of @var{op} (due to rounding) and 0 otherwise. +@end deftypefun + +The following function should never be used... but it helps to return correct +intervals when there is a bug. + +@deftypefun int mpfi_revert_if_needed (mpfi_t @var{rop}) +Swaps the endpoints of @var{rop} if they are not properly ordered, +i.e.\ if the lower endpoint is greater than the right one. +It returns a non-zero value if the endpoints have been swapped, zero otherwise. +@end deftypefun + +@deftypefun int mpfi_put (mpfi_t @var{rop}, mpfi_t @var{op}) +@deftypefunx int mpfi_put_d (mpfi_t @var{rop}, double @var{op}) +@deftypefunx int mpfi_put_ui (mpfi_t @var{rop}, unsigned long int @var{op}) +@deftypefunx int mpfi_put_si (mpfi_t @var{rop}, long int @var{op}) +@deftypefunx int mpfi_put_z (mpfi_t @var{rop}, mpz_t @var{op}) +@deftypefunx int mpfi_put_q (mpfi_t @var{rop}, mpq_t @var{op}) +@deftypefunx int mpfi_put_fr (mpfi_t @var{rop}, mpfr_t @var{op}) +Extends the interval @var{rop} so that it contains @var{op}. +In other words, @var{rop} is set to the convex hull of @var{rop} and @var{op}. +It returns a value indicating whether none, one or both endpoints are inexact +(due to possible roundings). +@end deftypefun + +@deftypefun int mpfi_interv_d (mpfi_t @var{rop}, double @var{op1}, double @var{op2}) +@deftypefunx int mpfi_interv_ui (mpfi_t @var{rop}, unsigned long int @var{op1}, unsigned long int @var{op2}) +@deftypefunx int mpfi_interv_si (mpfi_t @var{rop}, long int @var{op1}, long int @var{op2}) +@deftypefunx int mpfi_interv_z (mpfi_t @var{rop}, mpz_t @var{op1}, mpz_t @var{op2}) +@deftypefunx int mpfi_interv_q (mpfi_t @var{rop}, mpq_t @var{op1}, mpq_t @var{op2}) +@deftypefunx int mpfi_interv_fr (mpfi_t @var{rop}, mpfr_t @var{op1}, mpfr_t @var{op2}) +Sets @var{rop} to the interval having as endpoints @var{op1} and @var{op2}. +The values of @var{op1} and @var{op2} are given in any order, the left +endpoints of @var{rop} is always the minimum of @var{op1} and +@var{rop2}. +It returns a value indicating whether none, one or both endpoints are inexact +(due to possible roundings). +@end deftypefun + + +@node Set Operations, Miscellaneous Interval Functions, Operating on the Endpoints, Interval Functions +@comment node-name, next, previous, up +@section Set Functions on Intervals +@cindex Set functions on intervals + +@deftypefun int mpfi_is_strictly_inside (mpfi_t @var{op1}, mpfi_t @var{op2}) +Returns a positive value if the second interval @var{op2} is contained in +the interior of @var{op1}, 0 otherwise. +@end deftypefun + +@deftypefun int mpfi_is_inside (mpfi_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_is_inside_d (double @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_is_inside_ui (unsigned long @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_is_inside_si (long int @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_is_inside_z (mpz_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_is_inside_q (mpq_t @var{op1}, mpfi_t @var{op2}) +@deftypefunx int mpfi_is_inside_fr (mpfr_t @var{op1}, mpfi_t @var{op2}) +Returns a positive value if @var{op1} is contained in @var{op2}, +0 otherwise. +Return 0 if at least one argument is NaN or an invalid interval. +@end deftypefun + +@deftypefun int mpfi_is_empty (mpfi_t @var{op}) +Returns a positive value if @var{op} is empty (its endpoints are in reverse order) +and 0 otherwise. Nothing is done in arithmetic or special functions +to handle empty intervals: this is the responsibility of the user +to avoid computing with empty intervals. +@end deftypefun + +@deftypefun int mpfi_intersect (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +Sets @var{rop} to the intersection (possibly empty) of the intervals +@var{op1} and @var{op2}. +It returns a value indicating whether none, one or both endpoints are inexact +(due to possible roundings). +Warning: this function can return an empty interval (i.e.\ with endpoints +in reverse order). +@end deftypefun + +@deftypefun int mpfi_union (mpfi_t @var{rop}, mpfi_t @var{op1}, mpfi_t @var{op2}) +Sets @var{rop} to the convex hull of the union of the intervals @var{op1} and @var{op2}. +It returns a value indicating whether none, one or both endpoints are inexact +(due to possible roundings). +@end deftypefun + +@node Miscellaneous Interval Functions, Error Handling, Set Operations, Interval Functions +@comment node-name, next, previous, up +@section Miscellaneous Interval Functions +@cindex Miscellaneous interval functions + +@deftypefun int mpfi_increase (mpfi_t @var{rop}, mpfr_t @var{op}) +Subtracts @var{op} to the lower endpoint of @var{rop} and adds it to +the upper endpoint of @var{rop}, sets the resulting interval to @var{rop}. +It returns a value indicating whether none, one or both endpoints are inexact. +@end deftypefun + +@deftypefun int mpfi_blow (mpfi_t @var{rop}, mpfi_t @var{op1}, double @var{op2}) +@ifinfo +Sets @var{rop} to the interval whose center is the center of @var{op1} +and whose radius is the radius of @var{op1} multiplied by (1 + abs(@var{op2})). +@end ifinfo +@iftex +@tex +Sets @var{rop} to the interval whose center is the center of @var{op1} +and whose radius is the radius of @var{op1} multiplied by $(1 + | @var{op2} |)$. +@end tex +@end iftex +It returns a value indicating whether none, one or both endpoints are inexact. +@end deftypefun + +@deftypefun int mpfi_bisect (mpfi_t @var{rop1}, mpfi_t @var{rop2}, mpfi_t @var{op}) +Splits @var{op} into two halves and sets them to @var{rop1} and @var{rop2}. +Due to outward rounding, the two halves @var{rop1} and @var{rop2} may overlap. +It returns a value >0 if the splitting point is greater than the exact centre, +<0 if it is smaller and 0 if it is the exact centre. +@end deftypefun + +@deftypefun {const char *} mpfi_get_version () +Returns the MPFI version number as a NULL terminated string. +@end deftypefun + + +@node Error Handling, , Miscellaneous Interval Functions, Interval Functions +@comment node-name, next, previous, up +@section Error Handling +@cindex Error handling + +@deftypefn Macro void MPFI_ERROR ({char *} @var{msg}) +If there is no previous error, sets the error number to 1 and prints +the message @var{msg} to the standard error stream. If the error +number is already set, do nothing. +@end deftypefn + +@deftypefun int mpfi_is_error () +Returns 1 if the error number is set (to 1). +@end deftypefun + +@deftypefun void mpfi_set_error (int @var{op}) +Sets the error number to @var{op}. +@end deftypefun + +@deftypefun void mpfi_reset_error () +Resets the error number to 0. +@end deftypefun + +@node Contributors, References, Interval Functions, Top +@comment node-name, next, previous, up +@unnumbered Contributors + +MPFI has been written by Fabrice Rouillier, Nathalie Revol, Sylvain +Chevillard, Hong Diep Nguyen, Christoph Lauter and Philippe Th@'eveny. Its development +has greatly benefited from the patient and supportive help of the MPFR +team. + +@node References, Concept Index, Contributors, Top +@comment node-name, next, previous, up +@unnumbered References + +This is a largely lacunary list of introductory references. +@itemize @bullet + +@item MPFR team (SPACES project, INRIA Lorraine and LORIA), +"MPFR. The Multiple Precision Floating-Point Reliable Library", +available at @code{http://www.mpfr.org}. + +@item +The main Web site for interval computations is +@url{http://cs.utep.edu/interval-comp/main.html}. + +@item +The Web site of the IEEE-1788 working group for the standardization +of interval arithmetic is +@url{http://grouper.ieee.org/groups/1788/}. + +@item +G. Alefeld and J. Herzberger, "Introduction to interval analysis", +Academic Press, 1983. + +@item +R. Baker Kearfott, "Rigorous global search: continuous problems", +Kluwer, 1996. + +@item +T. Hickey and Q. Ju and M. H. Van Emden, +"Interval arithmetic: From principles to implementation", +Journal of the ACM, vol. 48, no 4, pp 1038--1068, September 2001. + +@item +E. Hansen, "Global optimization using interval analysis", +Marcel Dekker, 1992. + +@item +A. Neumaier, "Interval methods for systems of equations", +Cambridge University Press, 1990. + +@item +H. Ratschek and J. Rokne, "New computer methods for global optimization", +Ellis Horwood Ltd, 1988. + +@item +N. Revol and F. Rouillier, +"Motivations for an arbitrary precision interval arithmetic and the MPFI library", +Reliable Computing, vol. 11, no 4, pp 275--290, 2005. +@end itemize + + +@node Concept Index, Function Index, References, Top +@comment node-name, next, previous, up +@unnumbered Concept Index +@printindex cp + +@node Function Index, , Concept Index, Top +@comment node-name, next, previous, up +@unnumbered Function and Type Index +@printindex fn + + +@contents +@bye diff --git a/Build/source/libs/mpfi/mpfi-src/mpfi.pc.in b/Build/source/libs/mpfi/mpfi-src/mpfi.pc.in new file mode 100644 index 00000000000..6e4013b8706 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/mpfi.pc.in @@ -0,0 +1,11 @@ +prefix=@prefix@ +exec_prefix=@exec_prefix@ +libdir=@libdir@ +includedir=@includedir@ + +Name: mpfi +URL: https://gitlab.inria.fr/mpfi/mpfi/ +Description: C library for multiple-precision interval arithmetic +Version: @PACKAGE_VERSION@ +Libs: -L${libdir} -lmpfi -lmpfr -lgmp +Cflags: -I${includedir} diff --git a/Build/source/libs/mpfi/mpfi-src/mpfi_config.h.in b/Build/source/libs/mpfi/mpfi-src/mpfi_config.h.in new file mode 100644 index 00000000000..4f017552c90 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/mpfi_config.h.in @@ -0,0 +1,184 @@ +/* mpfi_config.h.in. Generated from configure.ac by autoheader. */ + +/* Define to 1 if you have the header file. */ +#undef HAVE_DLFCN_H + +/* Define to 1 if you have the `dup2' function. */ +#undef HAVE_DUP2 + +/* Define to 1 if you have the header file. */ +#undef HAVE_FLOAT_H + +/* Define to 1 if you have the `gettimeofday' function. */ +#undef HAVE_GETTIMEOFDAY + +/* Define to 1 if you have the header file. */ +#undef HAVE_INTTYPES_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_LIMITS_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_MINIX_CONFIG_H + +/* Define to 1 if you have the `mpfr_q_sub' function. */ +#undef HAVE_MPFR_Q_SUB + +/* Define to 1 if you have the `mpfr_z_div' function. */ +#undef HAVE_MPFR_Z_DIV + +/* Define to 1 if you have the `mpfr_z_sub' function. */ +#undef HAVE_MPFR_Z_SUB + +/* Define if stdarg */ +#undef HAVE_STDARG + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDINT_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDIO_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDLIB_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STRINGS_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STRING_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_SYS_STAT_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_SYS_TIME_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_SYS_TYPES_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_UNISTD_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_WCHAR_H + +/* Define to the sub-directory where libtool stores uninstalled libraries. */ +#undef LT_OBJDIR + +/* Define to the address where bug reports for this package should be sent. */ +#undef PACKAGE_BUGREPORT + +/* Define to the full name of this package. */ +#undef PACKAGE_NAME + +/* Define to the full name and version of this package. */ +#undef PACKAGE_STRING + +/* Define to the one symbol short name of this package. */ +#undef PACKAGE_TARNAME + +/* Define to the home page for this package. */ +#undef PACKAGE_URL + +/* Define to the version of this package. */ +#undef PACKAGE_VERSION + +/* Define to 1 if all of the C90 standard headers exist (not just the ones + required in a freestanding environment). This macro is provided for + backward compatibility; new code need not use it. */ +#undef STDC_HEADERS + +/* Enable extensions on AIX 3, Interix. */ +#ifndef _ALL_SOURCE +# undef _ALL_SOURCE +#endif +/* Enable general extensions on macOS. */ +#ifndef _DARWIN_C_SOURCE +# undef _DARWIN_C_SOURCE +#endif +/* Enable general extensions on Solaris. */ +#ifndef __EXTENSIONS__ +# undef __EXTENSIONS__ +#endif +/* Enable GNU extensions on systems that have them. */ +#ifndef _GNU_SOURCE +# undef _GNU_SOURCE +#endif +/* Enable X/Open compliant socket functions that do not require linking + with -lxnet on HP-UX 11.11. */ +#ifndef _HPUX_ALT_XOPEN_SOCKET_API +# undef _HPUX_ALT_XOPEN_SOCKET_API +#endif +/* Identify the host operating system as Minix. + This macro does not affect the system headers' behavior. + A future release of Autoconf may stop defining this macro. */ +#ifndef _MINIX +# undef _MINIX +#endif +/* Enable general extensions on NetBSD. + Enable NetBSD compatibility extensions on Minix. */ +#ifndef _NETBSD_SOURCE +# undef _NETBSD_SOURCE +#endif +/* Enable OpenBSD compatibility extensions on NetBSD. + Oddly enough, this does nothing on OpenBSD. */ +#ifndef _OPENBSD_SOURCE +# undef _OPENBSD_SOURCE +#endif +/* Define to 1 if needed for POSIX-compatible behavior. */ +#ifndef _POSIX_SOURCE +# undef _POSIX_SOURCE +#endif +/* Define to 2 if needed for POSIX-compatible behavior. */ +#ifndef _POSIX_1_SOURCE +# undef _POSIX_1_SOURCE +#endif +/* Enable POSIX-compatible threading on Solaris. */ +#ifndef _POSIX_PTHREAD_SEMANTICS +# undef _POSIX_PTHREAD_SEMANTICS +#endif +/* Enable extensions specified by ISO/IEC TS 18661-5:2014. */ +#ifndef __STDC_WANT_IEC_60559_ATTRIBS_EXT__ +# undef __STDC_WANT_IEC_60559_ATTRIBS_EXT__ +#endif +/* Enable extensions specified by ISO/IEC TS 18661-1:2014. */ +#ifndef __STDC_WANT_IEC_60559_BFP_EXT__ +# undef __STDC_WANT_IEC_60559_BFP_EXT__ +#endif +/* Enable extensions specified by ISO/IEC TS 18661-2:2015. */ +#ifndef __STDC_WANT_IEC_60559_DFP_EXT__ +# undef __STDC_WANT_IEC_60559_DFP_EXT__ +#endif +/* Enable extensions specified by ISO/IEC TS 18661-4:2015. */ +#ifndef __STDC_WANT_IEC_60559_FUNCS_EXT__ +# undef __STDC_WANT_IEC_60559_FUNCS_EXT__ +#endif +/* Enable extensions specified by ISO/IEC TS 18661-3:2015. */ +#ifndef __STDC_WANT_IEC_60559_TYPES_EXT__ +# undef __STDC_WANT_IEC_60559_TYPES_EXT__ +#endif +/* Enable extensions specified by ISO/IEC TR 24731-2:2010. */ +#ifndef __STDC_WANT_LIB_EXT2__ +# undef __STDC_WANT_LIB_EXT2__ +#endif +/* Enable extensions specified by ISO/IEC 24747:2009. */ +#ifndef __STDC_WANT_MATH_SPEC_FUNCS__ +# undef __STDC_WANT_MATH_SPEC_FUNCS__ +#endif +/* Enable extensions on HP NonStop. */ +#ifndef _TANDEM_SOURCE +# undef _TANDEM_SOURCE +#endif +/* Enable X/Open extensions. Define to 500 only if necessary + to make mbstate_t available. */ +#ifndef _XOPEN_SOURCE +# undef _XOPEN_SOURCE +#endif + + +/* Define to 1 if it is a development version. */ +#undef WARN_IF_REVERTED_ENDPOINTS + +/* Define to `unsigned int' if does not define. */ +#undef size_t diff --git a/Build/source/libs/mpfi/mpfi-src/src/Makefile.am b/Build/source/libs/mpfi/mpfi-src/src/Makefile.am new file mode 100644 index 00000000000..474c8ec9306 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/Makefile.am @@ -0,0 +1,56 @@ +lib_LTLIBRARIES = libmpfi.la + +# apparently the type "intmax_t" s not always known +# and consequently set_sj, set_uj cause trouble +#libmpfi_la_SOURCES = mpfi-impl.h abs.c acos.c acosh.c add.c \ +# add_d.c add_fr.c add_q.c add_si.c add_ui.c add_z.c alea.c \ +# asin.c asinh.c atan2.c atan.c atanh.c bisect.c blow.c \ +# cbrt.c clear.c clears.c cmp.c cmp_sym_pi.c constants.c cos.c \ +# cosh.c csc.c csch.c cot.c coth.c d_div.c d_sub.c diam.c \ +# div.c div_2exp.c div_2si.c div_2ui.c div_d.c div_ext.c div_fr.c \ +# div_q.c div_si.c div_ui.c div_z.c erandom.c error.c exp.c \ +# exp2.c exp10.c expm1.c exp2m1.c exp10m1.c fr_div.c fr_sub.c get_endpoints.c get_fr.c \ +# get_d.c get_prec.c get_version.c has_zero.c hypot.c \ +# increase.c init.c init2.c inits.c inits2.c intersect.c \ +# interv_d.c interv_fr.c \ +# interv_q.c interv_si.c interv_ui.c interv_z.c inp_str.c \ +# inv.c is_empty.c is_inside.c log.c log10.c log1p.c log2.c log2p1.c log10p1.c \ +# mag.c mid.c mig.c mul.c mul_2exp.c mul_2si.c mul_2ui.c \ +# mul_d.c mul_fr.c mul_q.c mul_si.c mul_ui.c mul_z.c neg.c \ +# nrandom.c out_str.c predicates.c print_binary.c put.c \ +# put_d.c put_fr.c put_q.c put_si.c put_ui.c put_z.c q_div.c \ +# q_sub.c quadrant.c rec_sqrt.c revert_if_needed.c round_prec.c sec.c \ +# sech.c set.c set_d.c set_flt.c set_fr.c set_ld.c set_prec.c set_q.c \ +# set_si.c set_sj.c set_str.c set_ui.c set_uj.c set_z.c \ +# si_div.c si_sub.c sign.c sin.c \ +# sinh.c sqr.c sqrt.c sub.c sub_d.c sub_fr.c sub_q.c \ +# sub_si.c sub_ui.c sub_z.c swap.c tan.c tanh.c ui_div.c \ +# ui_sub.c union.c urandom.c z_div.c z_sub.c + +libmpfi_la_SOURCES = mpfi-impl.h abs.c acos.c acosh.c add.c \ + add_d.c add_fr.c add_q.c add_si.c add_ui.c add_z.c alea.c \ + asin.c asinh.c atan2.c atan.c atanh.c bisect.c blow.c \ + cbrt.c clear.c clears.c cmp.c cmp_sym_pi.c constants.c cos.c \ + cosh.c csc.c csch.c cot.c coth.c d_div.c d_sub.c diam.c \ + div.c div_2exp.c div_2si.c div_2ui.c div_d.c div_ext.c div_fr.c \ + div_q.c div_si.c div_ui.c div_z.c erandom.c error.c exp.c \ + exp2.c exp10.c expm1.c exp2m1.c exp10m1.c fr_div.c fr_sub.c get_endpoints.c get_fr.c \ + get_d.c get_prec.c get_version.c has_zero.c hypot.c \ + increase.c init.c init2.c inits.c inits2.c intersect.c \ + interv_d.c interv_fr.c \ + interv_q.c interv_si.c interv_ui.c interv_z.c inp_str.c \ + inv.c is_empty.c is_inside.c log.c log10.c log1p.c log2.c log2p1.c log10p1.c \ + mag.c mid.c mig.c mul.c mul_2exp.c mul_2si.c mul_2ui.c \ + mul_d.c mul_fr.c mul_q.c mul_si.c mul_ui.c mul_z.c neg.c \ + nrandom.c out_str.c predicates.c print_binary.c put.c \ + put_d.c put_fr.c put_q.c put_si.c put_ui.c put_z.c q_div.c \ + q_sub.c quadrant.c rec_sqrt.c revert_if_needed.c round_prec.c sec.c \ + sech.c set.c set_d.c set_flt.c set_fr.c set_ld.c set_prec.c set_q.c \ + set_si.c set_str.c set_ui.c set_z.c \ + si_div.c si_sub.c sign.c sin.c \ + sinh.c sqr.c sqrt.c sub.c sub_d.c sub_fr.c sub_q.c \ + sub_si.c sub_ui.c sub_z.c swap.c tan.c tanh.c ui_div.c \ + ui_sub.c union.c urandom.c z_div.c z_sub.c +libmpfi_la_LDFLAGS = -no-undefined + +AM_CPPFLAGS =-I$(top_srcdir) diff --git a/Build/source/libs/mpfi/mpfi-src/src/Makefile.in b/Build/source/libs/mpfi/mpfi-src/src/Makefile.in new file mode 100644 index 00000000000..9641426fdcd --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/Makefile.in @@ -0,0 +1,1244 @@ +# Makefile.in generated by automake 1.16.5 from Makefile.am. +# @configure_input@ + +# Copyright (C) 1994-2021 Free Software Foundation, Inc. + +# This Makefile.in is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +@SET_MAKE@ + +VPATH = @srcdir@ +am__is_gnu_make = { \ + if test -z '$(MAKELEVEL)'; then \ + false; \ + elif test -n '$(MAKE_HOST)'; then \ + true; \ + elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \ + true; \ + else \ + false; \ + fi; \ +} +am__make_running_with_option = \ + case $${target_option-} in \ + ?) ;; \ + *) echo "am__make_running_with_option: internal error: invalid" \ + "target option '$${target_option-}' specified" >&2; \ + exit 1;; \ + esac; \ + has_opt=no; \ + sane_makeflags=$$MAKEFLAGS; \ + if $(am__is_gnu_make); then \ + sane_makeflags=$$MFLAGS; \ + else \ + case $$MAKEFLAGS in \ + *\\[\ \ ]*) \ + bs=\\; \ + sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \ + | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \ + esac; \ + fi; \ + skip_next=no; \ + strip_trailopt () \ + { \ + flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \ + }; \ + for flg in $$sane_makeflags; do \ + test $$skip_next = yes && { skip_next=no; continue; }; \ + case $$flg in \ + *=*|--*) continue;; \ + -*I) strip_trailopt 'I'; skip_next=yes;; \ + -*I?*) strip_trailopt 'I';; \ + -*O) strip_trailopt 'O'; skip_next=yes;; \ + -*O?*) strip_trailopt 'O';; \ + -*l) strip_trailopt 'l'; skip_next=yes;; \ + -*l?*) strip_trailopt 'l';; \ + -[dEDm]) skip_next=yes;; \ + -[JT]) skip_next=yes;; \ + esac; \ + case $$flg in \ + *$$target_option*) has_opt=yes; break;; \ + esac; \ + done; \ + test $$has_opt = yes +am__make_dryrun = (target_option=n; $(am__make_running_with_option)) +am__make_keepgoing = (target_option=k; $(am__make_running_with_option)) +pkgdatadir = $(datadir)/@PACKAGE@ +pkgincludedir = $(includedir)/@PACKAGE@ +pkglibdir = $(libdir)/@PACKAGE@ +pkglibexecdir = $(libexecdir)/@PACKAGE@ +am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd +install_sh_DATA = $(install_sh) -c -m 644 +install_sh_PROGRAM = $(install_sh) -c +install_sh_SCRIPT = $(install_sh) -c +INSTALL_HEADER = $(INSTALL_DATA) +transform = $(program_transform_name) +NORMAL_INSTALL = : +PRE_INSTALL = : +POST_INSTALL = : +NORMAL_UNINSTALL = : +PRE_UNINSTALL = : +POST_UNINSTALL = : +build_triplet = @build@ +host_triplet = @host@ +subdir = src +ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 +am__aclocal_m4_deps = $(top_srcdir)/configure.ac +am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ + $(ACLOCAL_M4) +DIST_COMMON = $(srcdir)/Makefile.am $(am__DIST_COMMON) +mkinstalldirs = $(install_sh) -d +CONFIG_HEADER = $(top_builddir)/mpfi_config.h +CONFIG_CLEAN_FILES = +CONFIG_CLEAN_VPATH_FILES = +am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; +am__vpath_adj = case $$p in \ + $(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \ + *) f=$$p;; \ + esac; +am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`; +am__install_max = 40 +am__nobase_strip_setup = \ + srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'` +am__nobase_strip = \ + for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||" +am__nobase_list = $(am__nobase_strip_setup); \ + for p in $$list; do echo "$$p $$p"; done | \ + sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \ + $(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \ + if (++n[$$2] == $(am__install_max)) \ + { print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \ + END { for (dir in files) print dir, files[dir] }' +am__base_list = \ + sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \ + sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g' +am__uninstall_files_from_dir = { \ + test -z "$$files" \ + || { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \ + || { echo " ( cd '$$dir' && rm -f" $$files ")"; \ + $(am__cd) "$$dir" && rm -f $$files; }; \ + } +am__installdirs = "$(DESTDIR)$(libdir)" +LTLIBRARIES = $(lib_LTLIBRARIES) +libmpfi_la_LIBADD = +am_libmpfi_la_OBJECTS = abs.lo acos.lo acosh.lo add.lo add_d.lo \ + add_fr.lo add_q.lo add_si.lo add_ui.lo add_z.lo alea.lo \ + asin.lo asinh.lo atan2.lo atan.lo atanh.lo bisect.lo blow.lo \ + cbrt.lo clear.lo clears.lo cmp.lo cmp_sym_pi.lo constants.lo \ + cos.lo cosh.lo csc.lo csch.lo cot.lo coth.lo d_div.lo d_sub.lo \ + diam.lo div.lo div_2exp.lo div_2si.lo div_2ui.lo div_d.lo \ + div_ext.lo div_fr.lo div_q.lo div_si.lo div_ui.lo div_z.lo \ + erandom.lo error.lo exp.lo exp2.lo exp10.lo expm1.lo exp2m1.lo \ + exp10m1.lo fr_div.lo fr_sub.lo get_endpoints.lo get_fr.lo \ + get_d.lo get_prec.lo get_version.lo has_zero.lo hypot.lo \ + increase.lo init.lo init2.lo inits.lo inits2.lo intersect.lo \ + interv_d.lo interv_fr.lo interv_q.lo interv_si.lo interv_ui.lo \ + interv_z.lo inp_str.lo inv.lo is_empty.lo is_inside.lo log.lo \ + log10.lo log1p.lo log2.lo log2p1.lo log10p1.lo mag.lo mid.lo \ + mig.lo mul.lo mul_2exp.lo mul_2si.lo mul_2ui.lo mul_d.lo \ + mul_fr.lo mul_q.lo mul_si.lo mul_ui.lo mul_z.lo neg.lo \ + nrandom.lo out_str.lo predicates.lo print_binary.lo put.lo \ + put_d.lo put_fr.lo put_q.lo put_si.lo put_ui.lo put_z.lo \ + q_div.lo q_sub.lo quadrant.lo rec_sqrt.lo revert_if_needed.lo \ + round_prec.lo sec.lo sech.lo set.lo set_d.lo set_flt.lo \ + set_fr.lo set_ld.lo set_prec.lo set_q.lo set_si.lo set_str.lo \ + set_ui.lo set_z.lo si_div.lo si_sub.lo sign.lo sin.lo sinh.lo \ + sqr.lo sqrt.lo sub.lo sub_d.lo sub_fr.lo sub_q.lo sub_si.lo \ + sub_ui.lo sub_z.lo swap.lo tan.lo tanh.lo ui_div.lo ui_sub.lo \ + union.lo urandom.lo z_div.lo z_sub.lo +libmpfi_la_OBJECTS = $(am_libmpfi_la_OBJECTS) +AM_V_lt = $(am__v_lt_@AM_V@) +am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@) +am__v_lt_0 = --silent +am__v_lt_1 = +libmpfi_la_LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ + $(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \ + $(libmpfi_la_LDFLAGS) $(LDFLAGS) -o $@ +AM_V_P = $(am__v_P_@AM_V@) +am__v_P_ = $(am__v_P_@AM_DEFAULT_V@) +am__v_P_0 = false +am__v_P_1 = : +AM_V_GEN = $(am__v_GEN_@AM_V@) +am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@) +am__v_GEN_0 = @echo " GEN " $@; +am__v_GEN_1 = +AM_V_at = $(am__v_at_@AM_V@) +am__v_at_ = $(am__v_at_@AM_DEFAULT_V@) +am__v_at_0 = @ +am__v_at_1 = +DEFAULT_INCLUDES = -I.@am__isrc@ -I$(top_builddir) +depcomp = $(SHELL) $(top_srcdir)/depcomp +am__maybe_remake_depfiles = depfiles +am__depfiles_remade = ./$(DEPDIR)/abs.Plo ./$(DEPDIR)/acos.Plo \ + ./$(DEPDIR)/acosh.Plo ./$(DEPDIR)/add.Plo \ + ./$(DEPDIR)/add_d.Plo ./$(DEPDIR)/add_fr.Plo \ + ./$(DEPDIR)/add_q.Plo ./$(DEPDIR)/add_si.Plo \ + ./$(DEPDIR)/add_ui.Plo ./$(DEPDIR)/add_z.Plo \ + ./$(DEPDIR)/alea.Plo ./$(DEPDIR)/asin.Plo \ + ./$(DEPDIR)/asinh.Plo ./$(DEPDIR)/atan.Plo \ + ./$(DEPDIR)/atan2.Plo ./$(DEPDIR)/atanh.Plo \ + ./$(DEPDIR)/bisect.Plo ./$(DEPDIR)/blow.Plo \ + ./$(DEPDIR)/cbrt.Plo ./$(DEPDIR)/clear.Plo \ + ./$(DEPDIR)/clears.Plo ./$(DEPDIR)/cmp.Plo \ + ./$(DEPDIR)/cmp_sym_pi.Plo ./$(DEPDIR)/constants.Plo \ + ./$(DEPDIR)/cos.Plo ./$(DEPDIR)/cosh.Plo ./$(DEPDIR)/cot.Plo \ + ./$(DEPDIR)/coth.Plo ./$(DEPDIR)/csc.Plo ./$(DEPDIR)/csch.Plo \ + ./$(DEPDIR)/d_div.Plo ./$(DEPDIR)/d_sub.Plo \ + ./$(DEPDIR)/diam.Plo ./$(DEPDIR)/div.Plo \ + ./$(DEPDIR)/div_2exp.Plo ./$(DEPDIR)/div_2si.Plo \ + ./$(DEPDIR)/div_2ui.Plo ./$(DEPDIR)/div_d.Plo \ + ./$(DEPDIR)/div_ext.Plo ./$(DEPDIR)/div_fr.Plo \ + ./$(DEPDIR)/div_q.Plo ./$(DEPDIR)/div_si.Plo \ + ./$(DEPDIR)/div_ui.Plo ./$(DEPDIR)/div_z.Plo \ + ./$(DEPDIR)/erandom.Plo ./$(DEPDIR)/error.Plo \ + ./$(DEPDIR)/exp.Plo ./$(DEPDIR)/exp10.Plo \ + ./$(DEPDIR)/exp10m1.Plo ./$(DEPDIR)/exp2.Plo \ + ./$(DEPDIR)/exp2m1.Plo ./$(DEPDIR)/expm1.Plo \ + ./$(DEPDIR)/fr_div.Plo ./$(DEPDIR)/fr_sub.Plo \ + ./$(DEPDIR)/get_d.Plo ./$(DEPDIR)/get_endpoints.Plo \ + ./$(DEPDIR)/get_fr.Plo ./$(DEPDIR)/get_prec.Plo \ + ./$(DEPDIR)/get_version.Plo ./$(DEPDIR)/has_zero.Plo \ + ./$(DEPDIR)/hypot.Plo ./$(DEPDIR)/increase.Plo \ + ./$(DEPDIR)/init.Plo ./$(DEPDIR)/init2.Plo \ + ./$(DEPDIR)/inits.Plo ./$(DEPDIR)/inits2.Plo \ + ./$(DEPDIR)/inp_str.Plo ./$(DEPDIR)/intersect.Plo \ + ./$(DEPDIR)/interv_d.Plo ./$(DEPDIR)/interv_fr.Plo \ + ./$(DEPDIR)/interv_q.Plo ./$(DEPDIR)/interv_si.Plo \ + ./$(DEPDIR)/interv_ui.Plo ./$(DEPDIR)/interv_z.Plo \ + ./$(DEPDIR)/inv.Plo ./$(DEPDIR)/is_empty.Plo \ + ./$(DEPDIR)/is_inside.Plo ./$(DEPDIR)/log.Plo \ + ./$(DEPDIR)/log10.Plo ./$(DEPDIR)/log10p1.Plo \ + ./$(DEPDIR)/log1p.Plo ./$(DEPDIR)/log2.Plo \ + ./$(DEPDIR)/log2p1.Plo ./$(DEPDIR)/mag.Plo ./$(DEPDIR)/mid.Plo \ + ./$(DEPDIR)/mig.Plo ./$(DEPDIR)/mul.Plo \ + ./$(DEPDIR)/mul_2exp.Plo ./$(DEPDIR)/mul_2si.Plo \ + ./$(DEPDIR)/mul_2ui.Plo ./$(DEPDIR)/mul_d.Plo \ + ./$(DEPDIR)/mul_fr.Plo ./$(DEPDIR)/mul_q.Plo \ + ./$(DEPDIR)/mul_si.Plo ./$(DEPDIR)/mul_ui.Plo \ + ./$(DEPDIR)/mul_z.Plo ./$(DEPDIR)/neg.Plo \ + ./$(DEPDIR)/nrandom.Plo ./$(DEPDIR)/out_str.Plo \ + ./$(DEPDIR)/predicates.Plo ./$(DEPDIR)/print_binary.Plo \ + ./$(DEPDIR)/put.Plo ./$(DEPDIR)/put_d.Plo \ + ./$(DEPDIR)/put_fr.Plo ./$(DEPDIR)/put_q.Plo \ + ./$(DEPDIR)/put_si.Plo ./$(DEPDIR)/put_ui.Plo \ + ./$(DEPDIR)/put_z.Plo ./$(DEPDIR)/q_div.Plo \ + ./$(DEPDIR)/q_sub.Plo ./$(DEPDIR)/quadrant.Plo \ + ./$(DEPDIR)/rec_sqrt.Plo ./$(DEPDIR)/revert_if_needed.Plo \ + ./$(DEPDIR)/round_prec.Plo ./$(DEPDIR)/sec.Plo \ + ./$(DEPDIR)/sech.Plo ./$(DEPDIR)/set.Plo ./$(DEPDIR)/set_d.Plo \ + ./$(DEPDIR)/set_flt.Plo ./$(DEPDIR)/set_fr.Plo \ + ./$(DEPDIR)/set_ld.Plo ./$(DEPDIR)/set_prec.Plo \ + ./$(DEPDIR)/set_q.Plo ./$(DEPDIR)/set_si.Plo \ + ./$(DEPDIR)/set_str.Plo ./$(DEPDIR)/set_ui.Plo \ + ./$(DEPDIR)/set_z.Plo ./$(DEPDIR)/si_div.Plo \ + ./$(DEPDIR)/si_sub.Plo ./$(DEPDIR)/sign.Plo \ + ./$(DEPDIR)/sin.Plo ./$(DEPDIR)/sinh.Plo ./$(DEPDIR)/sqr.Plo \ + ./$(DEPDIR)/sqrt.Plo ./$(DEPDIR)/sub.Plo ./$(DEPDIR)/sub_d.Plo \ + ./$(DEPDIR)/sub_fr.Plo ./$(DEPDIR)/sub_q.Plo \ + ./$(DEPDIR)/sub_si.Plo ./$(DEPDIR)/sub_ui.Plo \ + ./$(DEPDIR)/sub_z.Plo ./$(DEPDIR)/swap.Plo ./$(DEPDIR)/tan.Plo \ + ./$(DEPDIR)/tanh.Plo ./$(DEPDIR)/ui_div.Plo \ + ./$(DEPDIR)/ui_sub.Plo ./$(DEPDIR)/union.Plo \ + ./$(DEPDIR)/urandom.Plo ./$(DEPDIR)/z_div.Plo \ + ./$(DEPDIR)/z_sub.Plo +am__mv = mv -f +COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \ + $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) +LTCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ + $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) \ + $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \ + $(AM_CFLAGS) $(CFLAGS) +AM_V_CC = $(am__v_CC_@AM_V@) +am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@) +am__v_CC_0 = @echo " CC " $@; +am__v_CC_1 = +CCLD = $(CC) +LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ + $(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \ + $(AM_LDFLAGS) $(LDFLAGS) -o $@ +AM_V_CCLD = $(am__v_CCLD_@AM_V@) +am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@) +am__v_CCLD_0 = @echo " CCLD " $@; +am__v_CCLD_1 = +SOURCES = $(libmpfi_la_SOURCES) +DIST_SOURCES = $(libmpfi_la_SOURCES) +am__can_run_installinfo = \ + case $$AM_UPDATE_INFO_DIR in \ + n|no|NO) false;; \ + *) (install-info --version) >/dev/null 2>&1;; \ + esac +am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP) +# Read a list of newline-separated strings from the standard input, +# and print each of them once, without duplicates. Input order is +# *not* preserved. +am__uniquify_input = $(AWK) '\ + BEGIN { nonempty = 0; } \ + { items[$$0] = 1; nonempty = 1; } \ + END { if (nonempty) { for (i in items) print i; }; } \ +' +# Make sure the list of sources is unique. This is necessary because, +# e.g., the same source file might be shared among _SOURCES variables +# for different programs/libraries. +am__define_uniq_tagged_files = \ + list='$(am__tagged_files)'; \ + unique=`for i in $$list; do \ + if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \ + done | $(am__uniquify_input)` +am__DIST_COMMON = $(srcdir)/Makefile.in $(top_srcdir)/depcomp +DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) +ACLOCAL = @ACLOCAL@ +AMTAR = @AMTAR@ +AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@ +AR = @AR@ +AUTOCONF = @AUTOCONF@ +AUTOHEADER = @AUTOHEADER@ +AUTOMAKE = @AUTOMAKE@ +AWK = @AWK@ +CC = @CC@ +CCDEPMODE = @CCDEPMODE@ +CFLAGS = @CFLAGS@ +CPP = @CPP@ +CPPFLAGS = @CPPFLAGS@ +CSCOPE = @CSCOPE@ +CTAGS = @CTAGS@ +CYGPATH_W = @CYGPATH_W@ +DEFS = @DEFS@ +DEPDIR = @DEPDIR@ +DLLTOOL = @DLLTOOL@ +DSYMUTIL = @DSYMUTIL@ +DUMPBIN = @DUMPBIN@ +ECHO_C = @ECHO_C@ +ECHO_N = @ECHO_N@ +ECHO_T = @ECHO_T@ +EGREP = @EGREP@ +ETAGS = @ETAGS@ +EXEEXT = @EXEEXT@ +FGREP = @FGREP@ +GREP = @GREP@ +INSTALL = @INSTALL@ +INSTALL_DATA = @INSTALL_DATA@ +INSTALL_PROGRAM = @INSTALL_PROGRAM@ +INSTALL_SCRIPT = @INSTALL_SCRIPT@ +INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ +LD = @LD@ +LDFLAGS = @LDFLAGS@ +LIBOBJS = @LIBOBJS@ +LIBS = @LIBS@ +LIBTOOL = @LIBTOOL@ +LIPO = @LIPO@ +LN_S = @LN_S@ +LTLIBOBJS = @LTLIBOBJS@ +LT_SYS_LIBRARY_PATH = @LT_SYS_LIBRARY_PATH@ +MAINT = @MAINT@ +MAKEINFO = @MAKEINFO@ +MANIFEST_TOOL = @MANIFEST_TOOL@ +MKDIR_P = @MKDIR_P@ +NM = @NM@ +NMEDIT = @NMEDIT@ +OBJDUMP = @OBJDUMP@ +OBJEXT = @OBJEXT@ +OTOOL = @OTOOL@ +OTOOL64 = @OTOOL64@ +PACKAGE = @PACKAGE@ +PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ +PACKAGE_NAME = @PACKAGE_NAME@ +PACKAGE_STRING = @PACKAGE_STRING@ +PACKAGE_TARNAME = @PACKAGE_TARNAME@ +PACKAGE_URL = @PACKAGE_URL@ +PACKAGE_VERSION = @PACKAGE_VERSION@ +PATH_SEPARATOR = @PATH_SEPARATOR@ +RANLIB = @RANLIB@ +SED = @SED@ +SET_MAKE = @SET_MAKE@ +SHELL = @SHELL@ +STRIP = @STRIP@ +VERSION = @VERSION@ +abs_builddir = @abs_builddir@ +abs_srcdir = @abs_srcdir@ +abs_top_builddir = @abs_top_builddir@ +abs_top_srcdir = @abs_top_srcdir@ +ac_ct_AR = @ac_ct_AR@ +ac_ct_CC = @ac_ct_CC@ +ac_ct_DUMPBIN = @ac_ct_DUMPBIN@ +am__include = @am__include@ +am__leading_dot = @am__leading_dot@ +am__quote = @am__quote@ +am__tar = @am__tar@ +am__untar = @am__untar@ +bindir = @bindir@ +build = @build@ +build_alias = @build_alias@ +build_cpu = @build_cpu@ +build_os = @build_os@ +build_vendor = @build_vendor@ +builddir = @builddir@ +datadir = @datadir@ +datarootdir = @datarootdir@ +docdir = @docdir@ +dvidir = @dvidir@ +exec_prefix = @exec_prefix@ +host = @host@ +host_alias = @host_alias@ +host_cpu = @host_cpu@ +host_os = @host_os@ +host_vendor = @host_vendor@ +htmldir = @htmldir@ +includedir = @includedir@ +infodir = @infodir@ +install_sh = @install_sh@ +libdir = @libdir@ +libexecdir = @libexecdir@ +localedir = @localedir@ +localstatedir = @localstatedir@ +mandir = @mandir@ +mkdir_p = @mkdir_p@ +oldincludedir = @oldincludedir@ +pdfdir = @pdfdir@ +prefix = @prefix@ +program_transform_name = @program_transform_name@ +psdir = @psdir@ +runstatedir = @runstatedir@ +sbindir = @sbindir@ +sharedstatedir = @sharedstatedir@ +srcdir = @srcdir@ +sysconfdir = @sysconfdir@ +target_alias = @target_alias@ +top_build_prefix = @top_build_prefix@ +top_builddir = @top_builddir@ +top_srcdir = @top_srcdir@ +lib_LTLIBRARIES = libmpfi.la + +# apparently the type "intmax_t" s not always known +# and consequently set_sj, set_uj cause trouble +#libmpfi_la_SOURCES = mpfi-impl.h abs.c acos.c acosh.c add.c \ +# add_d.c add_fr.c add_q.c add_si.c add_ui.c add_z.c alea.c \ +# asin.c asinh.c atan2.c atan.c atanh.c bisect.c blow.c \ +# cbrt.c clear.c clears.c cmp.c cmp_sym_pi.c constants.c cos.c \ +# cosh.c csc.c csch.c cot.c coth.c d_div.c d_sub.c diam.c \ +# div.c div_2exp.c div_2si.c div_2ui.c div_d.c div_ext.c div_fr.c \ +# div_q.c div_si.c div_ui.c div_z.c erandom.c error.c exp.c \ +# exp2.c exp10.c expm1.c exp2m1.c exp10m1.c fr_div.c fr_sub.c get_endpoints.c get_fr.c \ +# get_d.c get_prec.c get_version.c has_zero.c hypot.c \ +# increase.c init.c init2.c inits.c inits2.c intersect.c \ +# interv_d.c interv_fr.c \ +# interv_q.c interv_si.c interv_ui.c interv_z.c inp_str.c \ +# inv.c is_empty.c is_inside.c log.c log10.c log1p.c log2.c log2p1.c log10p1.c \ +# mag.c mid.c mig.c mul.c mul_2exp.c mul_2si.c mul_2ui.c \ +# mul_d.c mul_fr.c mul_q.c mul_si.c mul_ui.c mul_z.c neg.c \ +# nrandom.c out_str.c predicates.c print_binary.c put.c \ +# put_d.c put_fr.c put_q.c put_si.c put_ui.c put_z.c q_div.c \ +# q_sub.c quadrant.c rec_sqrt.c revert_if_needed.c round_prec.c sec.c \ +# sech.c set.c set_d.c set_flt.c set_fr.c set_ld.c set_prec.c set_q.c \ +# set_si.c set_sj.c set_str.c set_ui.c set_uj.c set_z.c \ +# si_div.c si_sub.c sign.c sin.c \ +# sinh.c sqr.c sqrt.c sub.c sub_d.c sub_fr.c sub_q.c \ +# sub_si.c sub_ui.c sub_z.c swap.c tan.c tanh.c ui_div.c \ +# ui_sub.c union.c urandom.c z_div.c z_sub.c +libmpfi_la_SOURCES = mpfi-impl.h abs.c acos.c acosh.c add.c \ + add_d.c add_fr.c add_q.c add_si.c add_ui.c add_z.c alea.c \ + asin.c asinh.c atan2.c atan.c atanh.c bisect.c blow.c \ + cbrt.c clear.c clears.c cmp.c cmp_sym_pi.c constants.c cos.c \ + cosh.c csc.c csch.c cot.c coth.c d_div.c d_sub.c diam.c \ + div.c div_2exp.c div_2si.c div_2ui.c div_d.c div_ext.c div_fr.c \ + div_q.c div_si.c div_ui.c div_z.c erandom.c error.c exp.c \ + exp2.c exp10.c expm1.c exp2m1.c exp10m1.c fr_div.c fr_sub.c get_endpoints.c get_fr.c \ + get_d.c get_prec.c get_version.c has_zero.c hypot.c \ + increase.c init.c init2.c inits.c inits2.c intersect.c \ + interv_d.c interv_fr.c \ + interv_q.c interv_si.c interv_ui.c interv_z.c inp_str.c \ + inv.c is_empty.c is_inside.c log.c log10.c log1p.c log2.c log2p1.c log10p1.c \ + mag.c mid.c mig.c mul.c mul_2exp.c mul_2si.c mul_2ui.c \ + mul_d.c mul_fr.c mul_q.c mul_si.c mul_ui.c mul_z.c neg.c \ + nrandom.c out_str.c predicates.c print_binary.c put.c \ + put_d.c put_fr.c put_q.c put_si.c put_ui.c put_z.c q_div.c \ + q_sub.c quadrant.c rec_sqrt.c revert_if_needed.c round_prec.c sec.c \ + sech.c set.c set_d.c set_flt.c set_fr.c set_ld.c set_prec.c set_q.c \ + set_si.c set_str.c set_ui.c set_z.c \ + si_div.c si_sub.c sign.c sin.c \ + sinh.c sqr.c sqrt.c sub.c sub_d.c sub_fr.c sub_q.c \ + sub_si.c sub_ui.c sub_z.c swap.c tan.c tanh.c ui_div.c \ + ui_sub.c union.c urandom.c z_div.c z_sub.c + +libmpfi_la_LDFLAGS = -no-undefined +AM_CPPFLAGS = -I$(top_srcdir) +all: all-am + +.SUFFIXES: +.SUFFIXES: .c .lo .o .obj +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(am__configure_deps) + @for dep in $?; do \ + case '$(am__configure_deps)' in \ + *$$dep*) \ + ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \ + && { if test -f $@; then exit 0; else break; fi; }; \ + exit 1;; \ + esac; \ + done; \ + echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnu src/Makefile'; \ + $(am__cd) $(top_srcdir) && \ + $(AUTOMAKE) --gnu src/Makefile +Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status + @case '$?' in \ + *config.status*) \ + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \ + *) \ + echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles)'; \ + cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles);; \ + esac; + +$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh + +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(am__aclocal_m4_deps): + +install-libLTLIBRARIES: $(lib_LTLIBRARIES) + @$(NORMAL_INSTALL) + @list='$(lib_LTLIBRARIES)'; test -n "$(libdir)" || list=; \ + list2=; for p in $$list; do \ + if test -f $$p; then \ + list2="$$list2 $$p"; \ + else :; fi; \ + done; \ + test -z "$$list2" || { \ + echo " $(MKDIR_P) '$(DESTDIR)$(libdir)'"; \ + $(MKDIR_P) "$(DESTDIR)$(libdir)" || exit 1; \ + echo " $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=install $(INSTALL) $(INSTALL_STRIP_FLAG) $$list2 '$(DESTDIR)$(libdir)'"; \ + $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=install $(INSTALL) $(INSTALL_STRIP_FLAG) $$list2 "$(DESTDIR)$(libdir)"; \ + } + +uninstall-libLTLIBRARIES: + @$(NORMAL_UNINSTALL) + @list='$(lib_LTLIBRARIES)'; test -n "$(libdir)" || list=; \ + for p in $$list; do \ + $(am__strip_dir) \ + echo " $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=uninstall rm -f '$(DESTDIR)$(libdir)/$$f'"; \ + $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=uninstall rm -f "$(DESTDIR)$(libdir)/$$f"; \ + done + +clean-libLTLIBRARIES: + -test -z "$(lib_LTLIBRARIES)" || rm -f $(lib_LTLIBRARIES) + @list='$(lib_LTLIBRARIES)'; \ + locs=`for p in $$list; do echo $$p; done | \ + sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \ + sort -u`; \ + test -z "$$locs" || { \ + echo rm -f $${locs}; \ + rm -f $${locs}; \ + } + +libmpfi.la: $(libmpfi_la_OBJECTS) $(libmpfi_la_DEPENDENCIES) $(EXTRA_libmpfi_la_DEPENDENCIES) + $(AM_V_CCLD)$(libmpfi_la_LINK) -rpath $(libdir) $(libmpfi_la_OBJECTS) $(libmpfi_la_LIBADD) $(LIBS) + +mostlyclean-compile: + -rm -f *.$(OBJEXT) + +distclean-compile: + -rm -f *.tab.c + +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/abs.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/acos.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/acosh.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/add_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/alea.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/asin.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/asinh.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/atan.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/atan2.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/atanh.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/bisect.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/blow.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cbrt.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/clear.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/clears.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cmp.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cmp_sym_pi.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/constants.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cos.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cosh.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cot.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/coth.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/csc.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/csch.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/d_div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/d_sub.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/diam.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_2exp.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_2si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_2ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_ext.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/div_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/erandom.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/error.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/exp.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/exp10.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/exp10m1.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/exp2.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/exp2m1.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/expm1.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/fr_div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/fr_sub.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/get_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/get_endpoints.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/get_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/get_prec.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/get_version.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/has_zero.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/hypot.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/increase.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/init.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/init2.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/inits.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/inits2.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/inp_str.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/intersect.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/interv_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/interv_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/interv_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/interv_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/interv_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/interv_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/inv.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/is_empty.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/is_inside.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/log.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/log10.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/log10p1.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/log1p.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/log2.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/log2p1.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mag.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mid.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mig.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_2exp.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_2si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_2ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mul_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/neg.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/nrandom.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/out_str.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/predicates.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/print_binary.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/put_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/q_div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/q_sub.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/quadrant.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/rec_sqrt.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/revert_if_needed.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/round_prec.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sec.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sech.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_flt.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_ld.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_prec.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_str.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/set_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/si_div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/si_sub.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sign.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sin.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sinh.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sqr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sqrt.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub_d.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub_fr.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub_q.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub_si.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub_ui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sub_z.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/swap.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tan.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tanh.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/ui_div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/ui_sub.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/union.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/urandom.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/z_div.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/z_sub.Plo@am__quote@ # am--include-marker + +$(am__depfiles_remade): + @$(MKDIR_P) $(@D) + @echo '# dummy' >$@-t && $(am__mv) $@-t $@ + +am--depfiles: $(am__depfiles_remade) + +.c.o: +@am__fastdepCC_TRUE@ $(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $< +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ $< + +.c.obj: +@am__fastdepCC_TRUE@ $(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ `$(CYGPATH_W) '$<'` +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ `$(CYGPATH_W) '$<'` + +.c.lo: +@am__fastdepCC_TRUE@ $(AM_V_CC)$(LTCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $< +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Plo +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $< + +mostlyclean-libtool: + -rm -f *.lo + +clean-libtool: + -rm -rf .libs _libs + +ID: $(am__tagged_files) + $(am__define_uniq_tagged_files); mkid -fID $$unique +tags: tags-am +TAGS: tags + +tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) + set x; \ + here=`pwd`; \ + $(am__define_uniq_tagged_files); \ + shift; \ + if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \ + test -n "$$unique" || unique=$$empty_fix; \ + if test $$# -gt 0; then \ + $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ + "$$@" $$unique; \ + else \ + $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ + $$unique; \ + fi; \ + fi +ctags: ctags-am + +CTAGS: ctags +ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) + $(am__define_uniq_tagged_files); \ + test -z "$(CTAGS_ARGS)$$unique" \ + || $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \ + $$unique + +GTAGS: + here=`$(am__cd) $(top_builddir) && pwd` \ + && $(am__cd) $(top_srcdir) \ + && gtags -i $(GTAGS_ARGS) "$$here" +cscopelist: cscopelist-am + +cscopelist-am: $(am__tagged_files) + list='$(am__tagged_files)'; \ + case "$(srcdir)" in \ + [\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \ + *) sdir=$(subdir)/$(srcdir) ;; \ + esac; \ + for i in $$list; do \ + if test -f "$$i"; then \ + echo "$(subdir)/$$i"; \ + else \ + echo "$$sdir/$$i"; \ + fi; \ + done >> $(top_builddir)/cscope.files + +distclean-tags: + -rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags +distdir: $(BUILT_SOURCES) + $(MAKE) $(AM_MAKEFLAGS) distdir-am + +distdir-am: $(DISTFILES) + @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + list='$(DISTFILES)'; \ + dist_files=`for file in $$list; do echo $$file; done | \ + sed -e "s|^$$srcdirstrip/||;t" \ + -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ + case $$dist_files in \ + */*) $(MKDIR_P) `echo "$$dist_files" | \ + sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ + sort -u` ;; \ + esac; \ + for file in $$dist_files; do \ + if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ + if test -d $$d/$$file; then \ + dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ + if test -d "$(distdir)/$$file"; then \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ + cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ + else \ + test -f "$(distdir)/$$file" \ + || cp -p $$d/$$file "$(distdir)/$$file" \ + || exit 1; \ + fi; \ + done +check-am: all-am +check: check-am +all-am: Makefile $(LTLIBRARIES) +installdirs: + for dir in "$(DESTDIR)$(libdir)"; do \ + test -z "$$dir" || $(MKDIR_P) "$$dir"; \ + done +install: install-am +install-exec: install-exec-am +install-data: install-data-am +uninstall: uninstall-am + +install-am: all-am + @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am + +installcheck: installcheck-am +install-strip: + if test -z '$(STRIP)'; then \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + install; \ + else \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \ + fi +mostlyclean-generic: + +clean-generic: + +distclean-generic: + -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) + -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + +maintainer-clean-generic: + @echo "This command is intended for maintainers to use" + @echo "it deletes files that may require special tools to rebuild." +clean: clean-am + +clean-am: clean-generic clean-libLTLIBRARIES clean-libtool \ + mostlyclean-am + +distclean: distclean-am + -rm -f ./$(DEPDIR)/abs.Plo + -rm -f ./$(DEPDIR)/acos.Plo + -rm -f ./$(DEPDIR)/acosh.Plo + -rm -f ./$(DEPDIR)/add.Plo + -rm -f ./$(DEPDIR)/add_d.Plo + -rm -f ./$(DEPDIR)/add_fr.Plo + -rm -f ./$(DEPDIR)/add_q.Plo + -rm -f ./$(DEPDIR)/add_si.Plo + -rm -f ./$(DEPDIR)/add_ui.Plo + -rm -f ./$(DEPDIR)/add_z.Plo + -rm -f ./$(DEPDIR)/alea.Plo + -rm -f ./$(DEPDIR)/asin.Plo + -rm -f ./$(DEPDIR)/asinh.Plo + -rm -f ./$(DEPDIR)/atan.Plo + -rm -f ./$(DEPDIR)/atan2.Plo + -rm -f ./$(DEPDIR)/atanh.Plo + -rm -f ./$(DEPDIR)/bisect.Plo + -rm -f ./$(DEPDIR)/blow.Plo + -rm -f ./$(DEPDIR)/cbrt.Plo + -rm -f ./$(DEPDIR)/clear.Plo + -rm -f ./$(DEPDIR)/clears.Plo + -rm -f ./$(DEPDIR)/cmp.Plo + -rm -f ./$(DEPDIR)/cmp_sym_pi.Plo + -rm -f ./$(DEPDIR)/constants.Plo + -rm -f ./$(DEPDIR)/cos.Plo + -rm -f ./$(DEPDIR)/cosh.Plo + -rm -f ./$(DEPDIR)/cot.Plo + -rm -f ./$(DEPDIR)/coth.Plo + -rm -f ./$(DEPDIR)/csc.Plo + -rm -f ./$(DEPDIR)/csch.Plo + -rm -f ./$(DEPDIR)/d_div.Plo + -rm -f ./$(DEPDIR)/d_sub.Plo + -rm -f ./$(DEPDIR)/diam.Plo + -rm -f ./$(DEPDIR)/div.Plo + -rm -f ./$(DEPDIR)/div_2exp.Plo + -rm -f ./$(DEPDIR)/div_2si.Plo + -rm -f ./$(DEPDIR)/div_2ui.Plo + -rm -f ./$(DEPDIR)/div_d.Plo + -rm -f ./$(DEPDIR)/div_ext.Plo + -rm -f ./$(DEPDIR)/div_fr.Plo + -rm -f ./$(DEPDIR)/div_q.Plo + -rm -f ./$(DEPDIR)/div_si.Plo + -rm -f ./$(DEPDIR)/div_ui.Plo + -rm -f ./$(DEPDIR)/div_z.Plo + -rm -f ./$(DEPDIR)/erandom.Plo + -rm -f ./$(DEPDIR)/error.Plo + -rm -f ./$(DEPDIR)/exp.Plo + -rm -f ./$(DEPDIR)/exp10.Plo + -rm -f ./$(DEPDIR)/exp10m1.Plo + -rm -f ./$(DEPDIR)/exp2.Plo + -rm -f ./$(DEPDIR)/exp2m1.Plo + -rm -f ./$(DEPDIR)/expm1.Plo + -rm -f ./$(DEPDIR)/fr_div.Plo + -rm -f ./$(DEPDIR)/fr_sub.Plo + -rm -f ./$(DEPDIR)/get_d.Plo + -rm -f ./$(DEPDIR)/get_endpoints.Plo + -rm -f ./$(DEPDIR)/get_fr.Plo + -rm -f ./$(DEPDIR)/get_prec.Plo + -rm -f ./$(DEPDIR)/get_version.Plo + -rm -f ./$(DEPDIR)/has_zero.Plo + -rm -f ./$(DEPDIR)/hypot.Plo + -rm -f ./$(DEPDIR)/increase.Plo + -rm -f ./$(DEPDIR)/init.Plo + -rm -f ./$(DEPDIR)/init2.Plo + -rm -f ./$(DEPDIR)/inits.Plo + -rm -f ./$(DEPDIR)/inits2.Plo + -rm -f ./$(DEPDIR)/inp_str.Plo + -rm -f ./$(DEPDIR)/intersect.Plo + -rm -f ./$(DEPDIR)/interv_d.Plo + -rm -f ./$(DEPDIR)/interv_fr.Plo + -rm -f ./$(DEPDIR)/interv_q.Plo + -rm -f ./$(DEPDIR)/interv_si.Plo + -rm -f ./$(DEPDIR)/interv_ui.Plo + -rm -f ./$(DEPDIR)/interv_z.Plo + -rm -f ./$(DEPDIR)/inv.Plo + -rm -f ./$(DEPDIR)/is_empty.Plo + -rm -f ./$(DEPDIR)/is_inside.Plo + -rm -f ./$(DEPDIR)/log.Plo + -rm -f ./$(DEPDIR)/log10.Plo + -rm -f ./$(DEPDIR)/log10p1.Plo + -rm -f ./$(DEPDIR)/log1p.Plo + -rm -f ./$(DEPDIR)/log2.Plo + -rm -f ./$(DEPDIR)/log2p1.Plo + -rm -f ./$(DEPDIR)/mag.Plo + -rm -f ./$(DEPDIR)/mid.Plo + -rm -f ./$(DEPDIR)/mig.Plo + -rm -f ./$(DEPDIR)/mul.Plo + -rm -f ./$(DEPDIR)/mul_2exp.Plo + -rm -f ./$(DEPDIR)/mul_2si.Plo + -rm -f ./$(DEPDIR)/mul_2ui.Plo + -rm -f ./$(DEPDIR)/mul_d.Plo + -rm -f ./$(DEPDIR)/mul_fr.Plo + -rm -f ./$(DEPDIR)/mul_q.Plo + -rm -f ./$(DEPDIR)/mul_si.Plo + -rm -f ./$(DEPDIR)/mul_ui.Plo + -rm -f ./$(DEPDIR)/mul_z.Plo + -rm -f ./$(DEPDIR)/neg.Plo + -rm -f ./$(DEPDIR)/nrandom.Plo + -rm -f ./$(DEPDIR)/out_str.Plo + -rm -f ./$(DEPDIR)/predicates.Plo + -rm -f ./$(DEPDIR)/print_binary.Plo + -rm -f ./$(DEPDIR)/put.Plo + -rm -f ./$(DEPDIR)/put_d.Plo + -rm -f ./$(DEPDIR)/put_fr.Plo + -rm -f ./$(DEPDIR)/put_q.Plo + -rm -f ./$(DEPDIR)/put_si.Plo + -rm -f ./$(DEPDIR)/put_ui.Plo + -rm -f ./$(DEPDIR)/put_z.Plo + -rm -f ./$(DEPDIR)/q_div.Plo + -rm -f ./$(DEPDIR)/q_sub.Plo + -rm -f ./$(DEPDIR)/quadrant.Plo + -rm -f ./$(DEPDIR)/rec_sqrt.Plo + -rm -f ./$(DEPDIR)/revert_if_needed.Plo + -rm -f ./$(DEPDIR)/round_prec.Plo + -rm -f ./$(DEPDIR)/sec.Plo + -rm -f ./$(DEPDIR)/sech.Plo + -rm -f ./$(DEPDIR)/set.Plo + -rm -f ./$(DEPDIR)/set_d.Plo + -rm -f ./$(DEPDIR)/set_flt.Plo + -rm -f ./$(DEPDIR)/set_fr.Plo + -rm -f ./$(DEPDIR)/set_ld.Plo + -rm -f ./$(DEPDIR)/set_prec.Plo + -rm -f ./$(DEPDIR)/set_q.Plo + -rm -f ./$(DEPDIR)/set_si.Plo + -rm -f ./$(DEPDIR)/set_str.Plo + -rm -f ./$(DEPDIR)/set_ui.Plo + -rm -f ./$(DEPDIR)/set_z.Plo + -rm -f ./$(DEPDIR)/si_div.Plo + -rm -f ./$(DEPDIR)/si_sub.Plo + -rm -f ./$(DEPDIR)/sign.Plo + -rm -f ./$(DEPDIR)/sin.Plo + -rm -f ./$(DEPDIR)/sinh.Plo + -rm -f ./$(DEPDIR)/sqr.Plo + -rm -f ./$(DEPDIR)/sqrt.Plo + -rm -f ./$(DEPDIR)/sub.Plo + -rm -f ./$(DEPDIR)/sub_d.Plo + -rm -f ./$(DEPDIR)/sub_fr.Plo + -rm -f ./$(DEPDIR)/sub_q.Plo + -rm -f ./$(DEPDIR)/sub_si.Plo + -rm -f ./$(DEPDIR)/sub_ui.Plo + -rm -f ./$(DEPDIR)/sub_z.Plo + -rm -f ./$(DEPDIR)/swap.Plo + -rm -f ./$(DEPDIR)/tan.Plo + -rm -f ./$(DEPDIR)/tanh.Plo + -rm -f ./$(DEPDIR)/ui_div.Plo + -rm -f ./$(DEPDIR)/ui_sub.Plo + -rm -f ./$(DEPDIR)/union.Plo + -rm -f ./$(DEPDIR)/urandom.Plo + -rm -f ./$(DEPDIR)/z_div.Plo + -rm -f ./$(DEPDIR)/z_sub.Plo + -rm -f Makefile +distclean-am: clean-am distclean-compile distclean-generic \ + distclean-tags + +dvi: dvi-am + +dvi-am: + +html: html-am + +html-am: + +info: info-am + +info-am: + +install-data-am: + +install-dvi: install-dvi-am + +install-dvi-am: + +install-exec-am: install-libLTLIBRARIES + +install-html: install-html-am + +install-html-am: + +install-info: install-info-am + +install-info-am: + +install-man: + +install-pdf: install-pdf-am + +install-pdf-am: + +install-ps: install-ps-am + +install-ps-am: + +installcheck-am: + +maintainer-clean: maintainer-clean-am + -rm -f ./$(DEPDIR)/abs.Plo + -rm -f ./$(DEPDIR)/acos.Plo + -rm -f ./$(DEPDIR)/acosh.Plo + -rm -f ./$(DEPDIR)/add.Plo + -rm -f ./$(DEPDIR)/add_d.Plo + -rm -f ./$(DEPDIR)/add_fr.Plo + -rm -f ./$(DEPDIR)/add_q.Plo + -rm -f ./$(DEPDIR)/add_si.Plo + -rm -f ./$(DEPDIR)/add_ui.Plo + -rm -f ./$(DEPDIR)/add_z.Plo + -rm -f ./$(DEPDIR)/alea.Plo + -rm -f ./$(DEPDIR)/asin.Plo + -rm -f ./$(DEPDIR)/asinh.Plo + -rm -f ./$(DEPDIR)/atan.Plo + -rm -f ./$(DEPDIR)/atan2.Plo + -rm -f ./$(DEPDIR)/atanh.Plo + -rm -f ./$(DEPDIR)/bisect.Plo + -rm -f ./$(DEPDIR)/blow.Plo + -rm -f ./$(DEPDIR)/cbrt.Plo + -rm -f ./$(DEPDIR)/clear.Plo + -rm -f ./$(DEPDIR)/clears.Plo + -rm -f ./$(DEPDIR)/cmp.Plo + -rm -f ./$(DEPDIR)/cmp_sym_pi.Plo + -rm -f ./$(DEPDIR)/constants.Plo + -rm -f ./$(DEPDIR)/cos.Plo + -rm -f ./$(DEPDIR)/cosh.Plo + -rm -f ./$(DEPDIR)/cot.Plo + -rm -f ./$(DEPDIR)/coth.Plo + -rm -f ./$(DEPDIR)/csc.Plo + -rm -f ./$(DEPDIR)/csch.Plo + -rm -f ./$(DEPDIR)/d_div.Plo + -rm -f ./$(DEPDIR)/d_sub.Plo + -rm -f ./$(DEPDIR)/diam.Plo + -rm -f ./$(DEPDIR)/div.Plo + -rm -f ./$(DEPDIR)/div_2exp.Plo + -rm -f ./$(DEPDIR)/div_2si.Plo + -rm -f ./$(DEPDIR)/div_2ui.Plo + -rm -f ./$(DEPDIR)/div_d.Plo + -rm -f ./$(DEPDIR)/div_ext.Plo + -rm -f ./$(DEPDIR)/div_fr.Plo + -rm -f ./$(DEPDIR)/div_q.Plo + -rm -f ./$(DEPDIR)/div_si.Plo + -rm -f ./$(DEPDIR)/div_ui.Plo + -rm -f ./$(DEPDIR)/div_z.Plo + -rm -f ./$(DEPDIR)/erandom.Plo + -rm -f ./$(DEPDIR)/error.Plo + -rm -f ./$(DEPDIR)/exp.Plo + -rm -f ./$(DEPDIR)/exp10.Plo + -rm -f ./$(DEPDIR)/exp10m1.Plo + -rm -f ./$(DEPDIR)/exp2.Plo + -rm -f ./$(DEPDIR)/exp2m1.Plo + -rm -f ./$(DEPDIR)/expm1.Plo + -rm -f ./$(DEPDIR)/fr_div.Plo + -rm -f ./$(DEPDIR)/fr_sub.Plo + -rm -f ./$(DEPDIR)/get_d.Plo + -rm -f ./$(DEPDIR)/get_endpoints.Plo + -rm -f ./$(DEPDIR)/get_fr.Plo + -rm -f ./$(DEPDIR)/get_prec.Plo + -rm -f ./$(DEPDIR)/get_version.Plo + -rm -f ./$(DEPDIR)/has_zero.Plo + -rm -f ./$(DEPDIR)/hypot.Plo + -rm -f ./$(DEPDIR)/increase.Plo + -rm -f ./$(DEPDIR)/init.Plo + -rm -f ./$(DEPDIR)/init2.Plo + -rm -f ./$(DEPDIR)/inits.Plo + -rm -f ./$(DEPDIR)/inits2.Plo + -rm -f ./$(DEPDIR)/inp_str.Plo + -rm -f ./$(DEPDIR)/intersect.Plo + -rm -f ./$(DEPDIR)/interv_d.Plo + -rm -f ./$(DEPDIR)/interv_fr.Plo + -rm -f ./$(DEPDIR)/interv_q.Plo + -rm -f ./$(DEPDIR)/interv_si.Plo + -rm -f ./$(DEPDIR)/interv_ui.Plo + -rm -f ./$(DEPDIR)/interv_z.Plo + -rm -f ./$(DEPDIR)/inv.Plo + -rm -f ./$(DEPDIR)/is_empty.Plo + -rm -f ./$(DEPDIR)/is_inside.Plo + -rm -f ./$(DEPDIR)/log.Plo + -rm -f ./$(DEPDIR)/log10.Plo + -rm -f ./$(DEPDIR)/log10p1.Plo + -rm -f ./$(DEPDIR)/log1p.Plo + -rm -f ./$(DEPDIR)/log2.Plo + -rm -f ./$(DEPDIR)/log2p1.Plo + -rm -f ./$(DEPDIR)/mag.Plo + -rm -f ./$(DEPDIR)/mid.Plo + -rm -f ./$(DEPDIR)/mig.Plo + -rm -f ./$(DEPDIR)/mul.Plo + -rm -f ./$(DEPDIR)/mul_2exp.Plo + -rm -f ./$(DEPDIR)/mul_2si.Plo + -rm -f ./$(DEPDIR)/mul_2ui.Plo + -rm -f ./$(DEPDIR)/mul_d.Plo + -rm -f ./$(DEPDIR)/mul_fr.Plo + -rm -f ./$(DEPDIR)/mul_q.Plo + -rm -f ./$(DEPDIR)/mul_si.Plo + -rm -f ./$(DEPDIR)/mul_ui.Plo + -rm -f ./$(DEPDIR)/mul_z.Plo + -rm -f ./$(DEPDIR)/neg.Plo + -rm -f ./$(DEPDIR)/nrandom.Plo + -rm -f ./$(DEPDIR)/out_str.Plo + -rm -f ./$(DEPDIR)/predicates.Plo + -rm -f ./$(DEPDIR)/print_binary.Plo + -rm -f ./$(DEPDIR)/put.Plo + -rm -f ./$(DEPDIR)/put_d.Plo + -rm -f ./$(DEPDIR)/put_fr.Plo + -rm -f ./$(DEPDIR)/put_q.Plo + -rm -f ./$(DEPDIR)/put_si.Plo + -rm -f ./$(DEPDIR)/put_ui.Plo + -rm -f ./$(DEPDIR)/put_z.Plo + -rm -f ./$(DEPDIR)/q_div.Plo + -rm -f ./$(DEPDIR)/q_sub.Plo + -rm -f ./$(DEPDIR)/quadrant.Plo + -rm -f ./$(DEPDIR)/rec_sqrt.Plo + -rm -f ./$(DEPDIR)/revert_if_needed.Plo + -rm -f ./$(DEPDIR)/round_prec.Plo + -rm -f ./$(DEPDIR)/sec.Plo + -rm -f ./$(DEPDIR)/sech.Plo + -rm -f ./$(DEPDIR)/set.Plo + -rm -f ./$(DEPDIR)/set_d.Plo + -rm -f ./$(DEPDIR)/set_flt.Plo + -rm -f ./$(DEPDIR)/set_fr.Plo + -rm -f ./$(DEPDIR)/set_ld.Plo + -rm -f ./$(DEPDIR)/set_prec.Plo + -rm -f ./$(DEPDIR)/set_q.Plo + -rm -f ./$(DEPDIR)/set_si.Plo + -rm -f ./$(DEPDIR)/set_str.Plo + -rm -f ./$(DEPDIR)/set_ui.Plo + -rm -f ./$(DEPDIR)/set_z.Plo + -rm -f ./$(DEPDIR)/si_div.Plo + -rm -f ./$(DEPDIR)/si_sub.Plo + -rm -f ./$(DEPDIR)/sign.Plo + -rm -f ./$(DEPDIR)/sin.Plo + -rm -f ./$(DEPDIR)/sinh.Plo + -rm -f ./$(DEPDIR)/sqr.Plo + -rm -f ./$(DEPDIR)/sqrt.Plo + -rm -f ./$(DEPDIR)/sub.Plo + -rm -f ./$(DEPDIR)/sub_d.Plo + -rm -f ./$(DEPDIR)/sub_fr.Plo + -rm -f ./$(DEPDIR)/sub_q.Plo + -rm -f ./$(DEPDIR)/sub_si.Plo + -rm -f ./$(DEPDIR)/sub_ui.Plo + -rm -f ./$(DEPDIR)/sub_z.Plo + -rm -f ./$(DEPDIR)/swap.Plo + -rm -f ./$(DEPDIR)/tan.Plo + -rm -f ./$(DEPDIR)/tanh.Plo + -rm -f ./$(DEPDIR)/ui_div.Plo + -rm -f ./$(DEPDIR)/ui_sub.Plo + -rm -f ./$(DEPDIR)/union.Plo + -rm -f ./$(DEPDIR)/urandom.Plo + -rm -f ./$(DEPDIR)/z_div.Plo + -rm -f ./$(DEPDIR)/z_sub.Plo + -rm -f Makefile +maintainer-clean-am: distclean-am maintainer-clean-generic + +mostlyclean: mostlyclean-am + +mostlyclean-am: mostlyclean-compile mostlyclean-generic \ + mostlyclean-libtool + +pdf: pdf-am + +pdf-am: + +ps: ps-am + +ps-am: + +uninstall-am: uninstall-libLTLIBRARIES + +.MAKE: install-am install-strip + +.PHONY: CTAGS GTAGS TAGS all all-am am--depfiles check check-am clean \ + clean-generic clean-libLTLIBRARIES clean-libtool cscopelist-am \ + ctags ctags-am distclean distclean-compile distclean-generic \ + distclean-libtool distclean-tags distdir dvi dvi-am html \ + html-am info info-am install install-am install-data \ + install-data-am install-dvi install-dvi-am install-exec \ + install-exec-am install-html install-html-am install-info \ + install-info-am install-libLTLIBRARIES install-man install-pdf \ + install-pdf-am install-ps install-ps-am install-strip \ + installcheck installcheck-am installdirs maintainer-clean \ + maintainer-clean-generic mostlyclean mostlyclean-compile \ + mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \ + tags tags-am uninstall uninstall-am uninstall-libLTLIBRARIES + +.PRECIOUS: Makefile + + +# Tell versions [3.59,3.63) of GNU make to not export all variables. +# Otherwise a system limit (for SysV at least) may be exceeded. +.NOEXPORT: diff --git a/Build/source/libs/mpfi/mpfi-src/src/abs.c b/Build/source/libs/mpfi/mpfi-src/src/abs.c new file mode 100644 index 00000000000..8c7379f6719 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/abs.c @@ -0,0 +1,58 @@ +/* abs.c -- Absolute value. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_abs (mpfi_ptr a, mpfi_srcptr b) +{ + /* the result a contains the absolute values of every element of b */ + int inexact_right, inexact = 0; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_IS_NONNEG (b)) + inexact = mpfi_set (a, b); + else if (MPFI_IS_NONPOS (b)) + inexact = mpfi_neg (a, b); + else { /* b contains 0 */ + if (mpfr_cmpabs (&(b->left), &(b->right)) < 0) { + inexact_right = mpfr_set (&(a->right), &(b->right), MPFI_RNDU); + } + else { + inexact_right = mpfr_neg (&(a->right), &(b->left), MPFI_RNDU); + } + mpfr_set_si (&(a->left), 0, MPFI_RNDD); + + if (inexact_right) + inexact += 2; + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/acos.c b/Build/source/libs/mpfi/mpfi-src/src/acos.c new file mode 100644 index 00000000000..615ce767f6c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/acos.c @@ -0,0 +1,49 @@ +/* acos.c -- Arc cosine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_acos (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_acos (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_acos (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/acosh.c b/Build/source/libs/mpfi/mpfi-src/src/acosh.c new file mode 100644 index 00000000000..b48958ecd7e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/acosh.c @@ -0,0 +1,50 @@ +/* acosh.c -- Inverse hyperbolic cosine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_acosh (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_acosh (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_acosh (&(a->right), &(b->right), MPFI_RNDU); + + if (mpfr_sgn (&(a->right)) == 0) { + /* -0 as right endpoint */ + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add.c b/Build/source/libs/mpfi/mpfi-src/src/add.c new file mode 100644 index 00000000000..4f477a9eb03 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add.c @@ -0,0 +1,63 @@ +/* add.c -- Add two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +/* relies on the fact that each operand is OK, */ +/* ie its left endpoint is <= its right one. */ +/* This should always hold. */ +{ + int inexact_left, inexact_right, inexact=0; + + if (MPFI_IS_ZERO (c)) { + return (mpfi_set (a,b)); + } + else if (MPFI_IS_ZERO (b)) { + return (mpfi_set (a,c)); + } + else { + inexact_left = mpfr_add (&(a->left), &(b->left), &(c->left),MPFI_RNDD); + inexact_right = mpfr_add (&(a->right), &(b->right), &(c->right),MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add_d.c b/Build/source/libs/mpfi/mpfi-src/src/add_d.c new file mode 100644 index 00000000000..dba53becbf3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add_d.c @@ -0,0 +1,54 @@ +/* add_d.c -- Interval translation. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add_d (mpfi_ptr a, mpfi_srcptr b, const double c) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_add_d (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_add_d (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add_fr.c b/Build/source/libs/mpfi/mpfi-src/src/add_fr.c new file mode 100644 index 00000000000..793306592f8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add_fr.c @@ -0,0 +1,60 @@ +/* add_fr.c -- Add an interval and a floating-point number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add_fr (mpfi_ptr a, mpfi_srcptr b, mpfr_srcptr c) +{ + mpfr_t tmp; mpfr_prec_t prec; + int inexact_left, inexact_right, inexact = 0; + + prec = mpfi_get_prec(a); + mpfr_init2(tmp, prec); /* in case c is one of the endpoint of a, a temporary is needed */ + + inexact_left = mpfr_add (tmp, &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_add (&(a->right), &(b->right), c, MPFI_RNDU); + mpfr_set(&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear(tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add_q.c b/Build/source/libs/mpfi/mpfi-src/src/add_q.c new file mode 100644 index 00000000000..145254f35ca --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add_q.c @@ -0,0 +1,54 @@ +/* add_q.c -- Add an interval and a rational number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add_q (mpfi_ptr a, mpfi_srcptr b, mpq_srcptr c) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_add_q (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_add_q (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add_si.c b/Build/source/libs/mpfi/mpfi-src/src/add_si.c new file mode 100644 index 00000000000..41e6a97923a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add_si.c @@ -0,0 +1,54 @@ +/* add_si.c -- Add an interval and a signed long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add_si (mpfi_ptr a, mpfi_srcptr b, const long c) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_add_si (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_add_si (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add_ui.c b/Build/source/libs/mpfi/mpfi-src/src/add_ui.c new file mode 100644 index 00000000000..eb111326297 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add_ui.c @@ -0,0 +1,61 @@ +/* add_ui.c -- Add an interval and an unsigned long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add_ui (mpfi_ptr a, mpfi_srcptr b, const unsigned long c) +{ + int inexact_left, inexact_right, inexact = 0; + + if (c == 0) { + return ( mpfi_set (a,b) ); + } + else if (MPFI_IS_ZERO (b)) { + return ( mpfi_set_ui (a,c) ); + } + else { + inexact_left = mpfr_add_ui (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_add_ui (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/add_z.c b/Build/source/libs/mpfi/mpfi-src/src/add_z.c new file mode 100644 index 00000000000..146362650d1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/add_z.c @@ -0,0 +1,54 @@ +/* add_z.c -- Add an interval an an integer. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_add_z (mpfi_ptr a, mpfi_srcptr b, mpz_srcptr c) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_add_z (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_add_z (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/alea.c b/Build/source/libs/mpfi/mpfi-src/src/alea.c new file mode 100644 index 00000000000..9beb3ca62e3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/alea.c @@ -0,0 +1,41 @@ +/* alea.c -- Random element in the interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Picks randomly a point m in y */ +void +mpfi_alea (mpfr_ptr m, mpfi_srcptr y) +{ + static gmp_randstate_t state; + static int init = 0; + + if (!init) { + gmp_randinit_default (state); + init = -1; + } + + mpfi_urandom (m, y, state); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/asin.c b/Build/source/libs/mpfi/mpfi-src/src/asin.c new file mode 100644 index 00000000000..d4ca868af3d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/asin.c @@ -0,0 +1,45 @@ +/* asin.c -- Arc sine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_asin (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_asin (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_asin (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/asinh.c b/Build/source/libs/mpfi/mpfi-src/src/asinh.c new file mode 100644 index 00000000000..d662a6b556a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/asinh.c @@ -0,0 +1,45 @@ +/* asinh.c -- Inverse hyperbolic sine. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_asinh (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_asinh (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_asinh (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/atan.c b/Build/source/libs/mpfi/mpfi-src/src/atan.c new file mode 100644 index 00000000000..2a7aa4b2a73 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/atan.c @@ -0,0 +1,45 @@ +/* atan.c -- Arc tangent of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_atan (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_atan (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_atan (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/atan2.c b/Build/source/libs/mpfi/mpfi-src/src/atan2.c new file mode 100644 index 00000000000..ffd0429c3e1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/atan2.c @@ -0,0 +1,100 @@ +/* atan2.c -- Arc tangent of two intervals. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_atan2 (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + mpfi_t tmp; + + if ( MPFI_NAN_P (b) || MPFI_NAN_P (c) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + mpfi_init2 (tmp, mpfi_get_prec (a)); + + if (MPFI_IS_POS (b)) { + if (MPFI_IS_POS (c)) { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->right), &(c->left), MPFI_RNDU); + } + else if (MPFI_IS_NEG (c)) { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->right), &(c->right), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->left), &(c->left), MPFI_RNDU); + } + else { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->left), &(c->left), MPFI_RNDU); + } + } + else if (MPFI_IS_NEG (b)) { + if (MPFI_IS_POS (c)) { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->left), &(c->left), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->right), &(c->right), MPFI_RNDU); + } + else if (MPFI_IS_NEG (c)) { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->right), &(c->left), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->left), &(c->right), MPFI_RNDU); + } + else { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->right), &(c->left), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->right), &(c->right), MPFI_RNDU); + } + } + else { + if (MPFI_IS_POS (c)) { + inexact_left = mpfr_atan2 (&(tmp->left), &(b->left), &(c->left), MPFI_RNDD); + inexact_right = mpfr_atan2 (&(tmp->right), &(b->right), &(c->left), MPFI_RNDU); + } + else { + inexact_left = -mpfr_const_pi (&(tmp->left), MPFI_RNDU); + mpfr_neg (&(tmp->left), &(tmp->left), MPFI_RNDD); + inexact_right = mpfr_const_pi (&(tmp->right), MPFI_RNDU); + } + } + + if (mpfr_sgn (&(tmp->left)) == 0) { + /* +0 as left endpoint */ + mpfr_setsign (&(tmp->left), &(tmp->left), 0, MPFI_RNDU); + } + if (mpfr_sgn (&(tmp->right)) == 0) { + /* -0 as right endpoint */ + mpfr_setsign (&(tmp->right), &(tmp->right), 1, MPFI_RNDD); + } + + mpfi_set (a, tmp); + mpfi_clear (tmp); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/atanh.c b/Build/source/libs/mpfi/mpfi-src/src/atanh.c new file mode 100644 index 00000000000..b91f62adf3e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/atanh.c @@ -0,0 +1,45 @@ +/* atanh.c -- Inverse hyperbolic tangent of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_atanh (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_atanh (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_atanh (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/bisect.c b/Build/source/libs/mpfi/mpfi-src/src/bisect.c new file mode 100644 index 00000000000..2d1501a0955 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/bisect.c @@ -0,0 +1,76 @@ +/* bisect.c -- Split an interval into two halves. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_bisect (mpfi_ptr y1, mpfi_ptr y2, mpfi_srcptr y) +{ + mpfr_prec_t prec, prec1, prec2; + mpfr_t centre; + int inexact_centre; + + if ( MPFI_NAN_P (y) ) { + mpfr_set_nan (&(y1->left)); + mpfr_set_nan (&(y1->right)); + mpfr_set_nan (&(y2->left)); + mpfr_set_nan (&(y2->right)); + MPFR_RET_NAN; + } + else if ( !mpfi_bounded_p (y) ) { + mpfi_set (y1, y); + mpfr_set_nan (&(y2->left)); + mpfr_set_nan (&(y2->right)); + MPFR_RET_NAN; + } + + prec = mpfi_get_prec (y); + prec1 = mpfi_get_prec (y1); + prec2 = mpfi_get_prec (y2); + if ( (prec1 >= prec2) && (prec1 >= prec)) + prec = prec1; + else if ( (prec2 >= prec1) && (prec2 >= prec)) + prec = prec2; + mpfr_init2 (centre, prec); + + inexact_centre = mpfi_mid (centre, y); + + mpfr_set (&(y1->left), &(y->left), MPFI_RNDD); + mpfr_set (&(y2->right), &(y->right), MPFI_RNDU); + mpfr_set (&(y1->right), centre, MPFI_RNDU); /* FIXME: double rounding + error */ + mpfr_set (&(y2->left), centre, MPFI_RNDD); /* FIXME: double rounding + error */ + + /* do not allow +0 as upper bound. Note that left endpoint of y2 + cannot be -0 because if centre is zero its precision is + sufficient for it to be an exact result (then center = +0). */ + if (mpfr_zero_p (&(y1->right)) && !mpfr_signbit (&(y1->right))) { + mpfr_neg (&(y1->right), &(y1->right), MPFI_RNDD); + } + + mpfr_clear (centre); + return inexact_centre; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/blow.c b/Build/source/libs/mpfi/mpfi-src/src/blow.c new file mode 100644 index 00000000000..bcb3bf0153a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/blow.c @@ -0,0 +1,96 @@ +/* blow.c -- Interval blow. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* keeps the same center and multiplies the radius by (1+fact), the result may + be grossly overestimated */ + +int +mpfi_blow (mpfi_ptr y, mpfi_srcptr x, double fact) +/* if c = mid (x) and r = rad (x), y = [c - (1+fact)*r , c + (1+fact)*r] */ +{ + mpfr_prec_t prec; + mpfr_t radius, factor; + mpfr_t centre; + int inex_diam, inex_div, inex_conv, inex_factor, inex_rad; + int inex_centre, inex_left, inex_right; + int inexact = 0; + + if (MPFI_NAN_P (x)) { + mpfr_set_nan (&(y->left)); + mpfr_set_nan (&(y->right)); + MPFR_RET_NAN; + } + + prec = mpfi_get_prec (x); + mpfr_init2 (radius, prec); + mpfr_init2 (factor, prec); + mpfr_init2 (centre, prec); + + inex_diam = mpfi_diam_abs (radius, x); + if (mpfr_zero_p (radius)) { + /* x is a singleton */ + return mpfi_set (y, x); + } + inex_div = mpfr_div_2exp (radius, radius, 1, MPFI_RNDU); /* either underflow + or exact*/ + + /* factor must be greater than 1 + |fact|, so it is not possible to perform + this addition directly in C with the double precision since the usual + rouding mode is rounding to nearest. */ + inex_conv = mpfr_set_d (factor, fact < 0.0 ? -fact : fact, MPFI_RNDU); + inex_factor = mpfr_add_ui (factor, factor, 1, MPFI_RNDU); + + inex_rad = mpfr_mul (radius, radius, factor, MPFI_RNDU); + inex_centre = mpfi_mid (centre, x); + inex_left = mpfr_sub (&(y->left), centre, radius, MPFI_RNDD); + inex_right = mpfr_add (&(y->right), centre, radius, MPFI_RNDU); + + mpfr_clear (radius); + mpfr_clear (factor); + mpfr_clear (centre); + + if ( MPFI_NAN_P (y) ) + MPFR_RET_NAN; + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(y->left)) && mpfr_signbit (&(y->left))) { + mpfr_neg (&(y->left), &(y->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(y->right)) && !mpfr_signbit (&(y->right))) { + mpfr_neg (&(y->right), &(y->right), MPFI_RNDD); + } + + if (inex_diam || inex_div || inex_conv || inex_factor || inex_rad + || inex_centre || inex_left) + inexact += 1; + if (inex_diam || inex_div || inex_conv || inex_factor || inex_rad + || inex_centre || inex_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/cbrt.c b/Build/source/libs/mpfi/mpfi-src/src/cbrt.c new file mode 100644 index 00000000000..42fc92a48c6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/cbrt.c @@ -0,0 +1,45 @@ +/* cbrt.c -- Cubic root of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_cbrt (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_cbrt (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_cbrt (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/clear.c b/Build/source/libs/mpfi/mpfi-src/src/clear.c new file mode 100644 index 00000000000..712667ed182 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/clear.c @@ -0,0 +1,36 @@ +/* clear.c -- Free the memory space allocated for an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +void +mpfi_clear (mpfi_ptr a) +{ + /* There is no test to check that the two endpoints are different + and thus are not cleared twice. They should be different if only + mpfi functions have been used... */ + mpfr_clear (&(a->right)); + mpfr_clear (&(a->left)); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/clears.c b/Build/source/libs/mpfi/mpfi-src/src/clears.c new file mode 100644 index 00000000000..a0b5bcad317 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/clears.c @@ -0,0 +1,72 @@ +/* mpfi_clears -- free the memory space allocated for several intervals + + +Copyright 2018 Free Software Foundation, Inc. +Contributed by the AriC project, INRIA. + +This file is part of the GNU MPFI Library. + +The GNU MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 3 of the License, or (at your +option) any later version. + +The GNU MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the GNU MPFR Library; see the file COPYING.LESSER. If not, see +http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc., +51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* +#ifdef HAVE_CONFIG_H +# undef HAVE_STDARG +# include "config.h" +#endif + +#if HAVE_STDARG +# include +#else +# include +#endif +*/ + +#include +#include "mpfi-impl.h" + +/* +void +#if HAVE_STDARG +mpfi_clears (mpfi_ptr x, ...) +#else +mpfi_clears (va_alist) + va_dcl +#endif +{ + va_list arg; + +#if HAVE_STDARG + va_start (arg, x); +#else + mpfi_ptr x; + va_start(arg); + x = va_arg (arg, mpfi_ptr); +#endif +*/ + +void mpfi_clears (mpfi_ptr x, ...) +{ + va_list arg; + + va_start(arg, x); + + while (x != 0) + { + mpfi_clear (x); + x = (mpfi_ptr) va_arg (arg, mpfi_ptr); + } + va_end (arg); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/cmp.c b/Build/source/libs/mpfi/mpfi-src/src/cmp.c new file mode 100644 index 00000000000..c6c54dfb0f4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/cmp.c @@ -0,0 +1,136 @@ +/* cmp.c -- Default comparison functions. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Warning: there is no canonical order => */ +/* interval comparison is not clearly defined */ + +/* Customizable comparison functions */ +/* Since the mpfi_cmp_* are based on mpfi_cmp, only mpfi_cmp needs to be modified */ + +int (*mpfi_cmp) (mpfi_srcptr, mpfi_srcptr) = mpfi_cmp_default; +int (*mpfi_cmp_d) (mpfi_srcptr, const double) = mpfi_cmp_d_default; +int (*mpfi_cmp_ui) (mpfi_srcptr, const unsigned long) = mpfi_cmp_ui_default; +int (*mpfi_cmp_si) (mpfi_srcptr, const long) = mpfi_cmp_si_default; +int (*mpfi_cmp_z) (mpfi_srcptr, mpz_srcptr) = mpfi_cmp_z_default; +int (*mpfi_cmp_q) (mpfi_srcptr, mpq_srcptr) = mpfi_cmp_q_default; +int (*mpfi_cmp_fr) (mpfi_srcptr, mpfr_srcptr) = mpfi_cmp_fr_default; + +/* Default comparison functions */ +/* They return 1 if one (at least) of their operands is invalid (contains NaN) */ + +int +mpfi_cmp_default (mpfi_srcptr a, mpfi_srcptr b) +{ + if ( MPFI_NAN_P (a) || MPFI_NAN_P (b) ) + return 1; + return ( (mpfr_cmp (&(a->right), &(b->left)) < 0) ? -1 + :(mpfr_cmp (&(b->right), &(a->left)) < 0) ); +} + +int +mpfi_cmp_d_default (mpfi_srcptr a, const double b) +{ + int res = 0; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (a)); + mpfi_set_d (tmp, b); + res = mpfi_cmp (a, tmp); + MPFI_CLEAR (tmp); + + return (res); +} + +int +mpfi_cmp_ui_default (mpfi_srcptr a, const unsigned long b) +{ + int res = 0; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (a)); + mpfi_set_ui (tmp, b); + res = mpfi_cmp (a, tmp); + MPFI_CLEAR (tmp); + + return (res); +} + +int +mpfi_cmp_si_default (mpfi_srcptr a, const long b) +{ + int res = 0; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (a)); + mpfi_set_si (tmp, b); + res = mpfi_cmp (a, tmp); + MPFI_CLEAR (tmp); + + return (res); +} + +int +mpfi_cmp_z_default (mpfi_srcptr a, mpz_srcptr b) +{ + int res = 0; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (a)); + mpfi_set_z (tmp, b); + res = mpfi_cmp (a, tmp); + MPFI_CLEAR (tmp); + + return (res); +} + +int +mpfi_cmp_q_default (mpfi_srcptr a, mpq_srcptr b) +{ + int res = 0; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (a)); + mpfi_set_q (tmp, b); + res = mpfi_cmp (a, tmp); + MPFI_CLEAR (tmp); + + return (res); +} + +int +mpfi_cmp_fr_default (mpfi_srcptr a, mpfr_srcptr b) +{ + int res = 0; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (a)); + mpfi_set_fr (tmp, b); + res = mpfi_cmp (a, tmp); + MPFI_CLEAR (tmp); + + return (res); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/cmp_sym_pi.c b/Build/source/libs/mpfi/mpfi-src/src/cmp_sym_pi.c new file mode 100644 index 00000000000..12b58cbeec7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/cmp_sym_pi.c @@ -0,0 +1,71 @@ +/* cmp_sym_pi.c -- Internal function. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* compares z * Pi/2 - x and y where z is an integer (mpz) */ +/* the result is exact */ +int +mpfi_cmp_sym_pi (mpz_srcptr z, mpfr_srcptr x, mpfr_srcptr y, mpfr_prec_t prec_init) +{ + /* Assumption: x and y are neither NaN nor Infinite */ + mpfr_prec_t prec; + mpfi_t pi_over_two, tmp; + int not_ok; + + + prec = prec_init; + mpfi_init2 (pi_over_two, prec); + mpfi_init2 (tmp, prec); + + if (mpz_cmp_ui (z, 0) == 0) { + not_ok=0; + mpfi_set_prec (tmp, mpfr_get_prec (x)); + mpfi_set_fr (tmp, x); + mpfi_neg (tmp, tmp); + } + else { + do { + mpfi_const_pi (pi_over_two); + mpfi_div_2exp (pi_over_two, pi_over_two, 1); + + mpfi_mul_z (tmp, pi_over_two, z); + mpfi_sub_fr (tmp, tmp, x); + + not_ok = mpfi_is_inside_fr (y, tmp); + if (not_ok) { + prec += BITS_PER_MP_LIMB; + mpfi_set_prec (pi_over_two, prec); + mpfi_set_prec (tmp, prec); + } + } while (not_ok); + } + + not_ok = mpfi_cmp_fr_default (tmp, y); + mpfi_clear (pi_over_two); + mpfi_clear (tmp); + + return not_ok; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/constants.c b/Build/source/libs/mpfi/mpfi-src/src/constants.c new file mode 100644 index 00000000000..6568a5ee186 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/constants.c @@ -0,0 +1,62 @@ +/* constants.c -- Useful constants. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_const_log2 (mpfi_ptr a) +{ + mpfr_const_log2 (&(a->left), MPFI_RNDD); + mpfr_const_log2 (&(a->right), MPFI_RNDU); + + return MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT; +} + +int +mpfi_const_pi (mpfi_ptr a) +{ + mpfr_const_pi (&(a->left), MPFI_RNDD); + mpfr_const_pi (&(a->right), MPFI_RNDU); + + return MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT; +} + +int +mpfi_const_euler (mpfi_ptr a) +{ + mpfr_const_euler (&(a->left), MPFI_RNDD); + mpfr_const_euler (&(a->right), MPFI_RNDU); + + return MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT; +} + +int +mpfi_const_catalan (mpfi_ptr a) +{ + mpfr_const_catalan (&(a->left), MPFI_RNDD); + mpfr_const_catalan (&(a->right), MPFI_RNDU); + + return MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/cos.c b/Build/source/libs/mpfi/mpfi-src/src/cos.c new file mode 100644 index 00000000000..77dc91afd92 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/cos.c @@ -0,0 +1,210 @@ +/* cos.c -- Cosine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_cos (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + mpfr_prec_t prec, prec_left, prec_right; + mpfr_t tmp; + mpz_t z, zmod4; + mpz_t quad_left, quad_right; + int ql_mod4, qr_mod4; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_INF_P (b)) { + /* the two endpoints are the same infinite */ + if ( mpfr_cmp (&(b->left), &(b->right)) == 0) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + mpfr_set_si (&(a->left), -1, MPFI_RNDD); + mpfr_set_si (&(a->right), 1, MPFI_RNDU); + return 0; + } + + mpz_init (quad_left); + mpz_init (quad_right); + mpz_init (z); + /* quad_left gives the quadrant where the left endpoint of b is */ + /* quad_left = floor (2 b->left / pi) */ + /* idem for quad_right and b->right */ + prec_left = mpfi_quadrant (quad_left, &(b->left)); + prec_right = mpfi_quadrant (quad_right, &(b->right)); + + /* if there is at least one period in b, then a = [-1, 1] */ + mpz_sub (z, quad_right, quad_left); + if (mpz_cmp_ui (z, 4) >= 0) { + mpfr_set_si (&(a->left), -1, MPFI_RNDD); + mpfr_set_si (&(a->right), 1, MPFI_RNDU); + inexact = 0; + } + else { + /* there is less than one period in b */ + /* let us discuss according to the position (quadrant) of the endpoints of + b */ + + /* computing precision = maximal precision required to determine the + relative position of the endpoints of b and of integer multiples of + Pi / 2 */ + prec = mpfi_get_prec (a); + if (prec_left > prec) prec = prec_left; + if (prec_right > prec) prec = prec_right; + + mpz_add (z, quad_left, quad_right); + /* z = quad_right + quad_left */ + + mpz_init (zmod4); + + /* qr_mod4 gives the quadrant where the right endpoint of b is */ + /* qr_mod4 = floor (2 b->right / pi) mod 4 */ + mpz_mod_ui (zmod4, quad_right, 4); + qr_mod4 = mpz_get_ui (zmod4); + + /* quad_left gives the quadrant where the left endpoint of b is */ + /* quad_left = floor (2 b->left / pi) mod 4 */ + mpz_mod_ui (zmod4, quad_left, 4); + ql_mod4 = mpz_get_ui (zmod4); + + + switch (qr_mod4) { + case 0: + switch (ql_mod4) { + case 0: + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_cos (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_cos (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + break; + case 1: + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 2: + inexact_left = mpfr_cos (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 3: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_left = mpfr_cos (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_cos (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + } + break; + case 1: + switch (ql_mod4) { + case 0: + case 1: + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_cos (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_cos (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + break; + case 2: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_left = mpfr_cos (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_cos (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 3: + inexact_left = mpfr_cos (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + } + break; + case 2: + switch (ql_mod4) { + case 0: + inexact_right = mpfr_cos (&(a->right), &(b->left), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 1: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->left), &(b->right), prec) >= 0) + inexact_right = mpfr_cos (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_cos (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 2: + inexact_left = mpfr_cos (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_cos (&(a->right), &(b->right), MPFI_RNDU); + break; + case 3: + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + } + break; + case 3: + switch (ql_mod4) { + case 0: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_right = mpfr_cos (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_cos (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 1: + inexact_right = mpfr_cos (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 2: + case 3: + inexact_left = mpfr_cos (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_cos (&(a->right), &(b->right), MPFI_RNDU); + break; + } + break; + } + + if (inexact_left) inexact = 1; + if (inexact_right) inexact += 2; + + mpz_clear (zmod4); + } + + mpz_clear (quad_left); + mpz_clear (quad_right); + mpz_clear (z); + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/cosh.c b/Build/source/libs/mpfi/mpfi-src/src/cosh.c new file mode 100644 index 00000000000..68e1077fc7c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/cosh.c @@ -0,0 +1,66 @@ +/* cosh.c -- Hyperbolic cosine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_cosh (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if ( MPFI_IS_NONNEG (b) ) { + inexact_left = mpfr_cosh (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_cosh (&(a->right), &(b->right), MPFI_RNDU); + } + else if ( MPFI_HAS_ZERO (b) ) { + if (mpfr_cmpabs (&(b->left), &(b->right)) > 0) + inexact_right = mpfr_cosh (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_cosh ( &(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + + } + else { /* b <= 0 */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_cosh (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_cosh (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/cot.c b/Build/source/libs/mpfi/mpfi-src/src/cot.c new file mode 100644 index 00000000000..722c5aa25b7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/cot.c @@ -0,0 +1,115 @@ +/* cot.c -- Cotangent of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_cot (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + mpz_t z_left, z_right, z; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_INF_P (b)) { + /* the two endpoints are the same infinite */ + if (mpfr_cmp (&(b->left), &(b->right)) == 0) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return 0; + } + + mpz_init (z_left); + mpz_init (z_right); + mpz_init (z); + + mpfi_quadrant (z_left, &(b->left)); + mpfi_quadrant (z_right, &(b->right)); + mpz_sub (z, z_right, z_left); + + if (mpfr_zero_p (&(b->left)) || mpfr_zero_p (&(b->right))) { + /* one end point is zero, this is the only multiple of Pi to be exact */ + if (mpfr_zero_p (&(b->left)) && mpfr_zero_p (&(b->right))) { + /* cot([+0, -0] = [NaN, NaN] */ + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if ((mpfr_zero_p (&(b->left)) && mpz_cmp_ui (z_right, 1) > 0) + || (mpfr_zero_p (&(b->right)) && mpz_cmp_si (z_left, -2) < 0)) { + /* b contains more than one period */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + inexact = 0; + } + else if (mpfr_zero_p (&(b->left))) { + /* cot([+0, x]) = [cot(x), +oo] */ + inexact_left = mpfr_cot (&(a->left), &(b->right), MPFI_RNDD); + inexact = inexact_left ? MPFI_FLAGS_LEFT_ENDPOINT_INEXACT : 0; + mpfr_set_inf (&(a->right), 1); + } + else { + /* cot([x, -0]) = [-oo, cot(x)] */ + inexact_right = mpfr_cot (&(a->right), &(b->left), MPFI_RNDU); + inexact = inexact_right ? MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT : 0; + mpfr_set_inf (&(a->left), -1); + } + } + else if ((mpz_cmp_ui (z, 2) >= 0) + || (mpz_odd_p (z_left) && mpz_even_p (z_right))) { + /* there is at least one period in b or if b contains a k*Pi, */ + /* then a = ]-oo, +oo[ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + inexact = 0; + } + else { /* within one period, cot is decreasing */ + mpfr_t tmp; + + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_cot (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_cot (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + if (inexact_left) inexact += 1; + if (inexact_right) inexact += 2; + } + + mpz_clear (z_left); + mpz_clear (z_right); + mpz_clear (z); + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/coth.c b/Build/source/libs/mpfi/mpfi-src/src/coth.c new file mode 100644 index 00000000000..f4874d0b67f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/coth.c @@ -0,0 +1,59 @@ +/* coth.c -- Hyperbolic cotangent of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_coth (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right; + int inexact = 0; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (b)) { + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return 0; + } + + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_coth (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_coth (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/csc.c b/Build/source/libs/mpfi/mpfi-src/src/csc.c new file mode 100644 index 00000000000..cbc191f4df5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/csc.c @@ -0,0 +1,141 @@ +/* mpfi_csc.c -- Cosecant of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_csc (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + mpfr_prec_t prec, prec_left, prec_right; + mpfr_t tmp; + mpz_t quad_left, quad_right; + mpz_t z, zmod4; + int ql_mod4, qr_mod4; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_INF_P (b)) { + /* the two endpoints are the same infinite */ + if ( mpfr_cmp (&(b->left), &(b->right)) == 0) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return 0; + } + + mpz_init (quad_left); + mpz_init (quad_right); + mpz_init (z); + + prec_left = mpfi_quadrant (quad_left, &(b->left)); + prec_right = mpfi_quadrant (quad_right, &(b->right)); + if (mpfr_zero_p (&(b->right))) { + /* -0 is in quadrant -1 */ + mpz_sub_ui (quad_right, quad_right, 1); + } + + /* if there is at least one period in b or if b contains a k*Pi, */ + /* then a = ]-oo, +oo[ */ + mpz_sub (z, quad_right, quad_left); + if (mpz_cmp_ui (z, 2) >= 0 + || (mpz_odd_p (quad_left) && mpz_even_p (quad_right)) + || MPFI_IS_ZERO (b)) { + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else { + /* computing precision = maximal precision required to determine the + relative position of the endpoints of b and of integer multiples of + Pi / 2 */ + prec = mpfi_get_prec (a); + if (prec_left > prec) prec = prec_left; + if (prec_right > prec) prec = prec_right; + + mpz_init (zmod4); + + /* qr_mod4 gives the quadrant where the right endpoint of b is */ + /* qr_mod4 = floor (2 b->right / pi) mod 4 */ + mpz_mod_ui (zmod4, quad_right, 4); + qr_mod4 = mpz_get_ui (zmod4); + + /* ql_mod4 gives the quadrant where the left endpoint of b is */ + /* ql_mod4 = floor (2 b->left / pi) mod 4 */ + mpz_mod_ui (zmod4, quad_left, 4); + ql_mod4 = mpz_get_ui (zmod4); + + + if (qr_mod4 == ql_mod4) { + if (qr_mod4 == 1 || qr_mod4 == 2) { + /* csc is increasing on b */ + inexact_left = mpfr_csc (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_csc (&(a->right), &(b->right), MPFI_RNDU); + } + else { + /* csc is decreasing on b */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_csc (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_csc (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + } + else if (ql_mod4 == 2) { + mpz_add (z, quad_left, quad_right); + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_left = mpfr_csc (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_csc (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), -1, MPFI_RNDU); + } + else { + mpz_add (z, quad_left, quad_right); + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_right = mpfr_csc (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_csc (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_ui (&(a->left), +1, MPFI_RNDD); + } + + if (inexact_left) inexact = 1; + if (inexact_right) inexact += 2; + + mpz_clear (zmod4); + } + + mpz_clear (quad_left); + mpz_clear (quad_right); + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/csch.c b/Build/source/libs/mpfi/mpfi-src/src/csch.c new file mode 100644 index 00000000000..6a6dc5dcf69 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/csch.c @@ -0,0 +1,67 @@ +/* csch.c -- Hyperbolic cosecant of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_csch (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (b)) { + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return 0; + } + + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_csch (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_csch (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/d_div.c b/Build/source/libs/mpfi/mpfi-src/src/d_div.c new file mode 100644 index 00000000000..753f2b21595 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/d_div.c @@ -0,0 +1,77 @@ +/* d_div.c -- Divide a double by an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_d_div (mpfi_ptr a, const double b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left = 0, inexact_right = 0, inexact = 0; + + if (MPFI_NAN_P (c)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (c)) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else if (b == 0.0) { + mpfi_set_ui (a, 0); + } + else if (b > 0.0) { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_d_div (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_d_div (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); + mpfr_clear (tmp); + } + else { + inexact_left = mpfr_d_div (&(a->left), b, &(c->left), MPFI_RNDD); + inexact_right = mpfr_d_div (&(a->right), b, &(c->right), MPFI_RNDU); + } + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/d_sub.c b/Build/source/libs/mpfi/mpfi-src/src/d_sub.c new file mode 100644 index 00000000000..a8492157a4d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/d_sub.c @@ -0,0 +1,66 @@ +/* d_sub.c -- Subtract an interval from a double. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_d_sub (mpfi_ptr a, const double b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if (MPFI_IS_ZERO (c)) { + return mpfi_set_d (a, b); + } + else if (b==0.0) { + return mpfi_neg (a, c); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_d_sub (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_d_sub (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/diam.c b/Build/source/libs/mpfi/mpfi-src/src/diam.c new file mode 100644 index 00000000000..055eac4e1f7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/diam.c @@ -0,0 +1,91 @@ +/* diam.c -- Various diameter functions. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2018, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Absolute diameter */ +int +mpfi_diam_abs (mpfr_ptr diam, mpfi_srcptr interv) +{ + return (mpfr_sub (diam, &(interv->right), &(interv->left), MPFI_RNDU)); +} + +/* Relative diameter */ +/* Always computes an overestimation */ +/* return value: 0 if the result is exact, > 0 otherwise */ +int +mpfi_diam_rel (mpfr_ptr diam, mpfi_srcptr interv) +{ + mpfr_t center; + int inexact_mid, inexact_sub = 0, inexact = 0; + + mpfr_init2 (center, mpfr_get_prec (diam)); + + /* if interv is bounded, compute d/|c| where d is the absolute diameter of + interv and c is its midpoint + if interv is not bounded, d and c are infinite, their quotient does not + exist */ + inexact_sub = mpfr_sub (diam, &(interv->right), &(interv->left), MPFI_RNDU); + + inexact_mid = mpfi_mid (center, interv); + if (mpfr_sgn (center) * inexact_mid > 0 && !mpfr_inf_p (center)) { + /* the absolute value of center have to be underestimated for an + overestimated quotient, except for the infinite cases where the + division below should return NaN. + Note that in case of underflow, mpfr_sgn(center)==0 and the + if-condition fails, preventing the next operation to actually increase + the absolute value of center */ + if (mpfr_sgn (center) > 0) + mpfr_nextbelow (center); + else + mpfr_nextabove (center); + } + mpfr_abs (center, center, MPFI_RNDD); /* always exact */ + + inexact = mpfr_div (diam, diam, center, MPFI_RNDU); + mpfr_clear (center); + + if (mpfr_nan_p (diam)) + MPFR_RET_NAN; + + if (inexact || inexact_sub || inexact_mid) + return 1; + else + return 0; +} + +/* Diameter: relative if the interval does not contain 0 */ +/* absolute otherwise */ +int +mpfi_diam (mpfr_ptr diam, mpfi_srcptr interv) +{ + + if (!mpfi_has_zero (interv)) { + return (mpfi_diam_rel (diam, interv)); + } + else { + return (mpfi_diam_abs (diam, interv)); + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div.c b/Build/source/libs/mpfi/mpfi-src/src/div.c new file mode 100644 index 00000000000..971e29dec32 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div.c @@ -0,0 +1,122 @@ +/* div.c -- Divide two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left = 0, inexact_right = 0, inexact = 0; + + if ( MPFI_NAN_P (b) || MPFI_NAN_P (c) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO_NONSTRICT (c)) { + if ( MPFI_HAS_ZERO (c) || MPFI_HAS_ZERO (b) ) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else if (MPFI_IS_NONNEG (c)) { /* c >= 0 and its left endpoint is 0 */ + if (MPFI_IS_NONNEG (b)) { /* a = [ bl/cr, +oo [ */ + inexact_left = mpfr_div (&(a->left), &(b->left), &(c->right), MPFI_RNDD); + mpfr_set_inf (&(a->right), 1); + } + else { /* b <= 0 */ /* a = ] -oo, br/cr ] */ + inexact_right = mpfr_div (&(a->right), &(b->right), &(c->right), MPFI_RNDU); + mpfr_set_inf (&(a->left), -1); + } + } + else { /* c <= 0 and its right endpoint is 0 */ + if (MPFI_IS_NONNEG (b)) { /* a = ] -oo, bl/cl ] */ + inexact_right = mpfr_div (&(a->right), &(b->left), &(c->left), MPFI_RNDU); + mpfr_set_inf (&(a->left), -1); + } + else { /* b <= 0 */ /* a = [ br/cl, +oo [ */ + inexact_left = mpfr_div (&(a->left), &(b->right), &(c->left), MPFI_RNDD); + mpfr_set_inf (&(a->right), 1); + } + } + } + else if (MPFI_IS_POS (c)) { + if (MPFI_IS_NONNEG (b)) { /* a = [ bl/cr, br/cl ] */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_div (tmp, &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), &(b->right), &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + else if (MPFI_IS_NONPOS (b)) { /* a = [ bl/cl, br/cr ] */ + inexact_left = mpfr_div (&(a->left), &(b->left), &(c->left), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), &(b->right), &(c->right), MPFI_RNDU); + } + else { /* b contains 0 in its interior */ /* a = [ bl/cl, br/cl ] */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->right))); + inexact_right = mpfr_div (tmp, &(b->right), &(c->left), MPFI_RNDU); + inexact_left = mpfr_div (&(a->left), &(b->left), &(c->left), MPFI_RNDD); + mpfr_set (&(a->right), tmp, MPFI_RNDU); /* exact */ + mpfr_clear (tmp); + } + } + else { /* c < 0 */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + if (MPFI_IS_NONNEG (b)) { /* a = [ br/cr, bl/cl ] */ + inexact_left = mpfr_div (tmp, &(b->right), &(c->right), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), &(b->left), &(c->left), MPFI_RNDU); + } + else if (MPFI_IS_NONPOS (b)) { /* a = [ br/cl, bl/cr ] */ + inexact_left = mpfr_div (tmp, &(b->right), &(c->left), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), &(b->left), &(c->right), MPFI_RNDU); + } + else { /* b contains 0 in its interior */ /* a = [ br/cr, bl/cr ] */ + inexact_left = mpfr_div (tmp, &(b->right), &(c->right), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), &(b->left), &(c->right), MPFI_RNDU); + } + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_2exp.c b/Build/source/libs/mpfi/mpfi-src/src/div_2exp.c new file mode 100644 index 00000000000..2f73144aa94 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_2exp.c @@ -0,0 +1,45 @@ +/* div_2exp.c -- Scale endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_2exp (mpfi_ptr a, mpfi_srcptr b, unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_div_2exp (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_2exp (&(a->right), &(b->right), c, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_2si.c b/Build/source/libs/mpfi/mpfi-src/src/div_2si.c new file mode 100644 index 00000000000..39a18fe1773 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_2si.c @@ -0,0 +1,45 @@ +/* div_2si.c -- Scale endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_2si (mpfi_ptr a, mpfi_srcptr b, long c) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_div_2si (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_2si (&(a->right), &(b->right), c, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_2ui.c b/Build/source/libs/mpfi/mpfi-src/src/div_2ui.c new file mode 100644 index 00000000000..7d258884226 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_2ui.c @@ -0,0 +1,45 @@ +/* div_2ui.c -- Scale endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_2ui (mpfi_ptr a, mpfi_srcptr b, unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_div_2ui (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_2ui (&(a->right), &(b->right), c, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_d.c b/Build/source/libs/mpfi/mpfi-src/src/div_d.c new file mode 100644 index 00000000000..33e6eca3618 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_d.c @@ -0,0 +1,80 @@ +/* div_d.c -- Divide an interval by a double. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_d (mpfi_ptr a, mpfi_srcptr b, const double c) +{ + mpfr_t tmp; + int inexact_left, inexact_right; + int inexact = 0; + + if (MPFI_NAN_P (b)) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (c == 0.0) + { + if (mpfr_zero_p (&(b->left))) + mpfr_set_nan (&(a->left)); + else + mpfr_set_inf (&(a->left), -1); + inexact_left = 0; + + if (mpfr_zero_p (&(b->right))) + mpfr_set_nan (&(a->right)); + else + mpfr_set_inf (&(a->right), +1); + inexact_right = 0; + } + else if (c < 0.0) + { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_div_d (tmp, &(b->right), c, MPFI_RNDD); + inexact_right = mpfr_div_d (&(a->right), &(b->left), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + else /* c > 0.0 */ + { + inexact_left = mpfr_div_d (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_d (&(a->right), &(b->right), c, MPFI_RNDU); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_ext.c b/Build/source/libs/mpfi/mpfi-src/src/div_ext.c new file mode 100644 index 00000000000..f1e5c2dadcf --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_ext.c @@ -0,0 +1,142 @@ +/* div_ext.c -- Divide two intervals: + when the denominator contains 0, + returns two intervals and a gap between them. + + The returned integer is the number of returned intervals. + +Copyright 2018 + AriC project, Inria Grenoble - Rhone-Alpes, France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_ext (mpfi_ptr res1, mpfi_ptr res2, mpfi_srcptr op1, mpfi_srcptr op2) +{ + mpfr_t tmp1, tmp2; + int nb_res = 0, tmp; + + if ( MPFI_NAN_P (op1) || MPFI_NAN_P (op2) ) { + mpfr_set_nan (&(res1->left)); + mpfr_set_nan (&(res1->right)); + mpfr_set_nan (&(res2->left)); + mpfr_set_nan (&(res2->right)); + return 0; + } + + if (MPFI_HAS_ZERO (op2)) { + if ( MPFR_IS_INF(&(op2->left)) && MPFR_IS_INF(&(op2->right)) ) { + mpfr_set_inf (&(res1->left), -1); + mpfr_set_inf (&(res1->right), 1); + mpfr_set_nan (&(res2->left)); + mpfr_set_nan (&(res2->right)); + nb_res = 1; + } + else if ( MPFI_HAS_ZERO_NONSTRICT (op1) ) { + mpfr_set_inf (&(res1->left), -1); + mpfr_set_inf (&(res1->right), 1); + mpfr_set_nan (&(res2->left)); + mpfr_set_nan (&(res2->right)); + nb_res = 1; + } + else if ( MPFI_IS_STRICTLY_NEG (op1) ) { + mpfr_init2 (tmp1, mpfi_get_prec(res1)); + mpfr_init2 (tmp2, mpfi_get_prec(res2)); + if ( mpfr_number_p (&(op2->left)) ) { + tmp = mpfr_div (tmp2, &(op1->right), &(op2->left), MPFI_RNDD); + } + else { /* denominator has infinite left endpoint */ + mpfr_set_zero (tmp2, 1); + } + + if ( mpfr_number_p (&(op2->right)) ) { + tmp = mpfr_div ( tmp1, &(op1->right), &(op2->right), MPFI_RNDU); + } + else { /* denominator has infinite right endpoint */ + mpfr_set_zero( tmp1, -1); + } + + mpfr_set_inf (&(res1->left), -1); + mpfr_set (&(res1->right), tmp1, MPFI_RNDU); + mpfr_set (&(res2->left), tmp2, MPFI_RNDD); + mpfr_set_inf (&(res2->right), 1); + + mpfr_clear(tmp1); + mpfr_clear(tmp2); + + nb_res = 2; + } + else { /* if ( MPFI_IS_STRICTLY_POS (op1) ) */ + mpfr_init2 (tmp1, mpfi_get_prec(res1)); + mpfr_init2 (tmp2, mpfi_get_prec(res2)); + if ( mpfr_number_p (&(op2->left)) ) { + tmp = mpfr_div (tmp1, &(op1->left), &(op2->left), MPFI_RNDU); + } + else { /* denominator has infinite left endpoint */ + mpfr_set_zero (tmp1, -1); + } + + if ( mpfr_number_p (&(op2->right)) ) { + tmp = mpfr_div ( tmp2, &(op1->left), &(op2->right), MPFI_RNDD); + } + else { /* denominator has infinite right endpoint */ + mpfr_set_zero( tmp2, 1); + } + mpfr_set_inf (&(res1->left), -1); + mpfr_set (&(res1->right), tmp1, MPFI_RNDU); + mpfr_set (&(res2->left), tmp2, MPFI_RNDD); + mpfr_set_inf (&(res2->right), 1); + + mpfr_clear(tmp1); + mpfr_clear(tmp2); + + nb_res = 2; + } + } + + else { + tmp = mpfi_div(res1, op1, op2); + mpfr_set_nan (&(res2->left)); + mpfr_set_nan (&(res2->right)); + return 1; + } + + if (nb_res >= 1) { + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(res1->left)) && mpfr_signbit (&(res1->left))) { + mpfr_neg (&(res1->left), &(res1->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(res1->right)) && !mpfr_signbit (&(res1->right))) { + mpfr_neg (&(res1->right), &(res1->right), MPFI_RNDD); + } + } + if (nb_res >= 2) { + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(res2->left)) && mpfr_signbit (&(res2->left))) { + mpfr_neg (&(res2->left), &(res2->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(res2->right)) && !mpfr_signbit (&(res2->right))) { + mpfr_neg (&(res2->right), &(res2->right), MPFI_RNDD); + } + } + + return nb_res; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_fr.c b/Build/source/libs/mpfi/mpfi-src/src/div_fr.c new file mode 100644 index 00000000000..8bcfca31b1c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_fr.c @@ -0,0 +1,43 @@ +/* div_fr.c -- Divide an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_fr (mpfi_ptr a, mpfi_srcptr b, mpfr_srcptr c) +{ + mpfi_t tmp; + int inexact; + + mpfi_init2 (tmp, mpfr_get_prec (c)); + mpfi_set_fr (tmp, c); /* exact */ + inexact = mpfi_div (a, b, tmp); + MPFI_CLEAR (tmp); + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_q.c b/Build/source/libs/mpfi/mpfi-src/src/div_q.c new file mode 100644 index 00000000000..5bed20fc14c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_q.c @@ -0,0 +1,104 @@ +/* div_q.c -- Divide an interval by a rational number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_q (mpfi_ptr a, mpfi_srcptr b, mpq_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right; + int inexact = 0; + + if (MPFI_NAN_P (b)) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (!mpq_sgn (c)) /* c = 0 */ + { + if (mpfr_zero_p (&(b->left))) + mpfr_set_nan (&(a->left)); + else + mpfr_set_inf (&(a->left), -1); + inexact_left = 0; + + if (mpfr_zero_p (&(b->right))) + mpfr_set_nan (&(a->right)); + else + mpfr_set_inf (&(a->right), +1); + inexact_right = 0; + } + else if (mpq_sgn (c) < 0) /* c < 0 */ + { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_div_q (tmp, &(b->right), c, MPFI_RNDD); + if (mpfr_inf_p (tmp) && !mpfr_inf_p (&(b->right))) + { + /* work around MPFR bug in mpfr_div_q (present in MPFR-3.0.0) */ + inexact_left = 1; /* overflow */ + } + inexact_right = mpfr_div_q (&(a->right), &(b->left), c, MPFI_RNDU); + if (mpfr_inf_p (&(a->right)) && !mpfr_inf_p (&(b->left))) + { + /* work around MPFR bug in mpfr_div_q */ + inexact_right = 1; /* overflow */ + } + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + else /* c > 0 */ + { + int mpfr_bug_work_around; + mpfr_bug_work_around = !mpfr_inf_p (&(b->left)); + inexact_left = mpfr_div_q (&(a->left), &(b->left), c, MPFI_RNDD); + if (mpfr_bug_work_around && mpfr_inf_p (&(a->left))) + { + /* work around MPFR bug in mpfr_div_q */ + inexact_left = 1; /* overflow */ + } + + mpfr_bug_work_around = !mpfr_inf_p (&(b->right)); + inexact_right = mpfr_div_q (&(a->right), &(b->right), c, MPFI_RNDU); + if (mpfr_bug_work_around && mpfr_inf_p (&(a->right))) + { + /* work around MPFR bug in mpfr_div_q */ + inexact_right = 1; /* overflow */ + } + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_si.c b/Build/source/libs/mpfi/mpfi-src/src/div_si.c new file mode 100644 index 00000000000..66598dcf496 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_si.c @@ -0,0 +1,79 @@ +/* div_si.c -- Divide an interval by a signed long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_si (mpfi_ptr a, mpfi_srcptr b, const long c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if (MPFI_NAN_P (b)) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (c == 0) + { + if (mpfr_zero_p (&(b->left))) + mpfr_set_nan (&(a->left)); + else + mpfr_set_inf (&(a->left), -1); + inexact_left = 0; + + if (mpfr_zero_p (&(b->right))) + mpfr_set_nan (&(a->right)); + else + mpfr_set_inf (&(a->right), +1); + inexact_right = 0; + } + else if (c < 0) + { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_div_si (tmp, &(b->right), c, MPFI_RNDD); + inexact_right = mpfr_div_si (&(a->right), &(b->left), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + else /* c > 0 */ + { + inexact_left = mpfr_div_si (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_si (&(a->right), &(b->right), c, MPFI_RNDU); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_ui.c b/Build/source/libs/mpfi/mpfi-src/src/div_ui.c new file mode 100644 index 00000000000..09f57c82f15 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_ui.c @@ -0,0 +1,70 @@ +/* div_ui.c -- Divide an interval by an unsigned long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_ui (mpfi_ptr a, mpfi_srcptr b, const unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + if (MPFI_NAN_P (b)) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (c == 0) + { + if (mpfr_zero_p (&(b->left))) + mpfr_set_nan (&(a->left)); + else + mpfr_set_inf (&(a->left), -1); + inexact_left = 0; + + if (mpfr_zero_p (&(b->right))) + mpfr_set_nan (&(a->right)); + else + mpfr_set_inf (&(a->right), +1); + inexact_right = 0; + } + else + { + inexact_left = mpfr_div_ui (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_ui (&(a->right), &(b->right), c, MPFI_RNDU); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/div_z.c b/Build/source/libs/mpfi/mpfi-src/src/div_z.c new file mode 100644 index 00000000000..1ace637e992 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/div_z.c @@ -0,0 +1,80 @@ +/* div_z.c -- Divide an interval by an integer. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_div_z (mpfi_ptr a, mpfi_srcptr b, mpz_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right; + int inexact = 0; + + if (MPFI_NAN_P (b)) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (!mpz_sgn (c)) /* c = 0 */ + { + if (mpfr_zero_p (&(b->left))) + mpfr_set_nan (&(a->left)); + else + mpfr_set_inf (&(a->left), -1); + inexact_left = 0; + + if (mpfr_zero_p (&(b->right))) + mpfr_set_nan (&(a->right)); + else + mpfr_set_inf (&(a->right), +1); + inexact_right = 0; + } + else if (mpz_sgn (c) < 0) /* c < 0 */ + { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_div_z (tmp, &(b->right), c, MPFI_RNDD); + inexact_right = mpfr_div_z (&(a->right), &(b->left), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + else /* c > 0 */ + { + inexact_left = mpfr_div_z (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_div_z (&(a->right), &(b->right), c, MPFI_RNDU); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/erandom.c b/Build/source/libs/mpfi/mpfi-src/src/erandom.c new file mode 100644 index 00000000000..40c24489ea2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/erandom.c @@ -0,0 +1,98 @@ +/* erandom.c -- Random element in the interval, following an exponential distribution. + without any guarantee: to be checked + +Copyright 2018 + AriC project, Inria Rhone-Alpes, France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Picks randomly a point m in y */ +void +mpfi_erandom (mpfr_ptr m, mpfi_srcptr y, gmp_randstate_t state) +{ + mpfr_prec_t prec, tmp_prec; + mpfr_t diam, fact; + + + if (MPFI_NAN_P(y)) { + mpfr_set_nan (m); + return; + } + + if (mpfr_equal_p (&(y->left), &(y->right))) { + mpfr_set (m, &(y->left), MPFR_RNDN); + return; + } + + prec = mpfr_get_prec (m); + tmp_prec = mpfi_get_prec(y); + if (tmp_prec > prec) + { + prec = tmp_prec; + } + mpfr_init2 (diam, prec); + mpfr_init2 (fact, prec); + + mpfi_diam_abs (diam, y); + mpfr_erandom (fact, state, MPFR_RNDN); + mpfr_sub_d (fact, fact, 0.5, MPFR_RNDN); + if (mpfr_cmp_ui (fact, 0) < 0) + mpfr_set_ui(fact, 0, MPFR_RNDN); + else if (mpfr_cmp_ui(fact, 1) > 0) + mpfr_set_ui(fact, 1, MPFR_RNDN); /* now fact lies between 0 and 1 */ + + if (mpfr_cmp_ui (diam, 1) <= 0) { + /* the picked point lies at a relative distance "fact" of the left + endpoint: m = inf + (sup - inf) * fact */ + mpfr_mul (fact, fact, diam, MPFR_RNDN); + /* FIXME: because of possible cancelation, the random distribution is + not uniform among the floating-point numbers in y */ + mpfr_add (m, &(y->left), fact, MPFR_RNDN); + } + else { + mpfr_exp_t e; + if (mpfr_cmp_abs (&(y->left), &(y->right)) < 0) { + e = mpfr_inf_p (&(y->right)) ? mpfr_get_emax () + : mpfr_get_exp (&(y->right)); + } + else { + e = mpfr_inf_p (&(y->left)) ? mpfr_get_emax () + : mpfr_get_exp (&(y->left)); + } + e += 1; + /* resize fact in [0, 2^e] where e = 1 + max{exp(left), exp(right)} */ + mpfr_mul_2exp (fact, fact, e, MPFR_RNDN); + mpfr_set (m, &(y->left), MPFR_RNDN); + if (mpfr_inf_p (m)) { + mpfr_nextabove (m); + } + /* m may be outside y */ + mpfr_add (m, m, fact, MPFR_RNDN); + } + mpfr_clear (fact); + mpfr_clear (diam); + + /* Ensure that m belongs to y (if the precision is sufficient) */ + if (mpfr_cmp (m, &(y->left)) < 0) + mpfr_set (m, &(y->left), MPFR_RNDU); + + if (mpfr_cmp (&(y->right), m) < 0) + mpfr_set (m, &(y->right), MPFR_RNDD); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/error.c b/Build/source/libs/mpfi/mpfi-src/src/error.c new file mode 100644 index 00000000000..a5fc6868fb9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/error.c @@ -0,0 +1,46 @@ +/* error.c -- Helper functions handling errors. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int mpfi_error = 0; + +void +mpfi_set_error (const int i) +{ + mpfi_error = i; +} + +void +mpfi_reset_error () +{ + mpfi_error = 0; +} + +int +mpfi_is_error () +{ + return (mpfi_error==1); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/exp.c b/Build/source/libs/mpfi/mpfi-src/src/exp.c new file mode 100644 index 00000000000..f005acfeb0f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/exp.c @@ -0,0 +1,51 @@ +/* exp.c -- Exponential of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Computes the exp of an interval */ +int +mpfi_exp (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_exp (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_exp (&(a->right), &(b->right), MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/exp10.c b/Build/source/libs/mpfi/mpfi-src/src/exp10.c new file mode 100644 index 00000000000..570c8f08d0e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/exp10.c @@ -0,0 +1,50 @@ +/* exp10.c -- Power of ten of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_exp10 (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_exp10 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_exp10 (&(a->right), &(b->right), MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/exp10m1.c b/Build/source/libs/mpfi/mpfi-src/src/exp10m1.c new file mode 100644 index 00000000000..2eeade4e69d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/exp10m1.c @@ -0,0 +1,89 @@ +/* exp10m1.c -- Exponential, in base 10, of an interval, minus 1. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Grenoble Rhone-Alpes and Inria Lyon, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + + +/* temporary, for versions of MPFR < 4.2 */ +/* computes the ceiling of the logarithm, in base 2, of prec */ +mpfr_prec_t log_prec_exp10m1 (mpfr_prec_t prec) +{ + mpfr_prec_t res=1; + while (res < prec) + res *=2; + return res; +} +/* Computes the exp, in base 10, of an interval, minus 1 */ +int +mpfi_exp10m1 (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_prec_t tmp_prec_left, tmp_prec_right, tmp_prec; /* for versions of MPFR < 4.2 */ + mpfi_t tmp; /* for versions of MPFR < 4.2 */ + int inexact_exp, inexact_m1; /* for versions of MPFR < 4.2 */ + int inexact_left, inexact_right, inexact=0; + + #if ( defined(MPFR_VERSION_MAJOR) && (MPFR_VERSION_MAJOR >= 4) && defined(MPFR_VERSION_MINOR) & (MPFR_VERSION_MINOR >= 2) ) + { + inexact_left = mpfr_exp10m1 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_exp10m1 (&(a->right), &(b->right), MPFI_RNDU); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + } + #else + { + /* Without any guarantee that the bounds are the tightest = correctly rounded ones */ + tmp_prec_left = mpfr_get_prec( &(a->left) ); + tmp_prec_right = mpfr_get_prec( &(a->right) ); + if (tmp_prec_left > tmp_prec_right) + tmp_prec = tmp_prec_left; + else + tmp_prec = tmp_prec_right; + tmp_prec += 2*log_prec_exp10m1(tmp_prec); + mpfi_init2(tmp, tmp_prec); + inexact_exp = mpfi_exp10(tmp, b); + inexact_m1 = mpfi_sub_d(a, tmp, 1.0); + if ( (inexact_exp %2) || (inexact_m1%2) ) + inexact += 1; + if ( (inexact_exp >= 2) || (inexact_m1 >= 2) ) + inexact += 2; + mpfi_clear(tmp); + } + #endif + + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/exp2.c b/Build/source/libs/mpfi/mpfi-src/src/exp2.c new file mode 100644 index 00000000000..c23ed4b7863 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/exp2.c @@ -0,0 +1,50 @@ +/* exp2.c -- Power of two of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_exp2 (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_exp2 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_exp2 (&(a->right), &(b->right), MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/exp2m1.c b/Build/source/libs/mpfi/mpfi-src/src/exp2m1.c new file mode 100644 index 00000000000..cd2b76f63f1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/exp2m1.c @@ -0,0 +1,108 @@ +/* exp2m1.c -- Exponential, in base 2, of an interval, minus 1. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Grenoble Rhone-Alpes and Inria Lyon, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + + +/* temporary, for versions of MPFR < 4.2 */ +/* computes the ceiling of the logarithm, in base 2, of prec */ +mpfr_prec_t log_prec_exp2m1 (mpfr_prec_t prec) +{ + mpfr_prec_t res=1; + while (res < prec) + res *=2; + return res; +} + +/* Computes the exp, in base 2, of an interval, minus 1 */ +int +mpfi_exp2m1 (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_prec_t tmp_prec_left, tmp_prec_right, tmp_prec; + mpfi_t tmp; + int inexact_exp, inexact_m1; /* for versions of MPFR < 4.2 */ + int inexact_left, inexact_right, inexact_set, inexact=0; + + #if ( defined(MPFR_VERSION_MAJOR) && (MPFR_VERSION_MAJOR >= 4) && defined(MPFR_VERSION_MINOR) & (MPFR_VERSION_MINOR >= 2) ) + { + inexact_left = mpfr_exp2m1 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_exp2m1 (&(a->right), &(b->right), MPFI_RNDU); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + } + #else + { + /* Without any guarantee that the bounds are the tightest = correctly rounded ones */ +/* + tmp_prec_left = mpfr_get_exp( &(b->left)); + if (tmp_prec_left < 0) + tmp_prec_left = -tmp_prec_left; + tmp_prec_left += 1 + mpfr_get_prec( &(b->left) ); + if ( tmp_prec_left < mpfr_get_prec( &(a->left)) + 15) + tmp_prec_left = mpfr_get_prec( &(a->left) ) + 15; + tmp_prec_right = mpfr_get_exp( &(b->right)); + if (tmp_prec_right < 0) + tmp_prec_right = -tmp_prec_right; + tmp_prec_right += 1 + mpfr_get_prec( &(b->right) ); + if ( tmp_prec_right < mpfr_get_prec( &(a->right)) + 15) + tmp_prec_right = mpfr_get_prec( &(a->right) ) + 15; + if (tmp_prec_left > tmp_prec_right) + tmp_prec = tmp_prec_left + 1; + else + tmp_prec = tmp_prec_right +1; +*/ + tmp_prec_left = mpfr_get_prec( &(a->left) ); + tmp_prec_right = mpfr_get_prec( &(a->right) ); + if (tmp_prec_left > tmp_prec_right) + tmp_prec = tmp_prec_left; + else + tmp_prec = tmp_prec_right; + tmp_prec += 2*log_prec_exp2m1(tmp_prec); + mpfi_init2(tmp, tmp_prec); + inexact_exp = mpfi_exp2(tmp, b); + inexact_m1 = mpfi_sub_d(a, tmp, 1.0); + if ( (inexact_exp %2) || (inexact_m1%2) ) + inexact += 1; + if ( (inexact_exp >= 2) || (inexact_m1 >= 2) ) + inexact += 2; + mpfi_clear(tmp); + } + #endif + + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/expm1.c b/Build/source/libs/mpfi/mpfi-src/src/expm1.c new file mode 100644 index 00000000000..d317b8b6b6f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/expm1.c @@ -0,0 +1,45 @@ +/* expm1.c -- Computes the exp of an interval, minus 1. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_expm1 (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_expm1 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_expm1 (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/fr_div.c b/Build/source/libs/mpfi/mpfi-src/src/fr_div.c new file mode 100644 index 00000000000..496b15de891 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/fr_div.c @@ -0,0 +1,77 @@ +/* fr_div.c -- Divide a floating-point number by an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_fr_div (mpfi_ptr a, mpfr_srcptr b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left = 0, inexact_right = 0, inexact = 0; + + if (MPFI_NAN_P (c) || mpfr_nan_p (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (c)) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else if (mpfr_sgn (b) == 0) { /* b = 0, a= [+0, -0] */ + mpfi_set_ui (a, 0); + } + else if (mpfr_sgn(b) > 0) { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_div (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); + mpfr_clear (tmp); + } + else { + inexact_left = mpfr_div (&(a->left), b, &(c->left), MPFI_RNDD); + inexact_right = mpfr_div (&(a->right), b, &(c->right), MPFI_RNDU); + } + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/fr_sub.c b/Build/source/libs/mpfi/mpfi-src/src/fr_sub.c new file mode 100644 index 00000000000..02e204ba4ad --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/fr_sub.c @@ -0,0 +1,66 @@ +/* fr_sub.c -- Subtract an interval from a floating-point number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_fr_sub (mpfi_ptr a, mpfr_srcptr b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if (MPFI_IS_ZERO (c)) { + return mpfi_set_fr (a, b); + } + else if (MPFR_IS_ZERO(b)) { + return mpfi_neg (a, c); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sub (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_sub (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/get_d.c b/Build/source/libs/mpfi/mpfi-src/src/get_d.c new file mode 100644 index 00000000000..36537b13b6b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/get_d.c @@ -0,0 +1,40 @@ +/* get_d.c -- Return the center of an interval as a double. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +double +mpfi_get_d (mpfi_srcptr a) +{ + double res; + mpfr_t tmp; + + mpfr_init2 (tmp, 53); /* Double rounding may occur for subnormal numbers */ + mpfi_mid (tmp, a); + res = mpfr_get_d (tmp, MPFR_RNDN); + mpfr_clear (tmp); + + return res; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/get_endpoints.c b/Build/source/libs/mpfi/mpfi-src/src/get_endpoints.c new file mode 100644 index 00000000000..03b0137e173 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/get_endpoints.c @@ -0,0 +1,38 @@ +/* get_endpoints.c -- Operations related to the internal representation endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_get_left (mpfr_ptr b, mpfi_srcptr a) +{ + return mpfr_set (b, &(a->left), MPFI_RNDD); +} + +int +mpfi_get_right (mpfr_ptr b, mpfi_srcptr a) +{ + return mpfr_set (b, &(a->right), MPFI_RNDU); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/get_fr.c b/Build/source/libs/mpfi/mpfi-src/src/get_fr.c new file mode 100644 index 00000000000..03d6dd6fe9e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/get_fr.c @@ -0,0 +1,32 @@ +/* get_fr.c -- Return the center of an interval as a floating point. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +void +mpfi_get_fr (mpfr_ptr m, mpfi_srcptr a) +{ + mpfi_mid (m, a); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/get_prec.c b/Build/source/libs/mpfi/mpfi-src/src/get_prec.c new file mode 100644 index 00000000000..6e2bffb5a3b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/get_prec.c @@ -0,0 +1,39 @@ +/* get_prec.c -- return the precision of the interval's endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Returns the largest precision of the endpoints of x */ +/* Reminder: the endpoints' precisions are supposed to be the same */ +mpfr_prec_t +mpfi_get_prec (mpfi_srcptr x) +{ + mpfr_prec_t prec_left, prec_right; + + prec_left = mpfr_get_prec (&(x->left)); + prec_right = mpfr_get_prec (&(x->right)); + + return (prec_left>prec_right ? prec_left : prec_right); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/get_version.c b/Build/source/libs/mpfi/mpfi-src/src/get_version.c new file mode 100644 index 00000000000..faea815a4fe --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/get_version.c @@ -0,0 +1,32 @@ +/* get_version.c -- Return current MPFI version. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +const char * +mpfi_get_version (void) +{ + return (PACKAGE_VERSION); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/has_zero.c b/Build/source/libs/mpfi/mpfi-src/src/has_zero.c new file mode 100644 index 00000000000..226e122b760 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/has_zero.c @@ -0,0 +1,34 @@ +/* has_zero.c -- true if 0 is in the interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_has_zero (mpfi_srcptr a) +{ + return (mpfr_cmp_ui (&(a->left), 0) <= 0 + && mpfr_cmp_ui (&(a->right), 0) >= 0 + && !MPFI_NAN_P (a)); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/hypot.c b/Build/source/libs/mpfi/mpfi-src/src/hypot.c new file mode 100644 index 00000000000..2bcdd41e8e7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/hypot.c @@ -0,0 +1,89 @@ +/* hypot.c -- Euclidean distance. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_hypot (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + mpfi_t tmp; + int bmax_left_p, cmax_left_p; + + if (MPFI_NAN_P (b) || MPFI_NAN_P (c)) { + /* hypot (y, +-inf) = hypot (+-inf, y) = +inf even if y is NaN */ + if (MPFI_NAN_P (b) + && mpfr_inf_p (&(c->left)) && mpfr_inf_p (&(c->right)) + && mpfr_equal_p (&(c->left), &(c->right))) { + mpfi_abs (a, c); + return inexact; + } + else if (MPFI_NAN_P (c) + && mpfr_inf_p (&(b->left)) && mpfr_inf_p (&(b->right)) + && mpfr_equal_p (&(b->left), &(b->right))) { + mpfi_abs (a, b); + return inexact; + } + + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + mpfi_init2 (tmp, mpfi_get_prec (a)); + + bmax_left_p = mpfr_cmp_abs (&(b->left), &(b->right)) > 0; + cmax_left_p = mpfr_cmp_abs (&(c->left), &(c->right)) > 0; + + if (MPFI_HAS_ZERO_NONSTRICT (b)) { + if (MPFI_HAS_ZERO_NONSTRICT (c)) + inexact_left = mpfr_set_ui (&(tmp->left), 0, MPFI_RNDU); + else + inexact_left = mpfr_abs (&(tmp->left), cmax_left_p ? &(c->right) : &(c->left), MPFI_RNDD); + } + else { + if (MPFI_HAS_ZERO_NONSTRICT (c)) + inexact_left = mpfr_abs (&(tmp->left), bmax_left_p ? &(b->right) : &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_hypot (&(tmp->left), bmax_left_p ? &(b->right) : &(b->left), cmax_left_p ? &(c->right) : &(c->left), MPFI_RNDD); + } + + inexact_right = mpfr_hypot (&(tmp->right), bmax_left_p ? &(b->left) : &(b->right), cmax_left_p ? &(c->left) : &(c->right), MPFI_RNDU); + + if (mpfr_sgn (&(tmp->right)) == 0) { + /* -0 as right endpoint */ + mpfr_setsign (&(tmp->right), &(tmp->right), 1, MPFI_RNDD); + } + + mpfi_set (a, tmp); + mpfi_clear (tmp); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/increase.c b/Build/source/libs/mpfi/mpfi-src/src/increase.c new file mode 100644 index 00000000000..b768a4307ff --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/increase.c @@ -0,0 +1,58 @@ +/* increase.c -- Interval dilatation. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_increase (mpfi_ptr a, mpfr_srcptr e) +{ + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + else if ( mpfr_nan_p (e) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + inexact_right = mpfr_add (&(a->right), &(a->right), e, MPFI_RNDU); + inexact_left = mpfr_sub (&(a->left), &(a->left), e, MPFI_RNDD); + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/init.c b/Build/source/libs/mpfi/mpfi-src/src/init.c new file mode 100644 index 00000000000..0699149e16f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/init.c @@ -0,0 +1,35 @@ +/* init.c -- Initialize an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2018 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and AriC project, Inria Grenoble - Rhone-Alpes, France + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +void +mpfi_init (mpfi_t x) +{ + mpfr_init (&(x->left)); + mpfr_init (&(x->right)); +} + diff --git a/Build/source/libs/mpfi/mpfi-src/src/init2.c b/Build/source/libs/mpfi/mpfi-src/src/init2.c new file mode 100644 index 00000000000..2c14b705597 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/init2.c @@ -0,0 +1,34 @@ +/* init2.c -- Initialize an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2018 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and AriC project, Inria Grenoble - Rhone-Alpes, France + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +void +mpfi_init2 (mpfi_t x, mpfr_prec_t p) +{ + mpfr_init2 (&(x->left),p); + mpfr_init2 (&(x->right),p); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/inits.c b/Build/source/libs/mpfi/mpfi-src/src/inits.c new file mode 100644 index 00000000000..bf7c0db03f3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/inits.c @@ -0,0 +1,74 @@ +/* mpfi_inits -- initialize several intervals + +Copyright 2018 Free Software Foundation, Inc. +Contributed by the AriC project, INRIA. + +This file is part of the GNU MPFI Library. + +The GNU MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 3 of the License, or (at your +option) any later version. + +The GNU MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the GNU MPFI Library; see the file COPYING.LESSER. If not, see +http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc., +51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* +#ifdef HAVE_CONFIG_H +# undef HAVE_STDARG +# include "config.h" +#endif +*/ + +/* +#if HAVE_STDARG +# include +#else +# include +#endif +*/ + +# include +#include "mpfi-impl.h" + +/* Since it uses "...", we need an explicit support for K&R */ + +/* +void +#if HAVE_STDARG +mpfi_inits (mpfi_ptr x, ...) +#else +mpfi_inits (va_alist) + va_dcl +#endif +{ + va_list arg; + +#if HAVE_STDARG + va_start (arg, x); +#else + mpfi_ptr x; + va_start(arg); + x = va_arg (arg, mpfi_ptr); +#endif +*/ + +void mpfi_inits(mpfi_ptr x, ...) +{ + va_list arg; + + va_start (arg, x); + while (x != 0) + { + mpfi_init (x); + x = (mpfi_ptr) va_arg (arg, mpfi_ptr); + } + va_end (arg); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/inits2.c b/Build/source/libs/mpfi/mpfi-src/src/inits2.c new file mode 100644 index 00000000000..ba5a4b268af --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/inits2.c @@ -0,0 +1,77 @@ +/* mpfi_inits2 -- initialize several intervals with floating-point endpoints of given + precision + +Copyright 2018 Free Software Foundation, Inc. +Contributed by the AriC project, INRIA. + +This file is part of the GNU MPFI Library. + +The GNU MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 3 of the License, or (at your +option) any later version. + +The GNU MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the GNU MPFI Library; see the file COPYING.LESSER. If not, see +http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc., +51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* +#ifdef HAVE_CONFIG_H +# undef HAVE_STDARG +# include "config.h" +#endif + +#if HAVE_STDARG +# include +#else +# include +#endif +*/ + +#include +#include "mpfi-impl.h" + +/* + * Contrary to mpfi_init2, mpfr_prec_t p is the first argument + */ + +/* Explicit support for K&R compiler */ +/* +void +#if HAVE_STDARG +mpfi_inits2 (mpfr_prec_t p, mpfi_ptr x, ...) +#else +mpfi_inits2 (va_alist) + va_dcl +#endif +{ + va_list arg; +#if HAVE_STDARG + va_start (arg, x); +#else + mpfr_prec_t p; + mpfi_ptr x; + va_start(arg); + p = va_arg (arg, mpfr_prec_t); + x = va_arg (arg, mpfi_ptr); +#endif +*/ + +void mpfi_inits2 (mpfr_prec_t p, mpfi_ptr x, ...) +{ + va_list arg; + va_start (arg, x); + + while (x != 0) + { + mpfi_init2 (x, p); + x = (mpfi_ptr) va_arg (arg, mpfi_ptr); + } + va_end (arg); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/inp_str.c b/Build/source/libs/mpfi/mpfi-src/src/inp_str.c new file mode 100644 index 00000000000..cc951d1c0f0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/inp_str.c @@ -0,0 +1,86 @@ +/* inp_str.c -- Set an interval from an input stream. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi_io.h" +#include "mpfi-impl.h" + +size_t +mpfi_inp_str (mpfi_ptr x, FILE *s, int base) +{ + size_t blank = 0; + size_t t; + size_t pos; + size_t size = 256; + char *str; + int c; + + void * (*mpfi_allocate_func) (size_t); + void * (*mpfi_reallocate_func) (void *,size_t, size_t); + void (*mpfi_free_func) (void *, size_t); + + mp_get_memory_functions (&mpfi_allocate_func, &mpfi_reallocate_func, + &mpfi_free_func); + + c = fgetc (s); + while (MPFI_ISSPACE (c)) { + c = fgetc (s); + ++blank; + } + + if (c != '[') { + /* one single number defining an interval */ + ungetc (c, s); + t = mpfr_inp_str (&(x->left), s, base, MPFI_RNDD); + mpfr_set (&(x->right), &(x->left), MPFI_RNDD); + mpfr_nextabove (&(x->right)); + + return t != 0 ? blank + t : 0; + } + else { + /* interval given by two endpoints between square brackets */ + /* the interval is copied into a string and handled by mpfi_set_str */ + str = (char *)(*mpfi_allocate_func)(size); + + pos = 0; + str[pos++] = '['; + + while (c != ']') { + c = fgetc (s); + if (c == EOF) + break; + str[pos++] = c; + if (pos == size) { + str = (char *)(*mpfi_reallocate_func)(str, size, 2 * size); + size *= 2; + } + } + str[pos]='\0'; + + t = mpfi_set_str (x, str, base); + (*mpfi_free_func)(str, size); + + return t == 0 ? blank + pos : 0; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/intersect.c b/Build/source/libs/mpfi/mpfi-src/src/intersect.c new file mode 100644 index 00000000000..7508b553825 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/intersect.c @@ -0,0 +1,58 @@ +/* intersect.c -- Intervals intersection. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_intersect (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ +/* If intersection = empty set, a will have its left bound > right one */ + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) || MPFI_NAN_P (c) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (mpfr_cmp (&(b->left), &(c->left)) <= 0) + inexact_left = mpfr_set (&(a->left), &(c->left), MPFI_RNDD); + else + inexact_left = mpfr_set (&(a->left), &(b->left), MPFI_RNDD); + + if (mpfr_cmp (&(c->right), &(b->right)) <= 0) + inexact_right = mpfr_set (&(a->right), &(c->right), MPFI_RNDU); + else + inexact_right = mpfr_set (&(a->right), &(b->right), MPFI_RNDU); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + if (mpfr_cmp (&(a->left), &(a->right)) > 0) /* a is the empty set */ + inexact = MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/interv_d.c b/Build/source/libs/mpfi/mpfi-src/src/interv_d.c new file mode 100644 index 00000000000..a0c8a87589d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/interv_d.c @@ -0,0 +1,60 @@ +/* interv_d.c -- Build an interval from two doubles. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_interv_d (mpfi_ptr a, const double b, const double c) +{ + int inexact_left, inexact_right, inexact=0; + + if (b <= c) { + inexact_left = mpfr_set_d (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_d (&(a->right), c, MPFI_RNDU); + } + else { + inexact_left = mpfr_set_d (&(a->left), c, MPFI_RNDD); + inexact_right = mpfr_set_d (&(a->right), b, MPFI_RNDU); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/interv_fr.c b/Build/source/libs/mpfi/mpfi-src/src/interv_fr.c new file mode 100644 index 00000000000..d661c0dd933 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/interv_fr.c @@ -0,0 +1,63 @@ +/* interv_fr.c -- Build an interval from two floating-point numbers. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_interv_fr (mpfi_ptr a, mpfr_srcptr b, mpfr_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + + if ( mpfr_nan_p (b) || mpfr_nan_p (c) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if ( mpfr_cmp (b, c) <= 0 ) { + inexact_left = mpfr_set (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set (&(a->right), c, MPFI_RNDU); + } + else { + inexact_left = mpfr_set (&(a->left), c, MPFI_RNDD); + inexact_right = mpfr_set (&(a->right), b, MPFI_RNDU); + } + /* a cannot be a NaN, it has been tested before */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/interv_q.c b/Build/source/libs/mpfi/mpfi-src/src/interv_q.c new file mode 100644 index 00000000000..77dc51773b1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/interv_q.c @@ -0,0 +1,48 @@ +/* interv_q.c -- Build an interval from two rational numbers. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_interv_q (mpfi_ptr a, mpq_srcptr b, mpq_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + + if ( mpq_cmp (b, c) <= 0) { + inexact_left = mpfr_set_q (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_q (&(a->right), c, MPFI_RNDU); + } + else { + inexact_left = mpfr_set_q (&(a->left), c, MPFI_RNDD); + inexact_right = mpfr_set_q (&(a->right), b, MPFI_RNDU); + } + /* a cannot be a NaN, mpfr_set_q never returns a NaN */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/interv_si.c b/Build/source/libs/mpfi/mpfi-src/src/interv_si.c new file mode 100644 index 00000000000..c94d454e31c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/interv_si.c @@ -0,0 +1,55 @@ +/* interv_si.c -- Build an interval from two signed long integers. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_interv_si (mpfi_ptr a, const long b, const long c) +{ + int inexact_left, inexact_right, inexact=0; + + if (b <= c) { + inexact_left = mpfr_set_si (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), c, MPFI_RNDU); + } + else { + inexact_left = mpfr_set_si (&(a->left), c, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), b, MPFI_RNDU); + } + + /* note: a cannot be a NaN, mpfr_set_si never sets a NaN */ + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/interv_ui.c b/Build/source/libs/mpfi/mpfi-src/src/interv_ui.c new file mode 100644 index 00000000000..f9fa3fbf98e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/interv_ui.c @@ -0,0 +1,55 @@ +/* interv_ui.c -- Build an interval from two unsigned integers. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_interv_ui (mpfi_ptr a, const unsigned long b, const unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + if (b <= c) { + inexact_left = mpfr_set_ui (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_ui (&(a->right), c, MPFI_RNDU); + } + else { + inexact_left = mpfr_set_ui (&(a->left), c, MPFI_RNDD); + inexact_right = mpfr_set_ui (&(a->right), b, MPFI_RNDU); + } + + /* note: a cannot be a NaN, mpfr_set_ui never sets a NaN */ + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/interv_z.c b/Build/source/libs/mpfi/mpfi-src/src/interv_z.c new file mode 100644 index 00000000000..4112699c217 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/interv_z.c @@ -0,0 +1,48 @@ +/* interv_z.c -- Build an interval from two integers. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_interv_z (mpfi_ptr a, mpz_srcptr b, mpz_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + + if ( mpz_cmp (b, c) <= 0 ) { + inexact_left = mpfr_set_z (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_z (&(a->right), c, MPFI_RNDU); + } + else { + inexact_left = mpfr_set_z (&(a->left), c, MPFI_RNDD); + inexact_right = mpfr_set_z (&(a->right), b, MPFI_RNDU); + } + /* a cannot be a NaN, mpfr_set_z never returns a NaN */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/inv.c b/Build/source/libs/mpfi/mpfi-src/src/inv.c new file mode 100644 index 00000000000..6801ce2493c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/inv.c @@ -0,0 +1,70 @@ +/* inv.c -- Inverse of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_inv (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if ( MPFI_NAN_P (b) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + else if ( (mpfr_sgn (&(b->left)) < 0) && (mpfr_sgn (&(b->right)) > 0) ) { + /* b has endpoints of opposite signs */ + /* b can even be [0-, 0+] */ + /* The result is [-oo, +oo] and both endpoints are exact. */ + /*MPFI_ERROR ("mpfi_inv: inversion by an interval that contains 0");*/ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else { /* signed zeroes and Infinity are properly handled by MPFR */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->right))); + inexact_right = mpfr_ui_div (tmp, 1, &(b->left), MPFI_RNDU); + inexact_left = mpfr_ui_div (&(a->left), 1, &(b->right), MPFI_RNDD); + mpfr_set (&(a->right), tmp, MPFI_RNDU); /* exact */ + mpfr_clear (tmp); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + } + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/is_empty.c b/Build/source/libs/mpfi/mpfi-src/src/is_empty.c new file mode 100644 index 00000000000..7ed73b9527f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/is_empty.c @@ -0,0 +1,32 @@ +/* is_empty.c -- Test if an interval is empty. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_is_empty (mpfi_srcptr a) +{ + return ( MPFI_NAN_P (a) || (mpfr_cmp (&(a->left), &(a->right)) > 0) ); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/is_inside.c b/Build/source/libs/mpfi/mpfi-src/src/is_inside.c new file mode 100644 index 00000000000..fd404c38aa6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/is_inside.c @@ -0,0 +1,122 @@ +/* is_inside.c -- Test whether the first operand is in the second one. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_is_strictly_inside (mpfi_srcptr a, mpfi_srcptr b) +{ + return mpfr_cmp (&(b->left), &(a->left)) < 0 + && mpfr_cmp (&(a->right), &(b->right)) < 0; +} + +int +mpfi_is_inside (mpfi_srcptr a, mpfi_srcptr b) +{ + /* Returns 0 if one of the operands is a NaN */ + if (MPFI_NAN_P (a) || MPFI_NAN_P (b)) + return 0; + + return mpfr_cmp (&(b->left), &(a->left)) <= 0 + && mpfr_cmp (&(a->right), &(b->right)) <= 0; +} + +int +mpfi_is_inside_d (const double a, mpfi_srcptr b) +{ + int res; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (b)); + mpfi_set_d (tmp, a); + res = mpfi_is_inside (tmp, b); + MPFI_CLEAR (tmp); + + return res; +} + +int +mpfi_is_inside_ui (const unsigned long a, mpfi_srcptr b) +{ + /* Returns 0 if one of the operands is a NaN */ + if (MPFI_NAN_P (b)) + return 0; + + return mpfr_cmp_ui (&(b->left), a) <= 0 + && mpfr_cmp_ui (&(b->right), a) >= 0; +} + +int +mpfi_is_inside_si (const long a, mpfi_srcptr b) +{ + /* Returns 0 if one of the operands is a NaN */ + if (MPFI_NAN_P (b)) + return 0; + + return mpfr_cmp_si (&(b->left), a) <= 0 + && mpfr_cmp_si (&(b->right), a) >= 0; +} + +int +mpfi_is_inside_z (mpz_srcptr a, mpfi_srcptr b) +{ + int res; + mpfi_t tmp; + + mpfi_init2 (tmp, mpfi_get_prec (b)); + mpfi_set_z (tmp, a); + res = mpfi_is_inside (tmp, b); + MPFI_CLEAR (tmp); + + return res; +} + +int +mpfi_is_inside_q (mpq_srcptr a, mpfi_srcptr b) +{ + int res; + mpfi_t tmp; + /* Returns 0 if one of the operands is a NaN */ + if (MPFI_NAN_P (b)) + return 0; + + mpfi_init2 (tmp, mpfi_get_prec (b)); + mpfi_set_q (tmp, a); + res = mpfi_is_inside (tmp, b); + MPFI_CLEAR (tmp); + + return res; +} + +int +mpfi_is_inside_fr (mpfr_srcptr a, mpfi_srcptr b) +{ + /* Returns 0 if one of the operands is a NaN */ + if (mpfr_nan_p (a) || MPFI_NAN_P (b)) + return 0; + + return mpfr_cmp (a, &(b->left)) >= 0 + && mpfr_cmp (a, &(b->right)) <= 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/log.c b/Build/source/libs/mpfi/mpfi-src/src/log.c new file mode 100644 index 00000000000..8b07cab2406 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/log.c @@ -0,0 +1,53 @@ +/* log.c -- Logarithm of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Computes the log of an interval */ +/* Special cases are handled by mpfr_log */ + +int +mpfi_log (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_log (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_log (&(a->right), &(b->right), MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/log10.c b/Build/source/libs/mpfi/mpfi-src/src/log10.c new file mode 100644 index 00000000000..aa07abb15e3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/log10.c @@ -0,0 +1,50 @@ +/* log10.c -- Logarithm in base 10 of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_log10 (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_log10 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_log10 (&(a->right), &(b->right), MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + return inexact; +} + diff --git a/Build/source/libs/mpfi/mpfi-src/src/log10p1.c b/Build/source/libs/mpfi/mpfi-src/src/log10p1.c new file mode 100644 index 00000000000..76b2e812243 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/log10p1.c @@ -0,0 +1,70 @@ +/* log10p1.c -- Logarithm, in base 10, of (an interval plus 1). + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Grenoble Rhone-Alpes and Inria Lyon, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Computes the log, in base 10, of (an interval plus 1) */ +int +mpfi_log10p1 (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_prec_t tmp_prec_left, tmp_prec_right; + mpfr_t tmp_left, tmp_right; + int inexact_log, inexact_p1; /* for versions of MPFR < 4.2 */ + int inexact_left, inexact_right, inexact=0; + + #if ( defined(MPFR_VERSION_MAJOR) && (MPFR_VERSION_MAJOR >= 4) && defined(MPFR_VERSION_MINOR) & (MPFR_VERSION_MINOR >= 2) ) + { + inexact_left = mpfr_log10p1 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_log10p1 (&(a->right), &(b->right), MPFI_RNDU); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + } + #else + { + /* Without any guarantee that the bounds are the tightest = correctly rounded ones */ + inexact_p1 = mpfi_add_d(a, a, 1.0); + inexact_log = mpfi_log10(a, b); + if ( (inexact_log %2) || (inexact_p1%2) ) + inexact += 1; + if ( (inexact_log >= 2) || (inexact_p1 >= 2) ) + inexact += 2; + } + #endif + + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/log1p.c b/Build/source/libs/mpfi/mpfi-src/src/log1p.c new file mode 100644 index 00000000000..ff5b5280222 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/log1p.c @@ -0,0 +1,46 @@ +/* log1p.c -- Logarithm of 1 plus an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Special cases are handled by mpfr_log */ +int +mpfi_log1p (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_log1p (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_log1p (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/log2.c b/Build/source/libs/mpfi/mpfi-src/src/log2.c new file mode 100644 index 00000000000..1f1ab541e7c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/log2.c @@ -0,0 +1,51 @@ +/* log2.c -- Logarithm in base 2 of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Special cases are handled by mpfr_log */ +int +mpfi_log2 (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_log2 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_log2 (&(a->right), &(b->right), MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/log2p1.c b/Build/source/libs/mpfi/mpfi-src/src/log2p1.c new file mode 100644 index 00000000000..2d74d0df05a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/log2p1.c @@ -0,0 +1,70 @@ +/* log2p1.c -- Logarithm, in base 2, of (an interval plus 1). + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Grenoble Rhone-Alpes and Inria Lyon, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Computes the log, in base 2, of (an interval plus 1) */ +int +mpfi_log2p1 (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_prec_t tmp_prec_left, tmp_prec_right; + mpfr_t tmp_left, tmp_right; + int inexact_log, inexact_p1; /* for versions of MPFR < 4.2 */ + int inexact_left, inexact_right, inexact=0; + + #if ( defined(MPFR_VERSION_MAJOR) && (MPFR_VERSION_MAJOR >= 4) && defined(MPFR_VERSION_MINOR) & (MPFR_VERSION_MINOR >= 2) ) + { + inexact_left = mpfr_log2p1 (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_log2p1 (&(a->right), &(b->right), MPFI_RNDU); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + } + #else + { + /* Without any guarantee that the bounds are the tightest = correctly rounded ones */ + inexact_p1 = mpfi_add_d(a, a, 1.0); + inexact_log = mpfi_log2(a, b); + if ( (inexact_log %2) || (inexact_p1%2) ) + inexact += 1; + if ( (inexact_log >= 2) || (inexact_p1 >= 2) ) + inexact += 2; + } + #endif + + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mag.c b/Build/source/libs/mpfi/mpfi-src/src/mag.c new file mode 100644 index 00000000000..a6285e22b8c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mag.c @@ -0,0 +1,55 @@ +/* mag.c -- Element with largest absolute value. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Magnitude: the largest absolute value of any element */ +int +mpfi_mag (mpfr_ptr m, mpfi_srcptr x) +{ + int inexact; + + if (MPFI_NAN_P (x)) { + mpfr_set_nan (m); + MPFR_RET_NAN; + } + + if (mpfi_is_nonneg_default (x)) { + inexact = mpfr_set (m, &(x->right), MPFI_RNDU); + if (mpfr_zero_p (m) && mpfr_signbit (m)) + /* fix sign of zero */ + mpfr_neg (m, m, MPFI_RNDU); + } + else if (mpfi_is_nonpos_default (x)) { + inexact = mpfr_neg (m, &(x->left), MPFI_RNDU); + } + else { /* x contains 0 */ + inexact = mpfr_neg (m, &(x->left), MPFI_RNDU); + if (mpfr_cmp (m, &(x->right)) < 0) + inexact = mpfr_set (m, &(x->right), MPFI_RNDU); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mid.c b/Build/source/libs/mpfi/mpfi-src/src/mid.c new file mode 100644 index 00000000000..de20f7881e3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mid.c @@ -0,0 +1,66 @@ +/* mid.c -- Middle of the interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Middle of y + With an IEEE-compliant arithmetic, this formula provides more + accurate results than x->left + 0.5*(x->right - x->left) or + x->right - 0.5*(x->right - x->left) */ + +int +mpfi_mid (mpfr_ptr m, mpfi_srcptr y) +{ + int inexact_add, inexact_div2=0; + mpfr_t tmp_l, tmp_r; + + inexact_add = mpfr_add (m, &(y->left), &(y->right), MPFR_RNDN); + + /* when one of the bound is infinite: nothing to be done */ + if ( ! (MPFR_IS_INF(&(y->left)) || MPFR_IS_INF(&y->right)) ) + { + /* In case of overflow: first division by 2 and then addition */ + if (MPFR_IS_INF(m)) + { + mpfr_init2(tmp_l, mpfi_get_prec(y)); + mpfr_div_2ui(tmp_l, &(y->left), 1, MPFR_RNDN); /* should be exact*/ + mpfr_init2(tmp_r, mpfi_get_prec(y)); + mpfr_div_2ui(tmp_r, &(y->right), 1, MPFR_RNDN); /* should be exact*/ + inexact_add = mpfr_add (m, tmp_l, tmp_r, MPFR_RNDN); + mpfr_clear (tmp_l); + mpfr_clear (tmp_r); + } + else + { + inexact_div2 = mpfr_div_2ui (m, m, 1, MPFR_RNDN); + } + } + + /* Hope it copes correctly with an underflow in the division by 2... */ + if (inexact_div2) + return inexact_div2; + else + return inexact_add; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mig.c b/Build/source/libs/mpfi/mpfi-src/src/mig.c new file mode 100644 index 00000000000..deda72be4b9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mig.c @@ -0,0 +1,48 @@ +/* mig.c -- Element with the smallest absolute value. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Mignitude: the smallest absolute value of any element */ +int +mpfi_mig (mpfr_ptr m, mpfi_srcptr x) +{ + int inexact; + + if (MPFI_NAN_P (x)) { + mpfr_set_nan (m); + MPFR_RET_NAN; + } + + if (mpfi_is_nonneg_default (x)) + inexact = mpfr_set (m, &(x->left), MPFI_RNDD); + else if (mpfi_is_nonpos_default (x)) + inexact = mpfr_neg (m, &(x->right), MPFI_RNDD); + else { /* x contains 0 */ + inexact = mpfr_set_ui (m, 0, MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mpfi-impl.h b/Build/source/libs/mpfi/mpfi-src/src/mpfi-impl.h new file mode 100644 index 00000000000..591427bdd5e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mpfi-impl.h @@ -0,0 +1,111 @@ +/* mpfi-impl.h -- Include file for mpfi. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2018, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#ifndef __MPFI_IMPL_H__ +#define __MPFI_IMPL_H__ + +#include "mpfi.h" +#include "mpfi_config.h" + +#if MPFR_VERSION < MPFR_VERSION_NUM(3,0,0) +#define MPFI_RNDD GMP_RNDD +#define MPFI_RNDU GMP_RNDU +#else +#define MPFI_RNDD MPFR_RNDD +#define MPFI_RNDU MPFR_RNDU +#define GMP_RNDN MPFR_RNDN +#endif + +#define MPFI_IS_POS(x) ((mpfr_sgn((&(x->left)))>=0) && (mpfr_sgn((&(x->right)))>0)) +#define MPFI_IS_STRICTLY_POS(x) ((mpfr_sgn((&(x->left)))>0) && (mpfr_sgn((&(x->right)))>0)) +#define MPFI_IS_NONNEG(x) ((mpfr_sgn((&(x->left)))>=0) && (mpfr_sgn((&(x->right)))>=0)) +#define MPFI_IS_NEG(x) ((mpfr_sgn((&(x->left)))<0) && (mpfr_sgn((&(x->right)))<=0)) +#define MPFI_IS_STRICTLY_NEG(x) ((mpfr_sgn((&(x->left)))<0) && (mpfr_sgn((&(x->right)))<0)) +#define MPFI_IS_NONPOS(x) ((mpfr_sgn((&(x->left)))<=0) && (mpfr_sgn((&(x->right)))<=0)) +#define MPFI_IS_NULL(x) ((mpfr_sgn((&(x->left)))==0) && (mpfr_sgn((&(x->right)))==0)) +#define MPFI_HAS_ZERO(x) ((mpfr_sgn((&(x->left)))<0) && (mpfr_sgn((&(x->right)))>0)) +#define MPFI_HAS_ZERO_NONSTRICT(x) ((mpfr_sgn((&(x->left)))<=0) && (mpfr_sgn((&(x->right)))>=0)) + + +#if defined(GMP_NUMB_BITS) /* GMP 4.1.2 or above */ +# define BITS_PER_MP_LIMB (GMP_NUMB_BITS+GMP_NAIL_BITS) +#elif defined (__GMP_BITS_PER_MP_LIMB) /* Older versions 4.x.x */ +#define BITS_PER_MP_LIMB __GMP_BITS_PER_MP_LIMB +#else +# error "Could not detect BITS_PER_MP_LIMB. Get GMP 4.1.0 at least." +#endif + +#define MPFR_RET_NAN do {mpfr_set_nanflag(); return 0;} while (0) + +#define MPFR_IS_NAN(x) (mpfr_nan_p(x)) +#define MPFR_IS_ZERO(x) (mpfr_sgn(x) == 0) +#define MPFR_IS_INF(x) (mpfr_inf_p(x)) + +/* Internal functions */ + +#if defined (__cplusplus) +extern "C" { +#endif + + + +mpfr_prec_t mpfi_quadrant (mpz_ptr, mpfr_srcptr); +int mpfi_cmp_sym_pi (mpz_srcptr, mpfr_srcptr, mpfr_srcptr, mpfr_prec_t); + +/* default comparison functions */ +int mpfi_cmp_default (mpfi_srcptr, mpfi_srcptr); +int mpfi_cmp_d_default (mpfi_srcptr, const double); +int mpfi_cmp_ui_default (mpfi_srcptr, const unsigned long); +int mpfi_cmp_si_default (mpfi_srcptr, const long); +int mpfi_cmp_z_default (mpfi_srcptr, mpz_srcptr); +int mpfi_cmp_q_default (mpfi_srcptr, mpq_srcptr); +int mpfi_cmp_fr_default (mpfi_srcptr, mpfr_srcptr); + +int mpfi_is_pos_default (mpfi_srcptr); +int mpfi_is_nonneg_default (mpfi_srcptr); +int mpfi_is_neg_default (mpfi_srcptr); +int mpfi_is_nonpos_default (mpfi_srcptr); +int mpfi_is_zero_default (mpfi_srcptr); +int mpfi_is_strictly_neg_default (mpfi_srcptr); +int mpfi_is_strictly_pos_default (mpfi_srcptr); + +#if defined (__cplusplus) +} +#endif + +/* Debug macros */ +#ifdef WARN_IF_REVERTED_ENDPOINTS +/* include stdio.h when using this macro */ +# define WARNING_REVERTED_ENDPOINTS(a, fname) \ + do { \ + fprintf (stdout, "Pb endpoints in reverse order in %s\n", fname); \ + mpfi_out_str (stdout, 10, 0, a); \ + fprintf (stdout, "\n"); \ + } while (0) +#else +# define WARNING_REVERTED_ENDPOINTS(a, fname) +#endif + +#endif /* __MPFI_IMPL_H__ */ diff --git a/Build/source/libs/mpfi/mpfi-src/src/mpfi.h b/Build/source/libs/mpfi/mpfi-src/src/mpfi.h new file mode 100644 index 00000000000..80e307cc745 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mpfi.h @@ -0,0 +1,394 @@ +/* mpfi.h -- Include file for mpfi. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2012, 2018, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + + +#ifndef __MPFI_H__ +#define __MPFI_H__ + +/* Machine independent implementations */ + +#include +#include + +/* Define MPFI version number */ +#define MPFI_VERSION_MAJOR 1 +#define MPFI_VERSION_MINOR 5 +#define MPFI_VERSION_PATCHLEVEL 4 +#define MPFI_VERSION_STRING "1.5.4" + +typedef struct { + __mpfr_struct left; + __mpfr_struct right; +}__mpfi_struct; + +typedef __mpfi_struct mpfi_t[1]; +typedef __mpfi_struct *mpfi_ptr; +typedef const __mpfi_struct *mpfi_srcptr; + +#ifdef __cplusplus +extern "C" { +#endif + +/* Rounding */ +int mpfi_round_prec (mpfi_ptr, mpfr_prec_t prec); + + +/* Initialization, destruction and assignment */ + +/* initializations */ +void mpfi_init (mpfi_ptr); +void mpfi_init2 (mpfi_ptr, mpfr_prec_t); +void mpfi_inits (mpfi_ptr x, ...); +void mpfi_inits2 (mpfr_prec_t p, mpfi_ptr x, ...); + +void mpfi_clear (mpfi_ptr); +void mpfi_clears (mpfi_ptr x, ...); + +/* mpfi bounds have the same precision */ +mpfr_prec_t mpfi_get_prec (mpfi_srcptr); +void mpfi_set_prec (mpfi_ptr, mpfr_prec_t); + + +/* assignment functions */ +int mpfi_set (mpfi_ptr, mpfi_srcptr); +int mpfi_set_si (mpfi_ptr, const long); +int mpfi_set_ui (mpfi_ptr, const unsigned long); +/* int mpfi_set_sj (mpfi_ptr, const intmax_t); */ +/* int mpfi_set_uj (mpfi_ptr, const uintmax_t); */ +int mpfi_set_d (mpfi_ptr, const double); +int mpfi_set_flt (mpfi_ptr, const float); +int mpfi_set_ld (mpfi_ptr, const long double); +int mpfi_set_z (mpfi_ptr, mpz_srcptr); +int mpfi_set_q (mpfi_ptr, mpq_srcptr); +int mpfi_set_fr (mpfi_ptr, mpfr_srcptr); +int mpfi_set_str (mpfi_ptr, const char *, int); + +/* combined initialization and assignment functions */ +int mpfi_init_set (mpfi_ptr, mpfi_srcptr); +int mpfi_init_set_si (mpfi_ptr, const long); +int mpfi_init_set_ui (mpfi_ptr, const unsigned long); +int mpfi_init_set_d (mpfi_ptr, const double); +int mpfi_init_set_flt (mpfi_ptr, const float); +int mpfi_init_set_ld (mpfi_ptr, const long double); +int mpfi_init_set_z (mpfi_ptr, mpz_srcptr); +int mpfi_init_set_q (mpfi_ptr, mpq_srcptr); +int mpfi_init_set_fr (mpfi_ptr, mpfr_srcptr); +int mpfi_init_set_str (mpfi_ptr, const char *, int); + +/* swapping two intervals */ +void mpfi_swap (mpfi_ptr, mpfi_ptr); + + +/* Various useful interval functions */ +/* with scalar or interval results */ + +/* absolute diameter */ +int mpfi_diam_abs (mpfr_ptr, mpfi_srcptr); +/* relative diameter */ +int mpfi_diam_rel (mpfr_ptr, mpfi_srcptr); +/* diameter: relative if the interval does not contain 0 */ +/* absolute otherwise */ +int mpfi_diam (mpfr_ptr, mpfi_srcptr); +/* magnitude: the largest absolute value of any element */ +int mpfi_mag (mpfr_ptr, mpfi_srcptr); +/* mignitude: the smallest absolute value of any element */ +int mpfi_mig (mpfr_ptr, mpfi_srcptr); +/* middle of y */ +int mpfi_mid (mpfr_ptr, mpfi_srcptr); +/* picks randomly a point m in y */ +void mpfi_alea (mpfr_ptr, mpfi_srcptr); +void mpfi_urandom (mpfr_ptr, mpfi_srcptr, gmp_randstate_t); +void mpfi_nrandom (mpfr_ptr, mpfi_srcptr, gmp_randstate_t); +void mpfi_erandom (mpfr_ptr, mpfi_srcptr, gmp_randstate_t); + + +/* Conversions */ + +double mpfi_get_d (mpfi_srcptr); +void mpfi_get_fr (mpfr_ptr, mpfi_srcptr); + + +/* Basic arithmetic operations */ + +/* arithmetic operations between two interval operands */ +int mpfi_add (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); +int mpfi_sub (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); +int mpfi_mul (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); +int mpfi_div (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); + +/* arithmetic operations between an interval operand and a double prec. floating-point */ +int mpfi_add_d (mpfi_ptr, mpfi_srcptr, const double); +int mpfi_sub_d (mpfi_ptr, mpfi_srcptr, const double); +int mpfi_d_sub (mpfi_ptr, const double, mpfi_srcptr); +int mpfi_mul_d (mpfi_ptr, mpfi_srcptr, const double); +int mpfi_div_d (mpfi_ptr, mpfi_srcptr, const double); +int mpfi_d_div (mpfi_ptr, const double, mpfi_srcptr); + +/* arithmetic operations between an interval operand and an unsigned long integer */ +int mpfi_add_ui (mpfi_ptr, mpfi_srcptr, const unsigned long); +int mpfi_sub_ui (mpfi_ptr, mpfi_srcptr, const unsigned long); +int mpfi_ui_sub (mpfi_ptr, const unsigned long, mpfi_srcptr); +int mpfi_mul_ui (mpfi_ptr, mpfi_srcptr, const unsigned long); +int mpfi_div_ui (mpfi_ptr, mpfi_srcptr, const unsigned long); +int mpfi_ui_div (mpfi_ptr, const unsigned long, mpfi_srcptr); + +/* arithmetic operations between an interval operand and a long integer */ +int mpfi_add_si (mpfi_ptr, mpfi_srcptr, const long); +int mpfi_sub_si (mpfi_ptr, mpfi_srcptr, const long); +int mpfi_si_sub (mpfi_ptr, const long, mpfi_srcptr); +int mpfi_mul_si (mpfi_ptr, mpfi_srcptr, const long); +int mpfi_div_si (mpfi_ptr, mpfi_srcptr, const long); +int mpfi_si_div (mpfi_ptr, const long, mpfi_srcptr); + +/* arithmetic operations between an interval operand and a multiple prec. integer */ +int mpfi_add_z (mpfi_ptr, mpfi_srcptr, mpz_srcptr); +int mpfi_sub_z (mpfi_ptr, mpfi_srcptr, mpz_srcptr); +int mpfi_z_sub (mpfi_ptr, mpz_srcptr, mpfi_srcptr); +int mpfi_mul_z (mpfi_ptr, mpfi_srcptr, mpz_srcptr); +int mpfi_div_z (mpfi_ptr, mpfi_srcptr, mpz_srcptr); +int mpfi_z_div (mpfi_ptr, mpz_srcptr, mpfi_srcptr); + +/* arithmetic operations between an interval operand and a multiple prec. rational */ +int mpfi_add_q (mpfi_ptr, mpfi_srcptr, mpq_srcptr); +int mpfi_sub_q (mpfi_ptr, mpfi_srcptr, mpq_srcptr); +int mpfi_q_sub (mpfi_ptr, mpq_srcptr, mpfi_srcptr); +int mpfi_mul_q (mpfi_ptr, mpfi_srcptr, mpq_srcptr); +int mpfi_div_q (mpfi_ptr, mpfi_srcptr, mpq_srcptr); +int mpfi_q_div (mpfi_ptr, mpq_srcptr, mpfi_srcptr); + +/* arithmetic operations between an interval operand and a mult. prec. floating-pt nb */ +int mpfi_add_fr (mpfi_ptr, mpfi_srcptr, mpfr_srcptr); +int mpfi_sub_fr (mpfi_ptr, mpfi_srcptr, mpfr_srcptr); +int mpfi_fr_sub (mpfi_ptr, mpfr_srcptr, mpfi_srcptr); +int mpfi_mul_fr (mpfi_ptr, mpfi_srcptr, mpfr_srcptr); +int mpfi_div_fr (mpfi_ptr, mpfi_srcptr, mpfr_srcptr); +int mpfi_fr_div (mpfi_ptr, mpfr_srcptr, mpfi_srcptr); + +/* arithmetic operations taking a single interval operand */ +int mpfi_neg (mpfi_ptr, mpfi_srcptr); +int mpfi_sqr (mpfi_ptr, mpfi_srcptr); +/* the inv function generates the whole real interval + if 0 is in the interval defining the divisor */ +int mpfi_inv (mpfi_ptr, mpfi_srcptr); +/* the sqrt of a (partially) negative interval is a NaN */ +int mpfi_sqrt (mpfi_ptr, mpfi_srcptr); +int mpfi_cbrt (mpfi_ptr, mpfi_srcptr); +/* the first interval contains the absolute values of */ +/* every element of the second interval */ +int mpfi_abs (mpfi_ptr, mpfi_srcptr); +int mpfi_inv (mpfi_ptr, mpfi_srcptr); +int mpfi_rec_sqrt (mpfi_ptr, mpfi_srcptr); + +/* extended division: returns 2 intervals if the denominator contains 0 */ +int mpfi_div_ext (mpfi_ptr, mpfi_ptr, mpfi_srcptr, mpfi_srcptr); + +/* various operations */ +int mpfi_mul_2exp (mpfi_ptr, mpfi_srcptr, unsigned long); +int mpfi_mul_2ui (mpfi_ptr, mpfi_srcptr, unsigned long); +int mpfi_mul_2si (mpfi_ptr, mpfi_srcptr, long); +int mpfi_div_2exp (mpfi_ptr, mpfi_srcptr, unsigned long); +int mpfi_div_2ui (mpfi_ptr, mpfi_srcptr, unsigned long); +int mpfi_div_2si (mpfi_ptr, mpfi_srcptr, long); + +/* Special functions */ +int mpfi_log (mpfi_ptr, mpfi_srcptr); +int mpfi_exp (mpfi_ptr, mpfi_srcptr); +int mpfi_exp2 (mpfi_ptr, mpfi_srcptr); +int mpfi_exp10 (mpfi_ptr, mpfi_srcptr); + +int mpfi_cos (mpfi_ptr, mpfi_srcptr); +int mpfi_sin (mpfi_ptr, mpfi_srcptr); +int mpfi_tan (mpfi_ptr, mpfi_srcptr); +int mpfi_acos (mpfi_ptr, mpfi_srcptr); +int mpfi_asin (mpfi_ptr, mpfi_srcptr); +int mpfi_atan (mpfi_ptr, mpfi_srcptr); +int mpfi_atan2 (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); + +int mpfi_sec (mpfi_ptr, mpfi_srcptr); +int mpfi_csc (mpfi_ptr, mpfi_srcptr); +int mpfi_cot (mpfi_ptr, mpfi_srcptr); + +int mpfi_cosh (mpfi_ptr, mpfi_srcptr); +int mpfi_sinh (mpfi_ptr, mpfi_srcptr); +int mpfi_tanh (mpfi_ptr, mpfi_srcptr); +int mpfi_acosh (mpfi_ptr, mpfi_srcptr); +int mpfi_asinh (mpfi_ptr, mpfi_srcptr); +int mpfi_atanh (mpfi_ptr, mpfi_srcptr); + +int mpfi_sech (mpfi_ptr, mpfi_srcptr); +int mpfi_csch (mpfi_ptr, mpfi_srcptr); +int mpfi_coth (mpfi_ptr, mpfi_srcptr); + +int mpfi_log1p (mpfi_ptr, mpfi_srcptr); +int mpfi_log10p1 (mpfi_ptr, mpfi_srcptr); +int mpfi_log2p1 (mpfi_ptr, mpfi_srcptr); +int mpfi_expm1 (mpfi_ptr, mpfi_srcptr); +int mpfi_exp2m1 (mpfi_ptr, mpfi_srcptr); +int mpfi_exp10m1 (mpfi_ptr, mpfi_srcptr); + +int mpfi_log2 (mpfi_ptr, mpfi_srcptr); +int mpfi_log10 (mpfi_ptr, mpfi_srcptr); + +int mpfi_hypot (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); + +int mpfi_const_log2 (mpfi_ptr); +int mpfi_const_pi (mpfi_ptr); +int mpfi_const_euler (mpfi_ptr); +int mpfi_const_catalan (mpfi_ptr); + +/* Comparison functions */ +/* Warning: the meaning of interval comparison is not clearly defined */ +/* customizable comparison functions */ + +extern int (*mpfi_cmp) (mpfi_srcptr, mpfi_srcptr); + +extern int (*mpfi_cmp_d) (mpfi_srcptr, const double); +extern int (*mpfi_cmp_ui) (mpfi_srcptr, const unsigned long); +extern int (*mpfi_cmp_si) (mpfi_srcptr, const long); +extern int (*mpfi_cmp_z) (mpfi_srcptr, mpz_srcptr); +extern int (*mpfi_cmp_q) (mpfi_srcptr, mpq_srcptr); +extern int (*mpfi_cmp_fr) (mpfi_srcptr, mpfr_srcptr); + +extern int (*mpfi_is_pos) (mpfi_srcptr); +extern int (*mpfi_is_nonneg) (mpfi_srcptr); +extern int (*mpfi_is_neg) (mpfi_srcptr); +extern int (*mpfi_is_nonpos) (mpfi_srcptr); +extern int (*mpfi_is_zero) (mpfi_srcptr); +extern int (*mpfi_is_strictly_pos) (mpfi_srcptr); +extern int (*mpfi_is_strictly_neg) (mpfi_srcptr); + +int mpfi_has_zero (mpfi_srcptr); + +int mpfi_nan_p (mpfi_srcptr); +int mpfi_inf_p (mpfi_srcptr); +int mpfi_bounded_p (mpfi_srcptr); + +/* Interval manipulation */ + +/* operations related to the internal representation by endpoints */ + +/* get left or right bound of the interval defined by the + second argument and put the result in the first one */ +int mpfi_get_left (mpfr_ptr, mpfi_srcptr); +int mpfi_get_right (mpfr_ptr, mpfi_srcptr); + +int mpfi_revert_if_needed (mpfi_ptr); + +/* Set operations on intervals */ +/* "Convex hulls" */ +/* extends the interval defined by the first argument + so that it contains the second one */ + +int mpfi_put (mpfi_ptr, mpfi_srcptr); +int mpfi_put_d (mpfi_ptr, const double); +int mpfi_put_si (mpfi_ptr, const long); +int mpfi_put_ui (mpfi_ptr, const unsigned long); +int mpfi_put_z (mpfi_ptr, mpz_srcptr); +int mpfi_put_q (mpfi_ptr, mpq_srcptr); +int mpfi_put_fr (mpfi_ptr, mpfr_srcptr); + +/* builds an interval whose left bound is the lower (round -infty) + than the second argument and the right bound is greater + (round +infty) than the third one */ + +int mpfi_interv_d (mpfi_ptr, const double, const double); +int mpfi_interv_si (mpfi_ptr, const long, const long); +int mpfi_interv_ui (mpfi_ptr, const unsigned long, const unsigned long); +int mpfi_interv_z (mpfi_ptr, mpz_srcptr, mpz_srcptr); +int mpfi_interv_q (mpfi_ptr, mpq_srcptr, mpq_srcptr); +int mpfi_interv_fr (mpfi_ptr, mpfr_srcptr, mpfr_srcptr); + +/* Inclusion tests */ +/* tests if the first argument is inside the interval + defined by the second one */ +int mpfi_is_strictly_inside (mpfi_srcptr, mpfi_srcptr); +int mpfi_is_inside (mpfi_srcptr, mpfi_srcptr); +int mpfi_is_inside_d (const double, mpfi_srcptr); +int mpfi_is_inside_ui (const unsigned long, mpfi_srcptr); +int mpfi_is_inside_si (const long, mpfi_srcptr); +int mpfi_is_inside_z (mpz_srcptr, mpfi_srcptr); +int mpfi_is_inside_q (mpq_srcptr, mpfi_srcptr); +int mpfi_is_inside_fr (mpfr_srcptr, mpfi_srcptr); + +/* set operations */ +int mpfi_is_empty (mpfi_srcptr); +int mpfi_intersect (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); +int mpfi_union (mpfi_ptr, mpfi_srcptr, mpfi_srcptr); + +/* complement... : to do later */ + + +/* Miscellaneous */ + +/* adds the second argument to the right bound of the first one + and subtracts the second argument to the left bound of + the first one */ +int mpfi_increase (mpfi_ptr, mpfr_srcptr); +/* keeps the same center and multiply the radius by 2*(1+fact) */ +int mpfi_blow (mpfi_ptr, mpfi_srcptr, double); +/* splits the interval into 2 halves */ +int mpfi_bisect (mpfi_ptr, mpfi_ptr, mpfi_srcptr); + +const char * mpfi_get_version (void); + +/* Error handling */ + +extern int mpfi_error; +void mpfi_reset_error (void); +void mpfi_set_error (const int); +int mpfi_is_error (void); +#ifdef __cplusplus +} +#endif + +#define MPFI_ERROR(s) \ + do { \ + if(!mpfi_error) { \ + mpfi_error = 1; \ + fprintf(stderr, "\n%s\n", s); \ + } \ + } while (0) + +#define MPFI_FLAGS_BOTH_ENDPOINTS_EXACT 0 +#define MPFI_FLAGS_LEFT_ENDPOINT_INEXACT 1 +#define MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT 2 +#define MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT 3 + +#define MPFI_BOTH_ARE_EXACT(x) ( (int)(x) == 0 ) +#define MPFI_LEFT_IS_INEXACT(x) ( (int)(x)%2 ) +#define MPFI_RIGHT_IS_INEXACT(x) ( (int)(x)/2 ) +#define MPFI_BOTH_ARE_INEXACT(x) ( (int)(x) == 3 ) + +#define MPFI_REVERT_INEXACT_FLAGS(x) \ + ( ((x)==1) ? 2 : ((x)==2) ? 1 : x ) + +#define MPFI_NAN_P(a) ( MPFR_IS_NAN(&(a->left)) || MPFR_IS_NAN (&(a->right)) ) +#define MPFI_INF_P(a) ( MPFR_IS_INF(&(a->left)) || MPFR_IS_INF (&(a->right)) ) +#define MPFI_IS_ZERO(a) (MPFI_NAN_P(a) ? 0 : ((mpfr_sgn(&(a->right))==0) && (mpfr_sgn(&(a->left))==0))) + +#define MPFI_CLEAR(m) {mpfr_clear(&(m->right)); mpfr_clear(&(m->left));} + +#endif /* __MPFI_H__ */ diff --git a/Build/source/libs/mpfi/mpfi-src/src/mpfi_io.h b/Build/source/libs/mpfi/mpfi-src/src/mpfi_io.h new file mode 100644 index 00000000000..22acebe03bc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mpfi_io.h @@ -0,0 +1,50 @@ +/* mpfi_io.h -- Header for mpfi_io.c. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + + +#ifndef __MPFI_IO_H__ +#define __MPFI_IO_H__ + +#include +#include +#include +#include + +/*#define isblank isspace*/ +#define MPFI_ISSPACE isspace + +#ifdef __cplusplus +extern "C" { +#endif +size_t mpfi_out_str(FILE *stream, int base, size_t n_digits, mpfi_srcptr op); +size_t mpfi_inp_str(mpfi_ptr x,FILE *stream,int base); + +void mpfi_print_binary(mpfi_srcptr); +#ifdef __cplusplus +} +#endif + +#endif /* __MPFI_IO_H__ */ diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul.c b/Build/source/libs/mpfi/mpfi-src/src/mul.c new file mode 100644 index 00000000000..794ad7b7e5d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul.c @@ -0,0 +1,158 @@ +/* mul.c -- Multiply two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ + mpfr_t t1; + mpfr_t t2; + int inexact_left, inexact_right; + int inexact = 0; + + /* Handling the NaN cases */ + if ( MPFI_NAN_P (b) || MPFI_NAN_P (c) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + /* Handling the case where one operand is 0, in order */ + /* to avoid problems with 0 * an infinite interval */ + if (MPFI_IS_ZERO (b)) { + return (mpfi_set (a, b)); + } + if (MPFI_IS_ZERO (c)) { + return (mpfi_set (a, c)); + } + + if (mpfr_sgn (&(b->left)) >= 0) { + if (mpfr_sgn (&(c->left)) >=0) { + /* b nonnegative and c nonnegative */ + inexact_left = mpfr_mul (&(a->left), &(b->left), &(c->left), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->right), &(c->right), MPFI_RNDU); + } + else { + mpfr_init2 (t1, mpfr_get_prec (&(a->left))); + if (mpfr_sgn (&(c->right)) <= 0) { + /* b nonnegative and c non-positive */ + inexact_left = mpfr_mul (t1, &(b->right), &(c->left), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->left), &(c->right), MPFI_RNDU); + } + else { + /* b nonnegative and c overlapping 0 */ + inexact_left = mpfr_mul (t1, &(b->right), &(c->left), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->right), &(c->right), MPFI_RNDU); + } + mpfr_set (&(a->left), t1, MPFI_RNDD); /* exact */ + mpfr_clear (t1); + } + } + else { + if (mpfr_sgn (&(b->right)) <= 0) { + /* b non-positive */ + mpfr_init2 (t1, mpfr_get_prec (&(a->left))); + if (mpfr_sgn (&(c->left)) >= 0) { + /* b non-positive and c nonnegative */ + inexact_left = mpfr_mul (t1, &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->right), &(c->left), MPFI_RNDU); + } + else { + if (mpfr_sgn (&(c->right)) <= 0) { + /* b non-positive and c non-positive */ + inexact_left = mpfr_mul (t1, &(b->right), &(c->right), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->left), &(c->left), MPFI_RNDU); + } + else { + /* b non-positive and c overlapping 0 */ + inexact_left = mpfr_mul (t1, &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->left), &(c->left), MPFI_RNDU); + } + } + mpfr_set (&(a->left), t1, MPFI_RNDD); /* exact */ + mpfr_clear (t1); + } + else { + /* b contains 0 */ + if (mpfr_sgn (&(c->left)) >= 0) { + /* b overlapping 0 and c nonnegative */ + mpfr_init2 (t1, mpfr_get_prec (&(a->left))); + + inexact_left = mpfr_mul (t1, &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->right), &(c->right), MPFI_RNDU); + + mpfr_set (&(a->left), t1, MPFI_RNDD); + mpfr_clear (t1); + } + else { + if (mpfr_sgn (&(c->right)) <= 0) { + /* b overlapping 0 and c non-positive */ + mpfr_init2 (t1, mpfr_get_prec (&(a->left))); + + inexact_left = mpfr_mul (t1, &(b->right), &(c->left), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(b->left), &(c->left), MPFI_RNDU); + + mpfr_set (&(a->left), t1, MPFI_RNDD); + mpfr_clear (t1); + } + else { + /* b overlapping 0 and c overlapping 0 + Beware the case where the result is one of the operands! */ + int inexact_tmp; + + mpfr_init2 (t1, mpfr_get_prec (&(a->left))); + mpfr_init2 (t2, mpfr_get_prec (&(a->left))); + inexact_tmp = mpfr_mul (t1, &(b->left), &(c->right), MPFI_RNDD); + inexact_left = mpfr_mul (t2, &(b->right), &(c->left), MPFI_RNDD); + if (mpfr_cmp (t1, t2) < 0) { + mpfr_swap (t2, t1); /* same precision */ + inexact_left = inexact_tmp; + } + + mpfr_set_prec (t1, mpfr_get_prec (&(a->right))); + inexact_tmp = mpfr_mul (t1, &(b->left), &(c->left), MPFI_RNDU); + inexact_right = mpfr_mul (&(a->right), &(b->right), &(c->right), MPFI_RNDU); + if (mpfr_cmp (t1, &(a->right)) > 0) { + mpfr_set (&(a->right), t1, MPFI_RNDU); /* exact */ + inexact_right = inexact_tmp; + } + mpfr_set (&(a->left), t2, MPFI_RNDD); /* exact */ + mpfr_clear (t1); + mpfr_clear (t2); + } + } + } + } + + /* no need to check to sign of an endpoint equal to 0, it should be OK */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_2exp.c b/Build/source/libs/mpfi/mpfi-src/src/mul_2exp.c new file mode 100644 index 00000000000..820127d0703 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_2exp.c @@ -0,0 +1,45 @@ +/* mul_2exp.c -- Scale endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_2exp (mpfi_ptr a, mpfi_srcptr b, unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_mul_2exp (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_2exp (&(a->right), &(b->right), c, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_2si.c b/Build/source/libs/mpfi/mpfi-src/src/mul_2si.c new file mode 100644 index 00000000000..5da61398eec --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_2si.c @@ -0,0 +1,45 @@ +/* mul_2si.c -- Scale endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_2si (mpfi_ptr a, mpfi_srcptr b, long c) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_mul_2si (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_2si (&(a->right), &(b->right), c, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_2ui.c b/Build/source/libs/mpfi/mpfi-src/src/mul_2ui.c new file mode 100644 index 00000000000..975d301c168 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_2ui.c @@ -0,0 +1,45 @@ +/* mul_2ui.c -- Scale endpoints. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_2ui (mpfi_ptr a, mpfi_srcptr b, unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_mul_2ui (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_2ui (&(a->right), &(b->right), c, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_d.c b/Build/source/libs/mpfi/mpfi-src/src/mul_d.c new file mode 100644 index 00000000000..65eb4535d5f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_d.c @@ -0,0 +1,69 @@ +/* mul_d.c -- Multiply an interval and a double. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_d (mpfi_ptr a, mpfi_srcptr b, const double c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (c == 0.0) + { + return mpfi_set_si(a, 0); + } + else if (c < 0.0) + { + mpfr_init2(tmp, mpfr_get_prec( &(a->left)) ); + inexact_left = mpfr_mul_d (tmp, &(b->right), c, MPFI_RNDD); + inexact_right = mpfr_mul_d( &(a->right), &(b->left), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear(tmp); + } + else /* c > 0.0 */ + { + inexact_left = mpfr_mul_d( &(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_d( &(a->right), &(b->right), c, MPFI_RNDU); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_fr.c b/Build/source/libs/mpfi/mpfi-src/src/mul_fr.c new file mode 100644 index 00000000000..66f06aaf75f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_fr.c @@ -0,0 +1,50 @@ +/* mul_fr.c -- Multiply an interval and a floating-point number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_fr (mpfi_ptr a, mpfi_srcptr b, mpfr_srcptr c) +{ + mpfi_t tmp; + int inexact = 0; + + if ( MPFI_NAN_P (b) || mpfr_nan_p(c) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + mpfi_init2 (tmp, mpfr_get_prec (c)); + mpfi_set_fr (tmp, c); /* exact */ + inexact = mpfi_mul (a, b, tmp); + MPFI_CLEAR (tmp); + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_q.c b/Build/source/libs/mpfi/mpfi-src/src/mul_q.c new file mode 100644 index 00000000000..2fadf4eff7d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_q.c @@ -0,0 +1,94 @@ +/* mul_q.c -- Multiply an interval and a rational number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_q (mpfi_ptr a, mpfi_srcptr b, mpq_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (!mpq_sgn(c)) /* c == 0 */ + { + return mpfi_set_si(a, 0); + } + else if (mpq_sgn(c) <0) /* c < 0 */ + { + mpfr_init2(tmp, mpfr_get_prec( &(a->left)) ); + + inexact_left = mpfr_mul_q (tmp, &(b->right), c, MPFI_RNDD); + if (mpfr_inf_p (tmp) && !mpfr_inf_p (&(b->right))) + { + /* work around MPFR bug in mpfr_mul_q (present in MPFR-3.0.0) */ + inexact_left = 1; /* overflow */ + } + + inexact_right = mpfr_mul_q( &(a->right), &(b->left), c, MPFI_RNDU); + if (mpfr_inf_p (&(a->right)) && !mpfr_inf_p (&(b->left))) + { + /* work around MPFR bug in mpfr_mul_q */ + inexact_right = 1; /* overflow */ + } + + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear(tmp); + } + else /* c > 0 */ + { + int mpfr_bug_work_around; + + mpfr_bug_work_around = !mpfr_inf_p (&(b->left)); + inexact_left = mpfr_mul_q( &(a->left), &(b->left), c, MPFI_RNDD); + if (mpfr_bug_work_around && mpfr_inf_p (&(a->left))) + { + /* work around MPFR bug in mpfr_mul_q */ + inexact_left = 1; /* overflow */ + } + + mpfr_bug_work_around = !mpfr_inf_p (&(b->right)); + inexact_right = mpfr_mul_q( &(a->right), &(b->right), c, MPFI_RNDU); + if (mpfr_bug_work_around && mpfr_inf_p (&(a->right))) + { + /* work around MPFR bug in mpfr_mul_q */ + inexact_right = 1; /* overflow */ + } + } + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_si.c b/Build/source/libs/mpfi/mpfi-src/src/mul_si.c new file mode 100644 index 00000000000..d1758e8948a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_si.c @@ -0,0 +1,66 @@ +/* mul_si.c -- Multiply an interval and a signed long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_si (mpfi_ptr a, mpfi_srcptr b, const long c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (c == 0) + { + return mpfi_set_si(a, 0); + } + else if (c < 0) + { + mpfr_init2(tmp, mpfr_get_prec( &(a->left)) ); + inexact_left = mpfr_mul_si (tmp, &(b->right), c, MPFI_RNDD); + inexact_right = mpfr_mul_si( &(a->right), &(b->left), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear(tmp); + } + else /* c > 0 */ + { + inexact_left = mpfr_mul_si( &(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_si( &(a->right), &(b->right), c, MPFI_RNDU); + } + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_ui.c b/Build/source/libs/mpfi/mpfi-src/src/mul_ui.c new file mode 100644 index 00000000000..55e825d58f6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_ui.c @@ -0,0 +1,57 @@ +/* mul_ui.c -- Multiply an interval and an unsigned long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_ui (mpfi_ptr a, mpfi_srcptr b, const unsigned long c) +{ + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (c == 0) + { + return mpfi_set_si(a, 0); + } + else /* c > 0 */ + { + inexact_left = mpfr_mul_ui( &(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_ui( &(a->right), &(b->right), c, MPFI_RNDU); + } + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/mul_z.c b/Build/source/libs/mpfi/mpfi-src/src/mul_z.c new file mode 100644 index 00000000000..f8692e2708f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/mul_z.c @@ -0,0 +1,66 @@ +/* mul_z.c -- Multiply an interval and an integer. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_mul_z (mpfi_ptr a, mpfi_srcptr b, mpz_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) + { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (!mpz_sgn(c)) /* c == 0 */ + { + return mpfi_set_si(a, 0); + } + else if (mpz_sgn(c) <0) /* c < 0 */ + { + mpfr_init2(tmp, mpfr_get_prec( &(a->left)) ); + inexact_left = mpfr_mul_z (tmp, &(b->right), c, MPFI_RNDD); + inexact_right = mpfr_mul_z( &(a->right), &(b->left), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear(tmp); + } + else /* c > 0 */ + { + inexact_left = mpfr_mul_z( &(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_mul_z( &(a->right), &(b->right), c, MPFI_RNDU); + } + + /* no need to check to sign of the bounds in case they are 0 */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/neg.c b/Build/source/libs/mpfi/mpfi-src/src/neg.c new file mode 100644 index 00000000000..d9115bcfb74 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/neg.c @@ -0,0 +1,49 @@ +/* neg.c -- Return interval opposite. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_neg (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + mpfr_init2 (tmp, mpfr_get_prec (&(a->right))); + inexact_right = mpfr_set (tmp, &(b->left), MPFI_RNDD); + inexact_left = mpfr_neg (&(a->left), &(b->right), MPFI_RNDD); + mpfr_neg (&(a->right), tmp, MPFI_RNDU); /* exact */ + mpfr_clear (tmp); + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/nrandom.c b/Build/source/libs/mpfi/mpfi-src/src/nrandom.c new file mode 100644 index 00000000000..9f341b43411 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/nrandom.c @@ -0,0 +1,98 @@ +/* nrandom.c -- Random element in the interval, following a normal distribution. + without any guarantee, to be checked + +Copyright 2018 + AriC project, Inria Rhone-Alpes, France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Picks randomly a point m in y */ +void +mpfi_nrandom (mpfr_ptr m, mpfi_srcptr y, gmp_randstate_t state) +{ + mpfr_prec_t prec, tmp_prec; + mpfr_t diam, fact; + + + if (MPFI_NAN_P(y)) { + mpfr_set_nan (m); + return; + } + + if (mpfr_equal_p (&(y->left), &(y->right))) { + mpfr_set (m, &(y->left), MPFR_RNDN); + return; + } + + prec = mpfr_get_prec (m); + tmp_prec = mpfi_get_prec(y); + if (tmp_prec > prec) + { + prec = tmp_prec; + } + mpfr_init2 (diam, prec); + mpfr_init2 (fact, prec); + + mpfi_diam_abs (diam, y); + mpfr_nrandom (fact, state, MPFR_RNDN); + mpfr_add_d (fact, fact, 0.5, MPFR_RNDN); + if (mpfr_cmp_ui (fact, 0) < 0) + mpfr_set_ui(fact, 0, MPFR_RNDN); + else if (mpfr_cmp_ui(fact, 1) > 0) + mpfr_set_ui(fact, 1, MPFR_RNDN); /* now fact lies between 0 and 1 */ + + if (mpfr_cmp_ui (diam, 1) <= 0) { + /* the picked point lies at a relative distance "fact" of the left + endpoint: m = inf + (sup - inf) * fact */ + mpfr_mul (fact, fact, diam, MPFR_RNDN); + /* FIXME: because of possible cancelation, the random distribution is + not uniform among the floating-point numbers in y */ + mpfr_add (m, &(y->left), fact, MPFR_RNDN); + } + else { + mpfr_exp_t e; + if (mpfr_cmp_abs (&(y->left), &(y->right)) < 0) { + e = mpfr_inf_p (&(y->right)) ? mpfr_get_emax () + : mpfr_get_exp (&(y->right)); + } + else { + e = mpfr_inf_p (&(y->left)) ? mpfr_get_emax () + : mpfr_get_exp (&(y->left)); + } + e += 1; + /* resize fact in [0, 2^e] where e = 1 + max{exp(left), exp(right)} */ + mpfr_mul_2exp (fact, fact, e, MPFR_RNDN); + mpfr_set (m, &(y->left), MPFR_RNDN); + if (mpfr_inf_p (m)) { + mpfr_nextabove (m); + } + /* m may be outside y */ + mpfr_add (m, m, fact, MPFR_RNDN); + } + mpfr_clear (fact); + mpfr_clear (diam); + + /* Ensure that m belongs to y (if the precision is sufficient) */ + if (mpfr_cmp (m, &(y->left)) < 0) + mpfr_set (m, &(y->left), MPFR_RNDU); + + if (mpfr_cmp (&(y->right), m) < 0) + mpfr_set (m, &(y->right), MPFR_RNDD); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/out_str.c b/Build/source/libs/mpfi/mpfi-src/src/out_str.c new file mode 100644 index 00000000000..5aaf63c481e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/out_str.c @@ -0,0 +1,42 @@ +/* out_str.c -- Output an interval representation in a stream. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi_io.h" +#include "mpfi-impl.h" + +size_t +mpfi_out_str (FILE *f, int base, size_t n_digits, mpfi_srcptr a) +{ + size_t res_left, res_right; + fprintf (f, "["); + res_left = mpfr_out_str (f, base, n_digits, &(a->left), MPFI_RNDD); + fprintf (f, ","); + res_right = mpfr_out_str (f, base, n_digits, &(a->right), MPFI_RNDU); + fprintf (f, "]"); + if ( (res_left > 0) && (res_right > 0) ) + return res_left + res_right + 3; /* 3 stands for "[", "," and "]" */ + else + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/predicates.c b/Build/source/libs/mpfi/mpfi-src/src/predicates.c new file mode 100644 index 00000000000..03be082d4b1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/predicates.c @@ -0,0 +1,46 @@ +/* predicates.c -- Predicates. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_nan_p (mpfi_srcptr a) +{ + return (mpfr_nan_p (&(a->left)) || mpfr_nan_p (&(a->right))); +} + +int +mpfi_inf_p (mpfi_srcptr a) +{ + return (mpfr_inf_p (&(a->left)) || mpfr_inf_p (&(a->right))) + && !MPFI_NAN_P (a); +} + +int +mpfi_bounded_p (mpfi_srcptr a) +{ + return (mpfr_number_p (&(a->left)) && mpfr_number_p (&(a->right)) + && !MPFI_NAN_P (a)); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/print_binary.c b/Build/source/libs/mpfi/mpfi-src/src/print_binary.c new file mode 100644 index 00000000000..c4e621a60a6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/print_binary.c @@ -0,0 +1,38 @@ +/* print_binary.c -- Print binary representation of an interval in stdout. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2018, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + + +#include "mpfi_io.h" +#include "mpfi-impl.h" + +void +mpfi_print_binary (mpfi_srcptr x) +{ + printf ("[ "); + mpfr_printf ("%Rf", &(x->left)); + printf (" , "); + mpfr_printf ("%Rf", &(x->right)); + printf (" ]"); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put.c b/Build/source/libs/mpfi/mpfi-src/src/put.c new file mode 100644 index 00000000000..45b897e953c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put.c @@ -0,0 +1,59 @@ +/* put.c -- Convex hull of two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* The result is the first interval extended so */ +/* that it contains the second (scalar) one. */ +/* Also called "convex hull". */ + +int +mpfi_put (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left = 0; + int inexact_right=0; + int inexact=0; + + if ( MPFI_NAN_P (b) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if ( mpfr_cmp (&(a->left), &(b->left)) > 0 ) { + inexact_left = mpfr_set (&(a->left), &(b->left), MPFI_RNDD); + } + if (mpfr_cmp (&(a->right), &(b->right)) < 0) { + inexact_right = mpfr_set (&(a->right), &(b->right), MPFI_RNDU); + } + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put_d.c b/Build/source/libs/mpfi/mpfi-src/src/put_d.c new file mode 100644 index 00000000000..55355cd0c5c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put_d.c @@ -0,0 +1,75 @@ +/* put_d.c -- Convex hull of an interval and a double. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_put_d (mpfi_ptr a, const double b) +{ + int inexact_left = 0; + int inexact_right = 0; + int inexact = 0; + /* MPFR erange flag is used to determine if b is NaN */ + int erange_old; + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + erange_old = mpfr_erangeflag_p (); + mpfr_clear_erangeflag (); + + if (mpfr_cmp_d (&(a->left), b) > 0 ) { + inexact_left = mpfr_set_d (&(a->left), b, MPFI_RNDD); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + } + else if (mpfr_cmp_d (&(a->right), b) < 0 ) { + inexact_right = mpfr_set_d (&(a->right), b, MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + } + else if (mpfr_cmp_d (&(a->left), b) == 0 && mpfr_erangeflag_p ()) { + /* d is NaN */ + mpfr_set_nan (&(a->left)); + } + + erange_old ? mpfr_set_erangeflag () : mpfr_clear_erangeflag (); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put_fr.c b/Build/source/libs/mpfi/mpfi-src/src/put_fr.c new file mode 100644 index 00000000000..630350e802d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put_fr.c @@ -0,0 +1,66 @@ +/* put_fr.c -- Convex hull of an interval and a floating-point number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_put_fr (mpfi_ptr a, mpfr_srcptr b) +{ + int inexact_left = 0; + int inexact_right = 0; + int inexact = 0; + + if ( mpfr_nan_p (b) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if ( mpfr_cmp (&(a->left), b) > 0 ) { + inexact_left = mpfr_set (&(a->left), b, MPFI_RNDD); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + } + else if (mpfr_cmp (&(a->right), b) < 0) { + inexact_right = mpfr_set (&(a->right), b, MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put_q.c b/Build/source/libs/mpfi/mpfi-src/src/put_q.c new file mode 100644 index 00000000000..7227b1a7f32 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put_q.c @@ -0,0 +1,56 @@ +/* put_q.c -- Convex hull of an interval and a rational number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_put_q (mpfi_ptr a, mpq_srcptr b) +{ + int inexact_left = 0; + int inexact_right = 0; + int inexact = 0; + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (mpfr_cmp_q (&(a->left), b) > 0 ) { + inexact_left = mpfr_set_q (&(a->left), b, MPFI_RNDD); + } + else if (mpfr_cmp_q (&(a->right), b) < 0 ) { + inexact_right = mpfr_set_q (&(a->right), b, MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put_si.c b/Build/source/libs/mpfi/mpfi-src/src/put_si.c new file mode 100644 index 00000000000..ceac99edf6a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put_si.c @@ -0,0 +1,55 @@ +/* put_si.c -- Convex hull of an interval and a signed long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_put_si (mpfi_ptr a, const long b) +{ + int inexact_left = 0; + int inexact_right = 0; + int inexact = 0; + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if ( mpfr_cmp_si (&(a->left), b) > 0 ) { + inexact_left = mpfr_set_si (&(a->left), b, MPFI_RNDD); + } + else if (mpfr_cmp_si (&(a->right), b) < 0) { + inexact_right = mpfr_set_si (&(a->right), b, MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + } + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put_ui.c b/Build/source/libs/mpfi/mpfi-src/src/put_ui.c new file mode 100644 index 00000000000..208f1d9759d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put_ui.c @@ -0,0 +1,55 @@ +/* put_ui.c -- Convex hull of an interval and an unsigned long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_put_ui (mpfi_ptr a, const unsigned long b) +{ + int inexact_left = 0; + int inexact_right = 0; + int inexact = 0; + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if ( mpfr_cmp_ui (&(a->left), b) > 0 ) { + inexact_left = mpfr_set_ui (&(a->left), b, MPFI_RNDD); + } + else if (mpfr_cmp_ui (&(a->right), b) < 0) { + inexact_right = mpfr_set_ui (&(a->right), b, MPFI_RNDU); + + if (b == 0) + /* zero right endpoint is always -0 */ + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/put_z.c b/Build/source/libs/mpfi/mpfi-src/src/put_z.c new file mode 100644 index 00000000000..4d94caa4931 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/put_z.c @@ -0,0 +1,55 @@ +/* put_z.c -- Convex hull of an interval and an integer. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_put_z (mpfi_ptr a, mpz_srcptr b) +{ + int inexact_left = 0; + int inexact_right = 0; + int inexact = 0; + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (mpfr_cmp_z (&(a->left), b) > 0 ) { + inexact_left = mpfr_set_z (&(a->left), b, MPFI_RNDD); + } + else if (mpfr_cmp_z (&(a->right), b) < 0 ) { + inexact_right = mpfr_set_z (&(a->right), b, MPFI_RNDU); + + if (mpz_cmp_ui (b, 0) == 0) + /* zero upper bound is -0 */ + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/q_div.c b/Build/source/libs/mpfi/mpfi-src/src/q_div.c new file mode 100644 index 00000000000..0c601a6c1ac --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/q_div.c @@ -0,0 +1,74 @@ +/* q_div.c -- Divide a rational number by an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_q_div (mpfi_ptr a, mpq_srcptr b, mpfi_srcptr c) +{ + mpfi_t tmp; + int inexact_set, inexact_div, inexact=0; + + if (MPFI_NAN_P (c)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (c)) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return inexact; + } + + if (mpq_sgn (b) == 0) { /* a = [-0, +0] */ + mpfi_set_ui (a, 0); + return inexact; + } + + mpfi_init2 (tmp, mpfi_get_prec (a)); + inexact_set = mpfi_set_q (tmp, b); + inexact_div = mpfi_div (a, tmp, c); + MPFI_CLEAR (tmp); + + if (MPFI_LEFT_IS_INEXACT (inexact_div) + || (inexact_set && !mpfr_inf_p (&a->left) && !mpfr_zero_p (&a->left))) { + /* the first condition MPFI_LEFT_IS_INEXACT (inexact_div) handles, among + others, overflow and underflow cases. + if a->left = infinity in non-overflow case, then a->left is the + quotient of b with an infinite endpoint of c, thus it is exact even if + tmp is not exact. + if a->left = 0 in non-underflow case, then either a->left is the + quotient of b with a zero endpoint of c, or b is null, thus a->left is + exact. */ + inexact += 1; + } + if (MPFI_RIGHT_IS_INEXACT (inexact_div) + ||(inexact_set && !mpfr_inf_p (&a->right) && !mpfr_zero_p (&a->right))){ + inexact += 2; + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/q_sub.c b/Build/source/libs/mpfi/mpfi-src/src/q_sub.c new file mode 100644 index 00000000000..98e0d6abb35 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/q_sub.c @@ -0,0 +1,84 @@ +/* q_sub.c -- Subtract an interval by an rational number. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, 2012, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" +#include "mpfi_config.h" + +#ifndef HAVE_MPFR_Q_SUB +static int +mpfr_q_sub (mpfr_ptr x, mpq_srcptr z, mpfr_srcptr y, mpfr_rnd_t rnd) +{ + /* mpfr_q_sub does not exist (at least up to version 3.0) */ + + /* Here we use the fact that x and y do not point to the same variable */ + int inex; + + inex = mpfr_sub_q (x, y, z, rnd == MPFI_RNDD ? MPFI_RNDU : MPFI_RNDD); + mpfr_neg (x, x, MPFI_RNDD); + + return -inex; +} +#endif /* HAVE_MPFR_Q_SUB */ + +int +mpfi_q_sub (mpfi_ptr a, mpq_srcptr b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if (MPFI_IS_ZERO (c)) { + return mpfi_set_q (a, b); + } + else if (!mpq_sgn(b)) { + return mpfi_neg (a, c); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_q_sub (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_q_sub (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} + diff --git a/Build/source/libs/mpfi/mpfi-src/src/quadrant.c b/Build/source/libs/mpfi/mpfi-src/src/quadrant.c new file mode 100644 index 00000000000..3d1f18616a2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/quadrant.c @@ -0,0 +1,71 @@ +/* quadrant.c -- Internal function for trigonometric functions. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* returns in quad the integer part of the division of x by Pi/2 */ +/* the result is exact */ +/* the returned value is the precision required to perform the division */ +mpfr_prec_t +mpfi_quadrant (mpz_ptr quad, mpfr_srcptr x) +{ +/* Assumption: x is neither a NaN nor an Infinite */ + int ok = 0; + mpfr_prec_t prec; + mpfi_t two_over_pi, tmp; + + prec = mpfr_get_prec (x); + + if (MPFR_IS_ZERO(x)) { + mpz_set_ui(quad, 0); + } + else { + mpfi_init2 (two_over_pi, prec); + mpfi_init2 (tmp, prec); + + do { + mpfi_const_pi (two_over_pi); + mpfi_ui_div (two_over_pi, 2, two_over_pi); + + mpfi_mul_fr (tmp, two_over_pi, x); + mpfr_floor (&(tmp->left), &(tmp->left)); + mpfr_floor (&(tmp->right), &(tmp->right)); + + ok = mpfr_cmp (&(tmp->left), &(tmp->right)); + if (ok != 0) { + prec += BITS_PER_MP_LIMB; + mpfi_set_prec (two_over_pi, prec); + mpfi_set_prec (tmp, prec); + } + } while (ok != 0); + + mpfr_get_z (quad, &(tmp->left), MPFR_RNDN); /* exact */ + + mpfi_clear (two_over_pi); + mpfi_clear (tmp); + } + + return prec; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/rec_sqrt.c b/Build/source/libs/mpfi/mpfi-src/src/rec_sqrt.c new file mode 100644 index 00000000000..f320e03319e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/rec_sqrt.c @@ -0,0 +1,58 @@ +/* sqrt.c -- Square root of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2019 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire then AriC project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_rec_sqrt (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + /* if b is (partially) negative, the left bound will be a NaN */ + /* it is handled by MPFR */ + inexact_left = mpfr_rec_sqrt (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_rec_sqrt (&(a->right), &(b->left), MPFI_RNDU); + + /* if ( mpfi_is_zero(b) ) { */ + /* if b is [0-, 0+], mpfr_rec_sqrt returns +Inf for both bounds */ + /* the left endpoint must be changed to -Inf. */ + /* The result is [-oo, +oo] and both endpoints are exact. */ + /* mpfr_set_inf (&(a->left), -1); */ + /* mpfr_set_inf (&(a->right), 1); */ + /* } */ + + if ( MPFI_NAN_P (a) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/revert_if_needed.c b/Build/source/libs/mpfi/mpfi-src/src/revert_if_needed.c new file mode 100644 index 00000000000..f9133bfa9a0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/revert_if_needed.c @@ -0,0 +1,45 @@ +/* revert_if_needed.c -- Helper function : swap endpoints so that + left <= right. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* ensures that the result is [a,b] with a<=b */ +/* should be useless but bugs are not excluded... */ +/* Returns 1 if endpoints have been exchanged */ + +int +mpfi_revert_if_needed (mpfi_ptr a) +{ + if ( MPFI_NAN_P (a) ) + return 0; + + if ( mpfr_cmp (&(a->right), &(a->left)) < 0 ) { + mpfr_swap (&(a->left), &(a->right)); + return 1; + } + else + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/round_prec.c b/Build/source/libs/mpfi/mpfi-src/src/round_prec.c new file mode 100644 index 00000000000..ebf28df664b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/round_prec.c @@ -0,0 +1,46 @@ +/* round_prec.c -- Change interval's precision with rounding. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* The precision of the interval x is set to prec, */ +/* the previous value of x is kept. */ +int +mpfi_round_prec (mpfi_ptr x, mpfr_prec_t prec) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_round_prec (&(x->left), MPFI_RNDD, prec); + inexact_right = mpfr_round_prec (&(x->right), MPFI_RNDU, prec); + + if ( MPFI_NAN_P(x) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sec.c b/Build/source/libs/mpfi/mpfi-src/src/sec.c new file mode 100644 index 00000000000..eeb7f559998 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sec.c @@ -0,0 +1,136 @@ +/* sec.c -- Secant of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sec (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + mpfr_prec_t prec, prec_left, prec_right; + mpfr_t tmp; + mpz_t z_left, z_right; + mpz_t z, zmod4; + int ql_mod4, qr_mod4; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_INF_P (b)) { + /* the two endpoints are the same infinite */ + if ( mpfr_cmp (&(b->left), &(b->right)) == 0) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return 0; + } + + mpz_init (z_left); + mpz_init (z_right); + mpz_init (z); + + prec_left = mpfi_quadrant (z_left, &(b->left)); + prec_right = mpfi_quadrant (z_right, &(b->right)); + + /* if there is at least one period in b or if b contains a Pi/2 + k*Pi, */ + /* then a = ]-oo, +oo[ */ + mpz_sub (z, z_right, z_left); + if ( (mpz_cmp_ui (z, 2) >= 0) || + (mpz_even_p (z_left) && mpz_odd_p (z_right)) ) { + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + inexact = 0; + } + else { + /* computing precision = maximal precision required to determine the */ + /* relative position of the endpoints of b and of integer multiples of Pi / 2 */ + prec = mpfi_get_prec (a); + if (prec_left > prec) prec = prec_left; + if (prec_right > prec) prec = prec_right; + + mpz_init (zmod4); + + /* qr_mod4 gives the quadrant where the right endpoint of b is */ + /* qr_mod4 = floor (2 b->right / pi) mod 4 */ + mpz_mod_ui (zmod4, z_right, 4); + qr_mod4 = mpz_get_ui (zmod4); + + /* z_left gives the quadrant where the left endpoint of b is */ + /* z_left = floor (2 b->left / pi) mod 4 */ + mpz_mod_ui (zmod4, z_left, 4); + ql_mod4 = mpz_get_ui (zmod4); + + + if (qr_mod4 == ql_mod4) { + if (qr_mod4 == 0 || qr_mod4 == 1) { + /* sec is increasing on b */ + inexact_left = mpfr_sec (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_sec (&(a->right), &(b->right), MPFI_RNDU); + } + else { + /* sec is decreasing on b */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sec (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_sec (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + } + else if (ql_mod4 == 1) { + mpz_add (z, z_left, z_right); + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_left = mpfr_sec (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_sec (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), -1, MPFI_RNDU); + } + else { + mpz_add (z, z_left, z_right); + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_right = mpfr_sec (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_sec (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_ui (&(a->left), +1, MPFI_RNDD); + } + + if (inexact_left) inexact = 1; + if (inexact_right) inexact += 2; + + mpz_clear (zmod4); + } + + mpz_clear (z_left); + mpz_clear (z_right); + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sech.c b/Build/source/libs/mpfi/mpfi-src/src/sech.c new file mode 100644 index 00000000000..5d1d7998d52 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sech.c @@ -0,0 +1,73 @@ +/* sech.c -- Hyperbolic secant of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sech (mpfi_ptr a, mpfi_srcptr b) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if ( MPFI_IS_NONNEG (b) ) { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sech (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_sech (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + } + else if ( MPFI_HAS_ZERO (b) ) { + mpfr_init2 (tmp, mpfr_get_prec (&(b->left))); + mpfr_neg (tmp, &(b->left), MPFI_RNDD); /* exact */ + if (mpfr_cmp (tmp, &(b->right)) > 0) + inexact_left = mpfr_sech (&(a->left), tmp, MPFI_RNDD); + else + inexact_left = mpfr_sech (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpfr_clear (tmp); + } + else { /* b <= 0 */ + inexact_left = mpfr_sech (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_sech (&(a->right), &(b->right), MPFI_RNDU); + } + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set.c b/Build/source/libs/mpfi/mpfi-src/src/set.c new file mode 100644 index 00000000000..74391491f72 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set.c @@ -0,0 +1,65 @@ +/* set.c -- Assignments between intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + inexact_left = mpfr_set (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_set (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_init_set (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_d.c b/Build/source/libs/mpfi/mpfi-src/src/set_d.c new file mode 100644 index 00000000000..178aa6dab45 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_d.c @@ -0,0 +1,78 @@ +/* set_d.c -- Assign a floating-point double to an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_d (mpfi_ptr a, const double b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_set_d (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_d (&(a->right), b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (b == 0.0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_d (mpfi_ptr a, const double b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_d (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set_d (&(a->right), b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (b == 0.0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_flt.c b/Build/source/libs/mpfi/mpfi-src/src/set_flt.c new file mode 100644 index 00000000000..c8fe03b9988 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_flt.c @@ -0,0 +1,79 @@ +/* set_flt.c -- Assign a floating-point single precision (binary32) to an interval. + +Copyright 2018 + AriC project, Inria Rhone-Alpes, France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_flt (mpfi_ptr a, const float b) +{ + int inexact_left, inexact_right, inexact=0; + + /* we convert f to double precision and use mpfr_set_d; + NaN and infinities should be preserved, and all single precision + numbers are exactly representable in the double format, thus the + conversion is always exact */ + inexact_left = mpfr_set_d (&(a->left), (double) b, MPFI_RNDD); + inexact_right = mpfr_set_d (&(a->right), (double) b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (b == 0.0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_flt (mpfi_ptr a, const float b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_d (&(a->left), (double) b, MPFI_RNDD); + inexact_right = mpfr_init_set_d (&(a->right), (double) b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (b == 0.0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_fr.c b/Build/source/libs/mpfi/mpfi-src/src/set_fr.c new file mode 100644 index 00000000000..6597e9c1d9f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_fr.c @@ -0,0 +1,78 @@ +/* set_fr.c -- Assign a floating-point number to an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_fr (mpfi_ptr a, mpfr_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_set (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set (&(a->right), b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (mpfr_zero_p (b)) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_fr (mpfi_ptr a, mpfr_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set (&(a->right), b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (mpfr_zero_p (b)) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_ld.c b/Build/source/libs/mpfi/mpfi-src/src/set_ld.c new file mode 100644 index 00000000000..fd8f2592d43 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_ld.c @@ -0,0 +1,75 @@ +/* set_ld.c -- Assign a floating-point long double to an interval. + +Copyright 2018 + AriC project, Inria Grenoble - Rhone-Alpes, France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_ld (mpfi_ptr a, const long double b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_set_ld (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_ld (&(a->right), b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (b == 0.0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_ld (mpfi_ptr a, const long double b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_ld (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set_ld (&(a->right), b, MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (b == 0.0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_prec.c b/Build/source/libs/mpfi/mpfi-src/src/set_prec.c new file mode 100644 index 00000000000..382e5342f94 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_prec.c @@ -0,0 +1,35 @@ +/* set_prec.c -- Set the interval's precision. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* The precision of the interval x is set to prec, */ +/* the previous value of x is lost. */ +void +mpfi_set_prec (mpfi_ptr x,mpfr_prec_t prec) +{ + mpfr_set_prec (&(x->right),prec); + mpfr_set_prec (&(x->left),prec); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_q.c b/Build/source/libs/mpfi/mpfi-src/src/set_q.c new file mode 100644 index 00000000000..1f01363d5a5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_q.c @@ -0,0 +1,70 @@ +/* set_q.c -- Assign a rational number to an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_q (mpfi_ptr a, mpq_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_set_q (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_q (&(a->right), b, MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_q (mpfi_ptr a, mpq_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_q (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set_q (&(a->right), b, MPFI_RNDU); + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_si.c b/Build/source/libs/mpfi/mpfi-src/src/set_si.c new file mode 100644 index 00000000000..e51dbeb84f5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_si.c @@ -0,0 +1,72 @@ +/* set_si.c -- Assign long int to an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_si (mpfi_ptr a, const long b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_set_si (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), b, MPFI_RNDU); + + if (b == 0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_si (mpfi_ptr a, const long b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_si (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set_si (&(a->right), b, MPFI_RNDU); + + if (b == 0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_str.c b/Build/source/libs/mpfi/mpfi-src/src/set_str.c new file mode 100644 index 00000000000..5bd2ee69e80 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_str.c @@ -0,0 +1,126 @@ +/* set_str.c -- Set an interval to the value of a string. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi_io.h" +#include "mpfi-impl.h" + +int +mpfi_set_str (mpfi_ptr x, const char *s, int base) +{ + const char *cur; + char *end; + + cur = s; + /* read the blanks */ + while (*cur && MPFI_ISSPACE (*cur)) ++cur; + if (*cur == '\0') { + /* Error: blank string */ + return 1; + } + + /* Now *cur is the first non blank character */ + if (*cur == '[') { + ++cur; + + /* read the blanks between '[' and the number itself */ + while (*cur && MPFI_ISSPACE (*cur)) ++cur; + if (*cur == '\0') { + /* Error: no number in string */ + return 1; + } + + mpfr_strtofr (&(x->left), cur, &end, base, MPFI_RNDD); + if (end == cur) { + /* Error: no number in string */ + return 1; + } + cur = end; + + /* Read (possibly) blank characters between the first number and the comma */ + while (*cur && MPFI_ISSPACE (*cur) ) ++cur; + if (*cur == '\0') { + /* Error: only one number in string */ + return 1; + } + + if (*cur != ',') { + /* Error: missing comma */ + return 1; + } + ++cur; + + /* From now on, we are reading the second number */ + + /* read (possibly) blank characters between the comma and the 2nd number */ + while (*cur && MPFI_ISSPACE (*cur)) ++cur; + if (*cur == '\0') { + /* Error: only one number in string */ + return 1; + } + + /* Now *cur is the first character of the 2nd number */ + mpfr_strtofr (&(x->right), cur, &end, base, MPFI_RNDU); + if (end == cur) { + /* Error: only one number in string */ + return 1; + } + cur = end; + + /* Read (possibly) blank characters between the 2nd number and */ + /* closing square bracket */ + while (*cur && MPFI_ISSPACE (*cur)) ++cur; + if (*cur == '\0') { + /* Error: missing closing square bracket */ + return 1; + } + + if (*cur != ']') { + /* Missing closing square bracket */ + return 1; + } + + /* Note that the string may contain any character after the */ + /* closing square bracket: they will be ignored */ + } + else { + /* Only one number to store as an interval */ + /* s[i] is the first non blank character and is not an */ + /* opening square bracket */ + + /* Note that the whole string must be a valid number */ + if (mpfr_set_str (&(x->left), cur, base, MPFI_RNDD)) + return 1; + mpfr_set_str (&(x->right), cur, base, MPFI_RNDU); + } + + return 0; +} + +int +mpfi_init_set_str (mpfi_ptr x, const char *s, int base) +{ + mpfi_init (x); + return (mpfi_set_str (x, s, base)); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_ui.c b/Build/source/libs/mpfi/mpfi-src/src/set_ui.c new file mode 100644 index 00000000000..892424ac297 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_ui.c @@ -0,0 +1,70 @@ +/* set_ui.c -- Assign an unsigned long int to an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_ui (mpfi_ptr a, const unsigned long b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_set_ui (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_ui (&(a->right), b, MPFI_RNDU); + + if (b == 0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_ui (mpfi_ptr a, const unsigned long b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_ui (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set_ui (&(a->right), b, MPFI_RNDU); + + if (b == 0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/set_z.c b/Build/source/libs/mpfi/mpfi-src/src/set_z.c new file mode 100644 index 00000000000..22c4ebd3bad --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/set_z.c @@ -0,0 +1,72 @@ +/* set_z.c -- Assign an integer to an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_set_z (mpfi_ptr a, mpz_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_set_z (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_set_z (&(a->right), b, MPFI_RNDU); + + if (mpz_cmp_ui (b, 0) == 0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} + +/* Combined initialization and assignment */ + +int +mpfi_init_set_z (mpfi_ptr a, mpz_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + + inexact_left = mpfr_init_set_z (&(a->left), b, MPFI_RNDD); + inexact_right = mpfr_init_set_z (&(a->right), b, MPFI_RNDU); + + if (mpz_cmp_ui (b, 0) == 0) { + /* fix signed zero so as to return [+0, -0] */ + mpfr_setsign (&(a->left), &(a->left), 0, MPFI_RNDU); + mpfr_setsign (&(a->right), &(a->right), 1, MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/si_div.c b/Build/source/libs/mpfi/mpfi-src/src/si_div.c new file mode 100644 index 00000000000..0871148d2e5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/si_div.c @@ -0,0 +1,74 @@ +/* si_div.c -- Divide a signed long int by an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_si_div (mpfi_ptr a, const long b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left = 0, inexact_right = 0, inexact = 0; + + if (MPFI_NAN_P (c)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (c)) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else if (b == 0) { + mpfi_set_ui (a, 0); + } + else if (b > 0) { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_si_div (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_si_div (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); + mpfr_clear (tmp); + } + else { + inexact_left = mpfr_si_div (&(a->left), b, &(c->left), MPFI_RNDD); + inexact_right = mpfr_si_div (&(a->right), b, &(c->right), MPFI_RNDU); + } + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/si_sub.c b/Build/source/libs/mpfi/mpfi-src/src/si_sub.c new file mode 100644 index 00000000000..a9592f67b14 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/si_sub.c @@ -0,0 +1,66 @@ +/* si_sub.c -- Subtract an interval from a signed long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_si_sub (mpfi_ptr a, const long b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if (MPFI_IS_ZERO (c)) { + return mpfi_set_si (a, b); + } + else if (b==0) { + return mpfi_neg (a, c); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_si_sub (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_si_sub (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sign.c b/Build/source/libs/mpfi/mpfi-src/src/sign.c new file mode 100644 index 00000000000..bbf6a87bcc8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sign.c @@ -0,0 +1,101 @@ +/* sign.c -- Default testing sign functions. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Customizable sign testing functions */ + +int (*mpfi_is_pos) (mpfi_srcptr) = mpfi_is_pos_default; +int (*mpfi_is_strictly_pos) (mpfi_srcptr) = mpfi_is_strictly_pos_default; +int (*mpfi_is_nonneg) (mpfi_srcptr) = mpfi_is_nonneg_default; +int (*mpfi_is_neg) (mpfi_srcptr) = mpfi_is_neg_default; +int (*mpfi_is_strictly_neg) (mpfi_srcptr) = mpfi_is_strictly_neg_default; +int (*mpfi_is_nonpos) (mpfi_srcptr) = mpfi_is_nonpos_default; +int (*mpfi_is_zero) (mpfi_srcptr) = mpfi_is_zero_default; + + +int +mpfi_is_pos_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return (MPFI_IS_POS (a)); +} + +int +mpfi_is_strictly_pos_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return (MPFI_IS_STRICTLY_POS (a)); +} + +int +mpfi_is_nonneg_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return (MPFI_IS_NONNEG (a)); +} + +int +mpfi_is_neg_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return (MPFI_IS_NEG (a)); +} + +int +mpfi_is_strictly_neg_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return (MPFI_IS_STRICTLY_NEG (a)); +} + +int +mpfi_is_nonpos_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return (MPFI_IS_NONPOS (a)); +} + +int +mpfi_is_zero_default (mpfi_srcptr a) +{ + if ( mpfi_nan_p (a) ) + return 0; + + return((mpfr_sgn (&(a->right)) == 0) && + (mpfr_sgn (&(a->left)) == 0)); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sin.c b/Build/source/libs/mpfi/mpfi-src/src/sin.c new file mode 100644 index 00000000000..dbf2205b71d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sin.c @@ -0,0 +1,209 @@ +/* sin.c -- Sine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sin (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact = 0; + mpfr_prec_t prec, prec_left, prec_right; + mpfr_t tmp; + mpz_t z, zmod4; + mpz_t quad_left, quad_right; + int ql_mod4, qr_mod4; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_INF_P (b)) { + /* the two endpoints are the same infinite */ + if ( mpfr_cmp (&(b->left), &(b->right)) == 0) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + mpfr_set_si (&(a->left), -1, MPFI_RNDD); + mpfr_set_si (&(a->right), 1, MPFI_RNDU); + return 0; + } + + mpz_init (quad_left); + mpz_init (quad_right); + mpz_init (z); + /* quad_left gives the quadrant where the left endpoint of b is */ + /* quad_left = floor (2 b->left / pi) */ + /* idem for quad_right and b->right */ + prec_left = mpfi_quadrant (quad_left, &(b->left)); + prec_right = mpfi_quadrant (quad_right, &(b->right)); + + + /* if there is at least one period in b, then a = [-1, 1] */ + mpz_sub (z, quad_right, quad_left); + if (mpz_cmp_ui (z, 4) >= 0) { + mpfr_set_si (&(a->left), -1, MPFI_RNDD); + mpfr_set_si (&(a->right), 1, MPFI_RNDU); + inexact = 0; + } + else { + /* there is less than one period in b */ + /* let us discuss according to the position (quadrant) of the endpoints of b */ + + /* computing precision = maximal precision required to determine the */ + /* relative position of the endpoints of b and of integer multiples of Pi / 2 */ + prec = mpfi_get_prec (a); + if (prec_left > prec) prec = prec_left; + if (prec_right > prec) prec = prec_right; + + mpz_add (z, quad_left, quad_right); + /* z = quad_right + quad_left */ + + mpz_init (zmod4); + + /* qr_mod4 gives the quadrant where the right endpoint of b is */ + /* qr_mod4 = floor (2 b->right / pi) mod 4 */ + mpz_mod_ui (zmod4, quad_right, 4); + qr_mod4 = mpz_get_ui (zmod4); + + /* quad_left gives the quadrant where the left endpoint of b is */ + /* quad_left = floor (2 b->left / pi) mod 4 */ + mpz_mod_ui (zmod4, quad_left, 4); + ql_mod4 = mpz_get_ui (zmod4); + + + switch (qr_mod4) { + case 0: + switch (ql_mod4) { + case 0: + case 3: + inexact_left = mpfr_sin (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_sin (&(a->right), &(b->right), MPFI_RNDU); + break; + case 1: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->left), &(b->right), prec) >= 0) + inexact_right = mpfr_sin (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_sin (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 2: + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + inexact_right = mpfr_sin (&(a->right), &(b->right), MPFI_RNDU); + break; + } + break; + case 1: + switch (ql_mod4) { + case 0: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_left = mpfr_sin (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_sin (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 1: + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sin (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_sin (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + break; + case 2: + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 3: + inexact_left = mpfr_sin (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + } + break; + case 2: + switch (ql_mod4) { + case 0: + inexact_left = mpfr_sin (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 1: + case 2: + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sin (tmp, &(b->right), MPFI_RNDD); + inexact_right = mpfr_sin (&(a->right), &(b->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + break; + case 3: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->left), &(b->right), prec) >= 0) + inexact_left = mpfr_sin (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_sin (&(a->left), &(b->right), MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + } + break; + case 3: + switch (ql_mod4) { + case 0: + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + inexact_right = mpfr_set_si (&(a->right), 1, MPFI_RNDU); + break; + case 1: + inexact_right = mpfr_sin (&(a->right), &(b->left), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 2: + mpz_add_ui (z, z, 1); + if (mpfi_cmp_sym_pi (z, &(b->right), &(b->left), prec) >= 0) + inexact_right = mpfr_sin (&(a->right), &(b->left), MPFI_RNDU); + else + inexact_right = mpfr_sin (&(a->right), &(b->right), MPFI_RNDU); + inexact_left = mpfr_set_si (&(a->left), -1, MPFI_RNDD); + break; + case 3: + inexact_left = mpfr_sin (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_sin (&(a->right), &(b->right), MPFI_RNDU); + break; + } + break; + } + + if (inexact_left) inexact = 1; + if (inexact_right) inexact += 2; + + mpz_clear (zmod4); + } + + mpz_clear (quad_left); + mpz_clear (quad_right); + mpz_clear (z); + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sinh.c b/Build/source/libs/mpfi/mpfi-src/src/sinh.c new file mode 100644 index 00000000000..398543cd959 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sinh.c @@ -0,0 +1,45 @@ +/* sinh.c -- Hyperbolic sine of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sinh (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_sinh (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_sinh (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sqr.c b/Build/source/libs/mpfi/mpfi-src/src/sqr.c new file mode 100644 index 00000000000..328b1ca813f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sqr.c @@ -0,0 +1,79 @@ +/* sqr.c -- Square of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sqr (mpfi_ptr a, mpfi_srcptr u) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (u) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + if (mpfr_sgn (&(u->left)) >= 0) { + /* u nonnegative */ + inexact_left = mpfr_mul (&(a->left), &(u->left), &(u->left), MPFI_RNDD); + inexact_right = mpfr_mul (&(a->right), &(u->right), &(u->right), MPFI_RNDU); + } + else { + if (mpfr_sgn (&(u->right)) <= 0) { + /* u non-positive -> beware the case where a = u */ + mpfr_init2 (tmp, mpfr_get_prec (&(a->right))); + inexact_right = mpfr_mul (tmp, &(u->left), &(u->left), MPFI_RNDU); + inexact_left = mpfr_mul (&(a->left), &(u->right), &(u->right), MPFI_RNDD); + mpfr_set (&(a->right), tmp, MPFI_RNDU); /* exact */ + mpfr_clear (tmp); + } + else { + /* inf = 0, sup = max of the squares of the endpoints of u */ + if (mpfr_cmp_abs (&(u->left), &(u->right)) <= 0) { + inexact_right = + mpfr_mul (&(a->right), &(u->right), &(u->right), MPFI_RNDU); + } + else { + inexact_right = + mpfr_mul (&(a->right), &(u->left), &(u->left), MPFI_RNDU); + } + inexact_left = mpfr_set_si (&(a->left), (long)0, MPFI_RNDD); + } + } + + /* The NaN case has already been handled */ + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sqrt.c b/Build/source/libs/mpfi/mpfi-src/src/sqrt.c new file mode 100644 index 00000000000..fbfac43391b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sqrt.c @@ -0,0 +1,47 @@ +/* sqrt.c -- Square root of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sqrt (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + /* if b is (partially) negative, the left bound will be a NaN */ + /* it is handled by MPFR */ + inexact_left = mpfr_sqrt (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_sqrt (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub.c b/Build/source/libs/mpfi/mpfi-src/src/sub.c new file mode 100644 index 00000000000..108b672d02b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub.c @@ -0,0 +1,65 @@ +/* sub.c -- Subtract two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if (MPFI_IS_ZERO (c)) { + return mpfi_set (a, b); + } + else if (MPFI_IS_ZERO (b)) { + return mpfi_neg (a, c); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sub (tmp, &(b->left), &(c->right), MPFI_RNDD); + inexact_right = mpfr_sub (&(a->right), &(b->right), &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub_d.c b/Build/source/libs/mpfi/mpfi-src/src/sub_d.c new file mode 100644 index 00000000000..f969e4d049a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub_d.c @@ -0,0 +1,62 @@ +/* sub_d.c -- Subtract a double from an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub_d (mpfi_ptr a, mpfi_srcptr b, const double c) +{ + int inexact_left, inexact_right, inexact = 0; + + if (c==0.0) { + return mpfi_set (a, b); + } + else if (MPFI_IS_ZERO (b)) { + return mpfi_set_d (a, -c); + } + else { + inexact_left = mpfr_sub_d (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_sub_d (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub_fr.c b/Build/source/libs/mpfi/mpfi-src/src/sub_fr.c new file mode 100644 index 00000000000..5a7a78b8b57 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub_fr.c @@ -0,0 +1,63 @@ +/* sub_fr.c -- Subtract a floating-point number from an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub_fr (mpfi_ptr a, mpfi_srcptr b, mpfr_srcptr c) +{ + mpfr_t tmp; + int inexact_left, inexact_right, inexact = 0; + + if (MPFR_IS_ZERO (c)) { + return mpfi_set (a, b); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_sub (tmp, &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_sub (&(a->right), &(b->right), c, MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub_q.c b/Build/source/libs/mpfi/mpfi-src/src/sub_q.c new file mode 100644 index 00000000000..def0de6fcc7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub_q.c @@ -0,0 +1,63 @@ +/* sub_q.c -- Subtract a rational number from an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub_q (mpfi_ptr a, mpfi_srcptr b, mpq_srcptr c) +{ + int inexact_left, inexact_right, inexact = 0; + + if (!mpq_sgn (c)) { + return mpfi_set (a, b); + } + else if (MPFI_IS_ZERO (b)) { + inexact = mpfi_set_q(a, c); + mpfi_neg (a, a); /* exact */ + return inexact; + } + else { + inexact_left = mpfr_sub_q (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_sub_q (&(a->right), &(b->right), c, MPFI_RNDU); + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub_si.c b/Build/source/libs/mpfi/mpfi-src/src/sub_si.c new file mode 100644 index 00000000000..cab102ba69c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub_si.c @@ -0,0 +1,63 @@ +/* sub_si.c -- Subtract a signed long int from an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub_si (mpfi_ptr a, mpfi_srcptr b, const long c) +{ + int inexact_left, inexact_right, inexact = 0; + + if (c==0) { + return mpfi_set (a, b); + } + else if (MPFI_IS_ZERO (b)) { + return mpfi_set_si(a, -c); + } + else { + inexact_left = mpfr_sub_si (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_sub_si (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} + diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub_ui.c b/Build/source/libs/mpfi/mpfi-src/src/sub_ui.c new file mode 100644 index 00000000000..f06de915483 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub_ui.c @@ -0,0 +1,66 @@ +/* sub_ui.c -- Subtract an unsigned long int from an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub_ui (mpfi_ptr a, mpfi_srcptr b, const unsigned long c) +{ + int inexact_left, inexact_right, inexact = 0; + + if (c==0) { + return mpfi_set (a, b); + } + else if (MPFI_IS_ZERO (b)) { + inexact = mpfi_set_ui(a, c); + mpfi_neg (a, a); /* exact */ + if (inexact == 1) inexact = 2; + else if (inexact == 2) inexact = 1; + return inexact; + } + else { + inexact_left = mpfr_sub_ui (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_sub_ui (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/sub_z.c b/Build/source/libs/mpfi/mpfi-src/src/sub_z.c new file mode 100644 index 00000000000..4a852b0fa48 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/sub_z.c @@ -0,0 +1,67 @@ +/* sub_z.c -- Subtract an integer from an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_sub_z (mpfi_ptr a, mpfi_srcptr b, mpz_srcptr c) +{ + int inexact_left, inexact_right, inexact = 0; + + if (!mpz_sgn(c)) { + return mpfi_set (a, b); + } + else if (MPFI_IS_ZERO (b)) { + inexact = mpfi_set_z(a, c); + mpfi_neg (a, a); /* exact */ + if (inexact == 1) inexact = 2; + else if (inexact == 2) inexact = 1; + return inexact; + } + else { + inexact_left = mpfr_sub_z (&(a->left), &(b->left), c, MPFI_RNDD); + inexact_right = mpfr_sub_z (&(a->right), &(b->right), c, MPFI_RNDU); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } + +} + diff --git a/Build/source/libs/mpfi/mpfi-src/src/swap.c b/Build/source/libs/mpfi/mpfi-src/src/swap.c new file mode 100644 index 00000000000..288d89ed7a5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/swap.c @@ -0,0 +1,34 @@ +/* swap.c -- Swap two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Swapping the two arguments */ +void +mpfi_swap (mpfi_ptr a, mpfi_ptr b) +{ + mpfr_swap (&(a->left), &(b->left)); + mpfr_swap (&(a->right), &(b->right)); +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/tan.c b/Build/source/libs/mpfi/mpfi-src/src/tan.c new file mode 100644 index 00000000000..67abf8207ad --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/tan.c @@ -0,0 +1,81 @@ +/* tan.c -- Tangent of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_tan (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + mpz_t z_left, z_right, tmp; + + if (MPFI_NAN_P (b)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_INF_P (b)) { + /* the two endpoints are the same infinite */ + if ( mpfr_cmp (&(b->left), &(b->right)) == 0) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return 0; + } + + mpz_init (z_left); + mpz_init (z_right); + mpz_init (tmp); + + mpfi_quadrant (z_left, &(b->left)); + mpfi_quadrant (z_right, &(b->right)); + + /* if there is at least one period in b or if b contains a Pi/2 + k*Pi, */ + /* then a = ]-oo, +oo[ */ + mpz_sub (tmp, z_right, z_left); + if ( (mpz_cmp_ui (tmp, 2) >= 0) || + (mpz_even_p (z_left) && mpz_odd_p (z_right)) ) { + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + inexact = 0; + } + + else { /* within one period, tan is increasing */ + inexact_left = mpfr_tan (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_tan (&(a->right), &(b->right), MPFI_RNDU); + if (inexact_left) inexact += 1; + if (inexact_right) inexact += 2; + } + + mpz_clear (z_left); + mpz_clear (z_right); + mpz_clear (tmp); + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/tanh.c b/Build/source/libs/mpfi/mpfi-src/src/tanh.c new file mode 100644 index 00000000000..c555652f501 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/tanh.c @@ -0,0 +1,45 @@ +/* tanh.c -- Hyperbolic tangent of an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_tanh (mpfi_ptr a, mpfi_srcptr b) +{ + int inexact_left, inexact_right, inexact=0; + + inexact_left = mpfr_tanh (&(a->left), &(b->left), MPFI_RNDD); + inexact_right = mpfr_tanh (&(a->right), &(b->right), MPFI_RNDU); + + if ( MPFI_NAN_P (a) ) + MPFR_RET_NAN; + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/ui_div.c b/Build/source/libs/mpfi/mpfi-src/src/ui_div.c new file mode 100644 index 00000000000..09d9d78d2b9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/ui_div.c @@ -0,0 +1,70 @@ +/* ui_div.c -- Divide an unsigned long int by an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_ui_div (mpfi_ptr a, const unsigned long b, mpfi_srcptr c) +{ + mpfr_t tmp; + int inexact_left = 0, inexact_right = 0, inexact = 0; + + if (MPFI_NAN_P (c)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (c)) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + } + else if (b == 0) { + mpfi_set_ui (a, 0); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_ui_div (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_ui_div (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); + mpfr_clear (tmp); + } + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/ui_sub.c b/Build/source/libs/mpfi/mpfi-src/src/ui_sub.c new file mode 100644 index 00000000000..962d9389ff3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/ui_sub.c @@ -0,0 +1,65 @@ +/* ui_sub.c -- Subtract an interval from an unsigned long int. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_ui_sub (mpfi_ptr a, const unsigned long b, mpfi_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + mpfr_t tmp; + + if (MPFI_IS_ZERO (c)) { + return (mpfi_set_ui (a, b)); + } + else if (b == 0) { + return (mpfi_neg (a, c)); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_ui_sub (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_ui_sub (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/union.c b/Build/source/libs/mpfi/mpfi-src/src/union.c new file mode 100644 index 00000000000..f1f2f53ea48 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/union.c @@ -0,0 +1,56 @@ +/* union.c -- Union of two intervals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_union (mpfi_ptr a, mpfi_srcptr b, mpfi_srcptr c) +{ + /* Union of two intervals, without gap: convex hull of the union */ + int inexact_left, inexact_right, inexact=0; + + if ( MPFI_NAN_P (b) || MPFI_NAN_P (c) ) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (mpfr_cmp (&(b->left), &(c->left)) <= 0) + inexact_left = mpfr_set (&(a->left), &(b->left), MPFI_RNDD); + else + inexact_left = mpfr_set (&(a->left), &(c->left), MPFI_RNDD); + + if (mpfr_cmp (&(c->right), &(b->right)) <= 0) + inexact_right = mpfr_set (&(a->right), &(b->right), MPFI_RNDU); + else + inexact_right = mpfr_set (&(a->right), &(c->right), MPFI_RNDU); + + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/urandom.c b/Build/source/libs/mpfi/mpfi-src/src/urandom.c new file mode 100644 index 00000000000..b6c2a2c2d5e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/urandom.c @@ -0,0 +1,99 @@ +/* urandom.c -- Random element in the interval, following a uniform distribution on the reals. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2018 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +/* Picks randomly a point m in y */ +void +mpfi_urandom (mpfr_ptr m, mpfi_srcptr y, gmp_randstate_t state) +{ + mpfr_prec_t prec, tmp_prec; + mpfr_t diam, fact; + + + if (MPFI_NAN_P(y)) { + mpfr_set_nan (m); + return; + } + + if (mpfr_equal_p (&(y->left), &(y->right))) { + mpfr_set (m, &(y->left), MPFR_RNDN); + return; + } + + prec = mpfr_get_prec (m); + tmp_prec = mpfi_get_prec(y); + if (tmp_prec > prec) + { + prec = tmp_prec; + } + mpfr_init2 (diam, prec); + mpfr_init2 (fact, prec); + + mpfi_diam_abs (diam, y); + mpfr_urandom (fact, state, MPFR_RNDN); /* fact lies between 0 and 1 */ + + if (mpfr_cmp_ui (diam, 1) <= 0) { + /* the picked point lies at a relative distance "fact" of the left + endpoint: m = inf + (sup - inf) * fact */ + mpfr_mul (fact, fact, diam, MPFR_RNDN); + /* FIXME: because of possible cancelation, the random distribution is + not uniform among the floating-point numbers in y */ + mpfr_add (m, &(y->left), fact, MPFR_RNDN); + } + else { + mpfr_exp_t e; + if (mpfr_cmp_abs (&(y->left), &(y->right)) < 0) { + e = mpfr_inf_p (&(y->right)) ? mpfr_get_emax () + : mpfr_get_exp (&(y->right)); + } + else { + e = mpfr_inf_p (&(y->left)) ? mpfr_get_emax () + : mpfr_get_exp (&(y->left)); + } + e += 1; + /* resize fact in [0, 2^e] where e = 1 + max{exp(left), exp(right)} */ + mpfr_mul_2exp (fact, fact, e, MPFR_RNDN); + mpfr_set (m, &(y->left), MPFR_RNDN); + if (mpfr_inf_p (m)) { + mpfr_nextabove (m); + } + /* m may be outside y */ + mpfr_add (m, m, fact, MPFR_RNDN); + } + mpfr_clear (fact); + mpfr_clear (diam); + + /* Ensure that m belongs to y (if the precision is sufficient) */ + if (mpfr_cmp (m, &(y->left)) <= 0) + mpfr_set (m, &(y->left), MPFR_RNDU); + + if (mpfr_cmp (&(y->right), m) <= 0) + mpfr_set (m, &(y->right), MPFR_RNDD); + + /* the "<=" instead of "<" ensures that the sign of m corresponds to the sign of elements in y, + if one of the endpoints of y is a signed 0, and m is also 0. */ +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/z_div.c b/Build/source/libs/mpfi/mpfi-src/src/z_div.c new file mode 100644 index 00000000000..9a2962cb551 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/z_div.c @@ -0,0 +1,74 @@ +/* z_div.c -- Divide an integer by an interval. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" + +int +mpfi_z_div (mpfi_ptr a, mpz_srcptr b, mpfi_srcptr c) +{ + mpfi_t tmp; + int inexact_set, inexact_div, inexact = 0; + + if (MPFI_NAN_P (c)) { + mpfr_set_nan (&(a->left)); + mpfr_set_nan (&(a->right)); + MPFR_RET_NAN; + } + + if (MPFI_HAS_ZERO (c)) { /* a = ]-oo, +oo [ */ + mpfr_set_inf (&(a->left), -1); + mpfr_set_inf (&(a->right), 1); + return inexact; + } + + if (mpz_sgn (b) == 0) { /* a = [-0, +0] */ + mpfi_set_ui (a, 0); + return inexact; + } + + mpfi_init2 (tmp, mpfi_get_prec (a)); + inexact_set = mpfi_set_z (tmp, b); + inexact_div = mpfi_div (a, tmp, c); + MPFI_CLEAR (tmp); + + if (MPFI_LEFT_IS_INEXACT (inexact_div) + || (inexact_set && !mpfr_inf_p (&a->left) && !mpfr_zero_p (&a->left))) { + /* the first condition MPFI_LEFT_IS_INEXACT (inexact_div) handles, among + others, overflow and underflow cases. + if a->left = infinity in non-overflow case, then a->left is the + quotient of b with a zero endpoint of c, thus it is exact even if tmp + is not exact. + if a->left = 0 in non-underflow case, then either a->left is the + quotient of b with an infinite endpoint of c, or b is zero, thus + a->left is exact. */ + inexact += 1; + } + if (MPFI_RIGHT_IS_INEXACT (inexact_div) + ||(inexact_set && !mpfr_inf_p (&a->right) && !mpfr_zero_p (&a->right))){ + inexact += 2; + } + + return inexact; +} diff --git a/Build/source/libs/mpfi/mpfi-src/src/z_sub.c b/Build/source/libs/mpfi/mpfi-src/src/z_sub.c new file mode 100644 index 00000000000..79be969720e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/src/z_sub.c @@ -0,0 +1,82 @@ +/* z_sub.c -- Subtract an interval from an integer. + +Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-impl.h" +#include "mpfi_config.h" + +#ifndef HAVE_MPFR_Z_SUB +static int +mpfr_z_sub (mpfr_ptr x, mpz_srcptr z, mpfr_srcptr y, mpfr_rnd_t rnd) +{ + /* mpfr_z_sub does not exist (at least up to version 3.0) */ + + /* Here we use the fact that x and y do not point to the same variable */ + int inex; + + inex = mpfr_sub_z (x, y, z, rnd == MPFI_RNDD ? MPFI_RNDU : MPFI_RNDD); + mpfr_neg (x, x, MPFI_RNDD); + + return -inex; +} +#endif /* HAVE_MPFR_Z_SUB */ + +int +mpfi_z_sub (mpfi_ptr a, mpz_srcptr b, mpfi_srcptr c) +{ + int inexact_left, inexact_right, inexact=0; + mpfr_t tmp; + + if (MPFI_IS_ZERO (c)) { + return (mpfi_set_z (a, b)); + } + else if (!mpz_sgn(b)) { + return (mpfi_neg (a, c)); + } + else { + mpfr_init2 (tmp, mpfr_get_prec (&(a->left))); + inexact_left = mpfr_z_sub (tmp, b, &(c->right), MPFI_RNDD); + inexact_right = mpfr_z_sub (&(a->right), b, &(c->left), MPFI_RNDU); + mpfr_set (&(a->left), tmp, MPFI_RNDD); /* exact */ + mpfr_clear (tmp); + + /* do not allow -0 as lower bound */ + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) { + mpfr_neg (&(a->left), &(a->left), MPFI_RNDU); + } + /* do not allow +0 as upper bound */ + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) { + mpfr_neg (&(a->right), &(a->right), MPFI_RNDD); + } + + if (MPFI_NAN_P (a)) + MPFR_RET_NAN; + if (inexact_left) + inexact += 1; + if (inexact_right) + inexact += 2; + + return inexact; + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/Makefile.am b/Build/source/libs/mpfi/mpfi-src/tests/Makefile.am new file mode 100644 index 00000000000..1513b1140e9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/Makefile.am @@ -0,0 +1,119 @@ +LDADD = libmpfi-tests.la $(top_builddir)/src/.libs/libmpfi.la +AM_CPPFLAGS = -I$(top_srcdir)/src + +check_LTLIBRARIES = libmpfi-tests.la +libmpfi_tests_la_SOURCES = mpfi-tests.h read_data.c random.c \ + type_i.c type_ii.c type_iii.c type_iiii.c type_iu.c type_is.c \ + type_id.c type_if.c type_il.c type_iz.c type_iq.c type_ir.c type_iiu.c \ + type_iis.c type_iid.c type_iiz.c type_iiq.c type_iir.c \ + type_iui.c type_isi.c type_idi.c type_izi.c type_iqi.c \ + type_iri.c type_ri.c check_data.c mpfi-tests.c + +# type_iri.c type_js.c type_ju.c type_ri.c check_data.c mpfi-tests.c + +#check_PROGRAMS = tabs tacos tacosh tadd tadd_d tadd_fr \ +# tadd_q tadd_si tadd_ui tadd_z tasin tasinh tatan tatan2 \ +# tatanh tbisect tblow tbounded_p tcbrt tcmp tcmp_d \ +# tcmp_fr tcmp_q tcmp_si tcmp_ui tcmp_z tconst_catalan \ +# tconst_euler tconst_log2 tconst_pi tcos tcosh tcot tcoth \ +# tcsc tcsch td_div td_sub tdiam tdiam_abs tdiam_rel tdiv \ +# tdiv_2exp tdiv_2si tdiv_2ui tdiv_d tdiv_ext tdiv_fr tdiv_q \ +# tdiv_si tdiv_ui tdiv_z terror texp texp2 texp10 texpm1 texp2m1 texp10m1 tfr_div \ +# tfr_sub tget_d tget_endpoints tget_fr thas_zero thypot \ +# tincrease tinf_p tinit tinits tinit_set tintersect tinterv_d \ +# tinterv_fr tinterv_q tinterv_si tinterv_ui tinterv_z \ +# tinv tio_str tis_empty tis_inside tis_inside_d \ +# tis_inside_fr tis_inside_q tis_inside_si tis_inside_ui \ +# tis_inside_z tis_neg tis_nonneg tis_nonpos tis_pos \ +# tis_strictly_inside tis_strictly_neg tis_strictly_pos \ +# tis_zero tlog tlog10 tlog1p tlog2 tmag tmid tmig tmul \ +# tmul_2exp tmul_2si tmul_2ui tmul_d tmul_fr tmul_q \ +# tmul_si tmul_ui tmul_z tnan_p tneg tput_d tput_fr tput_q \ +# tput_si tput_ui tput_z tq_div tq_sub trec_sqrt tround_prec tsec \ +# tsech tset tset_d tset_flt tset_fr tset_ld tset_q tset_si tset_sj tset_str \ +# tset_ui tset_uj tset_z tsi_div tsi_sub tsin tsinh tsqr tsqrt\ +# tsub tsub_d tsub_fr tsub_q tsub_si tsub_ui tsub_z tswap \ +# ttan ttanh tui_div tui_sub tunion tz_div tz_sub \ +# tget_version + +check_PROGRAMS = tabs tacos tacosh tadd tadd_d tadd_fr \ + tadd_q tadd_si tadd_ui tadd_z tasin tasinh tatan tatan2 \ + tatanh tbisect tblow tbounded_p tcbrt tcmp tcmp_d \ + tcmp_fr tcmp_q tcmp_si tcmp_ui tcmp_z tconst_catalan \ + tconst_euler tconst_log2 tconst_pi tcos tcosh tcot tcoth \ + tcsc tcsch td_div td_sub tdiam tdiam_abs tdiam_rel tdiv \ + tdiv_2exp tdiv_2si tdiv_2ui tdiv_d tdiv_ext tdiv_fr tdiv_q \ + tdiv_si tdiv_ui tdiv_z terror texp texp2 texp10 texpm1 texp2m1 texp10m1 tfr_div \ + tfr_sub tget_d tget_endpoints tget_fr thas_zero thypot \ + tincrease tinf_p tinit tinits tinit_set tintersect tinterv_d \ + tinterv_fr tinterv_q tinterv_si tinterv_ui tinterv_z \ + tinv tio_str tis_empty tis_inside tis_inside_d \ + tis_inside_fr tis_inside_q tis_inside_si tis_inside_ui \ + tis_inside_z tis_neg tis_nonneg tis_nonpos tis_pos \ + tis_strictly_inside tis_strictly_neg tis_strictly_pos \ + tis_zero tlog tlog10 tlog1p tlog2 tmag tmid tmig tmul \ + tmul_2exp tmul_2si tmul_2ui tmul_d tmul_fr tmul_q \ + tmul_si tmul_ui tmul_z tnan_p tneg tput_d tput_fr tput_q \ + tput_si tput_ui tput_z tq_div tq_sub trec_sqrt tround_prec \ + tsec tsech tset tset_d tset_flt tset_fr tset_ld tset_q \ + tset_si tset_str tset_ui tset_z tsi_div tsi_sub tsin tsinh \ + tsqr tsqrt \ + tsub tsub_d tsub_fr tsub_q tsub_si tsub_ui tsub_z tswap \ + ttan ttanh tui_div tui_sub tunion tz_div tz_sub \ + tget_version + +#EXTRA_DIST = abs.dat acos.dat acosh.dat add.dat add_d.dat \ +# add_fr.dat add_q.dat add_si.dat add_ui.dat add_z.dat \ +# asin.dat asinh.dat atan.dat atan2.dat atanh.dat \ +# bisect.dat blow.dat bounded_p.dat cbrt.dat \ +# const_catalan.dat const_euler.dat const_log2.dat \ +# const_pi.dat cos.dat cosh.dat cot.dat coth.dat csc.dat \ +# csch.dat d_div.dat d_sub.dat diam.dat diam_abs.dat \ +# diam_rel.dat div.dat div_2si.dat div_2ui.dat div_d.dat \ +# div_ext.dat div_fr.dat div_q.dat div_si.dat div_ui.dat div_z.dat \ +# exp.dat exp2.dat expm1.dat exp2m1.dat fr_div.dat fr_sub.dat \ +# has_zero.dat hypot.dat increase.dat inf_p.dat \ +# inp_str.dat intersect.dat inv.dat is_neg.dat \ +# is_nonneg.dat is_nonpos.dat is_pos.dat \ +# is_strictly_neg.dat is_strictly_pos.dat log.dat \ +# log10.dat log1p.dat log2.dat mag.dat mid.dat mig.dat \ +# mul.dat mul_2si.dat mul_2ui.dat mul_d.dat mul_fr.dat \ +# mul_q.dat mul_si.dat mul_ui.dat mul_z.dat nan_p.dat \ +# neg.dat put_d.dat put_fr.dat put_q.dat put_si.dat \ +# put_ui.dat put_z.dat q_div.dat q_sub.dat rec_sqrt.dat sec.dat \ +# sech.dat set_d.dat set_flt.dat set_fr.dat set_ld.dat set_q.dat set_si.dat set_sj.dat\ +# set_ui.dat set_uj.dat set_z.dat si_div.dat si_sub.dat sin.dat\ +# sinh.dat sqr.dat sqrt.dat sub.dat sub_d.dat sub_fr.dat \ +# sub_q.dat sub_si.dat sub_ui.dat sub_z.dat tan.dat \ +# tanh.dat ui_div.dat ui_sub.dat union.dat z_div.dat \ +# z_sub.dat + +EXTRA_DIST = abs.dat acos.dat acosh.dat add.dat add_d.dat \ + add_fr.dat add_q.dat add_si.dat add_ui.dat add_z.dat \ + asin.dat asinh.dat atan.dat atan2.dat atanh.dat \ + bisect.dat blow.dat bounded_p.dat cbrt.dat \ + const_catalan.dat const_euler.dat const_log2.dat \ + const_pi.dat cos.dat cosh.dat cot.dat coth.dat csc.dat \ + csch.dat d_div.dat d_sub.dat diam.dat diam_abs.dat \ + diam_rel.dat div.dat div_2si.dat div_2ui.dat div_d.dat \ + div_ext.dat div_fr.dat div_q.dat div_si.dat div_ui.dat div_z.dat \ + exp.dat exp2.dat expm1.dat exp2m1.dat exp10m1.dat fr_div.dat fr_sub.dat \ + has_zero.dat hypot.dat increase.dat inf_p.dat \ + inp_str.dat intersect.dat inv.dat is_neg.dat \ + is_nonneg.dat is_nonpos.dat is_pos.dat \ + is_strictly_neg.dat is_strictly_pos.dat log.dat \ + log10.dat log1p.dat log2.dat mag.dat mid.dat mig.dat \ + mul.dat mul_2si.dat mul_2ui.dat mul_d.dat mul_fr.dat \ + mul_q.dat mul_si.dat mul_ui.dat mul_z.dat nan_p.dat \ + neg.dat put_d.dat put_fr.dat put_q.dat put_si.dat \ + put_ui.dat put_z.dat q_div.dat q_sub.dat rec_sqrt.dat \ + sec.dat sech.dat set_d.dat set_flt.dat set_fr.dat set_ld.dat \ + set_q.dat set_si.dat \ + set_ui.dat set_z.dat si_div.dat si_sub.dat sin.dat \ + sinh.dat sqr.dat sqrt.dat sub.dat sub_d.dat sub_fr.dat \ + sub_q.dat sub_si.dat sub_ui.dat sub_z.dat tan.dat \ + tanh.dat ui_div.dat ui_sub.dat union.dat z_div.dat \ + z_sub.dat + +TESTS = $(check_PROGRAMS) +CLEANFILES = io_str.tmp diff --git a/Build/source/libs/mpfi/mpfi-src/tests/Makefile.in b/Build/source/libs/mpfi/mpfi-src/tests/Makefile.in new file mode 100644 index 00000000000..ab907212076 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/Makefile.in @@ -0,0 +1,4336 @@ +# Makefile.in generated by automake 1.16.5 from Makefile.am. +# @configure_input@ + +# Copyright (C) 1994-2021 Free Software Foundation, Inc. + +# This Makefile.in is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +@SET_MAKE@ +VPATH = @srcdir@ +am__is_gnu_make = { \ + if test -z '$(MAKELEVEL)'; then \ + false; \ + elif test -n '$(MAKE_HOST)'; then \ + true; \ + elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \ + true; \ + else \ + false; \ + fi; \ +} +am__make_running_with_option = \ + case $${target_option-} in \ + ?) ;; \ + *) echo "am__make_running_with_option: internal error: invalid" \ + "target option '$${target_option-}' specified" >&2; \ + exit 1;; \ + esac; \ + has_opt=no; \ + sane_makeflags=$$MAKEFLAGS; \ + if $(am__is_gnu_make); then \ + sane_makeflags=$$MFLAGS; \ + else \ + case $$MAKEFLAGS in \ + *\\[\ \ ]*) \ + bs=\\; \ + sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \ + | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \ + esac; \ + fi; \ + skip_next=no; \ + strip_trailopt () \ + { \ + flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \ + }; \ + for flg in $$sane_makeflags; do \ + test $$skip_next = yes && { skip_next=no; continue; }; \ + case $$flg in \ + *=*|--*) continue;; \ + -*I) strip_trailopt 'I'; skip_next=yes;; \ + -*I?*) strip_trailopt 'I';; \ + -*O) strip_trailopt 'O'; skip_next=yes;; \ + -*O?*) strip_trailopt 'O';; \ + -*l) strip_trailopt 'l'; skip_next=yes;; \ + -*l?*) strip_trailopt 'l';; \ + -[dEDm]) skip_next=yes;; \ + -[JT]) skip_next=yes;; \ + esac; \ + case $$flg in \ + *$$target_option*) has_opt=yes; break;; \ + esac; \ + done; \ + test $$has_opt = yes +am__make_dryrun = (target_option=n; $(am__make_running_with_option)) +am__make_keepgoing = (target_option=k; $(am__make_running_with_option)) +pkgdatadir = $(datadir)/@PACKAGE@ +pkgincludedir = $(includedir)/@PACKAGE@ +pkglibdir = $(libdir)/@PACKAGE@ +pkglibexecdir = $(libexecdir)/@PACKAGE@ +am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd +install_sh_DATA = $(install_sh) -c -m 644 +install_sh_PROGRAM = $(install_sh) -c +install_sh_SCRIPT = $(install_sh) -c +INSTALL_HEADER = $(INSTALL_DATA) +transform = $(program_transform_name) +NORMAL_INSTALL = : +PRE_INSTALL = : +POST_INSTALL = : +NORMAL_UNINSTALL = : +PRE_UNINSTALL = : +POST_UNINSTALL = : +build_triplet = @build@ +host_triplet = @host@ +check_PROGRAMS = tabs$(EXEEXT) tacos$(EXEEXT) tacosh$(EXEEXT) \ + tadd$(EXEEXT) tadd_d$(EXEEXT) tadd_fr$(EXEEXT) tadd_q$(EXEEXT) \ + tadd_si$(EXEEXT) tadd_ui$(EXEEXT) tadd_z$(EXEEXT) \ + tasin$(EXEEXT) tasinh$(EXEEXT) tatan$(EXEEXT) tatan2$(EXEEXT) \ + tatanh$(EXEEXT) tbisect$(EXEEXT) tblow$(EXEEXT) \ + tbounded_p$(EXEEXT) tcbrt$(EXEEXT) tcmp$(EXEEXT) \ + tcmp_d$(EXEEXT) tcmp_fr$(EXEEXT) tcmp_q$(EXEEXT) \ + tcmp_si$(EXEEXT) tcmp_ui$(EXEEXT) tcmp_z$(EXEEXT) \ + tconst_catalan$(EXEEXT) tconst_euler$(EXEEXT) \ + tconst_log2$(EXEEXT) tconst_pi$(EXEEXT) tcos$(EXEEXT) \ + tcosh$(EXEEXT) tcot$(EXEEXT) tcoth$(EXEEXT) tcsc$(EXEEXT) \ + tcsch$(EXEEXT) td_div$(EXEEXT) td_sub$(EXEEXT) tdiam$(EXEEXT) \ + tdiam_abs$(EXEEXT) tdiam_rel$(EXEEXT) tdiv$(EXEEXT) \ + tdiv_2exp$(EXEEXT) tdiv_2si$(EXEEXT) tdiv_2ui$(EXEEXT) \ + tdiv_d$(EXEEXT) tdiv_ext$(EXEEXT) tdiv_fr$(EXEEXT) \ + tdiv_q$(EXEEXT) tdiv_si$(EXEEXT) tdiv_ui$(EXEEXT) \ + tdiv_z$(EXEEXT) terror$(EXEEXT) texp$(EXEEXT) texp2$(EXEEXT) \ + texp10$(EXEEXT) texpm1$(EXEEXT) texp2m1$(EXEEXT) \ + texp10m1$(EXEEXT) tfr_div$(EXEEXT) tfr_sub$(EXEEXT) \ + tget_d$(EXEEXT) tget_endpoints$(EXEEXT) tget_fr$(EXEEXT) \ + thas_zero$(EXEEXT) thypot$(EXEEXT) tincrease$(EXEEXT) \ + tinf_p$(EXEEXT) tinit$(EXEEXT) tinits$(EXEEXT) \ + tinit_set$(EXEEXT) tintersect$(EXEEXT) tinterv_d$(EXEEXT) \ + tinterv_fr$(EXEEXT) tinterv_q$(EXEEXT) tinterv_si$(EXEEXT) \ + tinterv_ui$(EXEEXT) tinterv_z$(EXEEXT) tinv$(EXEEXT) \ + tio_str$(EXEEXT) tis_empty$(EXEEXT) tis_inside$(EXEEXT) \ + tis_inside_d$(EXEEXT) tis_inside_fr$(EXEEXT) \ + tis_inside_q$(EXEEXT) tis_inside_si$(EXEEXT) \ + tis_inside_ui$(EXEEXT) tis_inside_z$(EXEEXT) tis_neg$(EXEEXT) \ + tis_nonneg$(EXEEXT) tis_nonpos$(EXEEXT) tis_pos$(EXEEXT) \ + tis_strictly_inside$(EXEEXT) tis_strictly_neg$(EXEEXT) \ + tis_strictly_pos$(EXEEXT) tis_zero$(EXEEXT) tlog$(EXEEXT) \ + tlog10$(EXEEXT) tlog1p$(EXEEXT) tlog2$(EXEEXT) tmag$(EXEEXT) \ + tmid$(EXEEXT) tmig$(EXEEXT) tmul$(EXEEXT) tmul_2exp$(EXEEXT) \ + tmul_2si$(EXEEXT) tmul_2ui$(EXEEXT) tmul_d$(EXEEXT) \ + tmul_fr$(EXEEXT) tmul_q$(EXEEXT) tmul_si$(EXEEXT) \ + tmul_ui$(EXEEXT) tmul_z$(EXEEXT) tnan_p$(EXEEXT) tneg$(EXEEXT) \ + tput_d$(EXEEXT) tput_fr$(EXEEXT) tput_q$(EXEEXT) \ + tput_si$(EXEEXT) tput_ui$(EXEEXT) tput_z$(EXEEXT) \ + tq_div$(EXEEXT) tq_sub$(EXEEXT) trec_sqrt$(EXEEXT) \ + tround_prec$(EXEEXT) tsec$(EXEEXT) tsech$(EXEEXT) \ + tset$(EXEEXT) tset_d$(EXEEXT) tset_flt$(EXEEXT) \ + tset_fr$(EXEEXT) tset_ld$(EXEEXT) tset_q$(EXEEXT) \ + tset_si$(EXEEXT) tset_str$(EXEEXT) tset_ui$(EXEEXT) \ + tset_z$(EXEEXT) tsi_div$(EXEEXT) tsi_sub$(EXEEXT) \ + tsin$(EXEEXT) tsinh$(EXEEXT) tsqr$(EXEEXT) tsqrt$(EXEEXT) \ + tsub$(EXEEXT) tsub_d$(EXEEXT) tsub_fr$(EXEEXT) tsub_q$(EXEEXT) \ + tsub_si$(EXEEXT) tsub_ui$(EXEEXT) tsub_z$(EXEEXT) \ + tswap$(EXEEXT) ttan$(EXEEXT) ttanh$(EXEEXT) tui_div$(EXEEXT) \ + tui_sub$(EXEEXT) tunion$(EXEEXT) tz_div$(EXEEXT) \ + tz_sub$(EXEEXT) tget_version$(EXEEXT) +subdir = tests +ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 +am__aclocal_m4_deps = $(top_srcdir)/configure.ac +am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ + $(ACLOCAL_M4) +DIST_COMMON = $(srcdir)/Makefile.am $(am__DIST_COMMON) +mkinstalldirs = $(install_sh) -d +CONFIG_HEADER = $(top_builddir)/mpfi_config.h +CONFIG_CLEAN_FILES = +CONFIG_CLEAN_VPATH_FILES = +libmpfi_tests_la_LIBADD = +am_libmpfi_tests_la_OBJECTS = read_data.lo random.lo type_i.lo \ + type_ii.lo type_iii.lo type_iiii.lo type_iu.lo type_is.lo \ + type_id.lo type_if.lo type_il.lo type_iz.lo type_iq.lo \ + type_ir.lo type_iiu.lo type_iis.lo type_iid.lo type_iiz.lo \ + type_iiq.lo type_iir.lo type_iui.lo type_isi.lo type_idi.lo \ + type_izi.lo type_iqi.lo type_iri.lo type_ri.lo check_data.lo \ + mpfi-tests.lo +libmpfi_tests_la_OBJECTS = $(am_libmpfi_tests_la_OBJECTS) +AM_V_lt = $(am__v_lt_@AM_V@) +am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@) +am__v_lt_0 = --silent +am__v_lt_1 = +tabs_SOURCES = tabs.c +tabs_OBJECTS = tabs.$(OBJEXT) +tabs_LDADD = $(LDADD) +tabs_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tacos_SOURCES = tacos.c +tacos_OBJECTS = tacos.$(OBJEXT) +tacos_LDADD = $(LDADD) +tacos_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tacosh_SOURCES = tacosh.c +tacosh_OBJECTS = tacosh.$(OBJEXT) +tacosh_LDADD = $(LDADD) +tacosh_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_SOURCES = tadd.c +tadd_OBJECTS = tadd.$(OBJEXT) +tadd_LDADD = $(LDADD) +tadd_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_d_SOURCES = tadd_d.c +tadd_d_OBJECTS = tadd_d.$(OBJEXT) +tadd_d_LDADD = $(LDADD) +tadd_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_fr_SOURCES = tadd_fr.c +tadd_fr_OBJECTS = tadd_fr.$(OBJEXT) +tadd_fr_LDADD = $(LDADD) +tadd_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_q_SOURCES = tadd_q.c +tadd_q_OBJECTS = tadd_q.$(OBJEXT) +tadd_q_LDADD = $(LDADD) +tadd_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_si_SOURCES = tadd_si.c +tadd_si_OBJECTS = tadd_si.$(OBJEXT) +tadd_si_LDADD = $(LDADD) +tadd_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_ui_SOURCES = tadd_ui.c +tadd_ui_OBJECTS = tadd_ui.$(OBJEXT) +tadd_ui_LDADD = $(LDADD) +tadd_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tadd_z_SOURCES = tadd_z.c +tadd_z_OBJECTS = tadd_z.$(OBJEXT) +tadd_z_LDADD = $(LDADD) +tadd_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tasin_SOURCES = tasin.c +tasin_OBJECTS = tasin.$(OBJEXT) +tasin_LDADD = $(LDADD) +tasin_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tasinh_SOURCES = tasinh.c +tasinh_OBJECTS = tasinh.$(OBJEXT) +tasinh_LDADD = $(LDADD) +tasinh_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tatan_SOURCES = tatan.c +tatan_OBJECTS = tatan.$(OBJEXT) +tatan_LDADD = $(LDADD) +tatan_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tatan2_SOURCES = tatan2.c +tatan2_OBJECTS = tatan2.$(OBJEXT) +tatan2_LDADD = $(LDADD) +tatan2_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tatanh_SOURCES = tatanh.c +tatanh_OBJECTS = tatanh.$(OBJEXT) +tatanh_LDADD = $(LDADD) +tatanh_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tbisect_SOURCES = tbisect.c +tbisect_OBJECTS = tbisect.$(OBJEXT) +tbisect_LDADD = $(LDADD) +tbisect_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tblow_SOURCES = tblow.c +tblow_OBJECTS = tblow.$(OBJEXT) +tblow_LDADD = $(LDADD) +tblow_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tbounded_p_SOURCES = tbounded_p.c +tbounded_p_OBJECTS = tbounded_p.$(OBJEXT) +tbounded_p_LDADD = $(LDADD) +tbounded_p_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcbrt_SOURCES = tcbrt.c +tcbrt_OBJECTS = tcbrt.$(OBJEXT) +tcbrt_LDADD = $(LDADD) +tcbrt_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_SOURCES = tcmp.c +tcmp_OBJECTS = tcmp.$(OBJEXT) +tcmp_LDADD = $(LDADD) +tcmp_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_d_SOURCES = tcmp_d.c +tcmp_d_OBJECTS = tcmp_d.$(OBJEXT) +tcmp_d_LDADD = $(LDADD) +tcmp_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_fr_SOURCES = tcmp_fr.c +tcmp_fr_OBJECTS = tcmp_fr.$(OBJEXT) +tcmp_fr_LDADD = $(LDADD) +tcmp_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_q_SOURCES = tcmp_q.c +tcmp_q_OBJECTS = tcmp_q.$(OBJEXT) +tcmp_q_LDADD = $(LDADD) +tcmp_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_si_SOURCES = tcmp_si.c +tcmp_si_OBJECTS = tcmp_si.$(OBJEXT) +tcmp_si_LDADD = $(LDADD) +tcmp_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_ui_SOURCES = tcmp_ui.c +tcmp_ui_OBJECTS = tcmp_ui.$(OBJEXT) +tcmp_ui_LDADD = $(LDADD) +tcmp_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcmp_z_SOURCES = tcmp_z.c +tcmp_z_OBJECTS = tcmp_z.$(OBJEXT) +tcmp_z_LDADD = $(LDADD) +tcmp_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tconst_catalan_SOURCES = tconst_catalan.c +tconst_catalan_OBJECTS = tconst_catalan.$(OBJEXT) +tconst_catalan_LDADD = $(LDADD) +tconst_catalan_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tconst_euler_SOURCES = tconst_euler.c +tconst_euler_OBJECTS = tconst_euler.$(OBJEXT) +tconst_euler_LDADD = $(LDADD) +tconst_euler_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tconst_log2_SOURCES = tconst_log2.c +tconst_log2_OBJECTS = tconst_log2.$(OBJEXT) +tconst_log2_LDADD = $(LDADD) +tconst_log2_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tconst_pi_SOURCES = tconst_pi.c +tconst_pi_OBJECTS = tconst_pi.$(OBJEXT) +tconst_pi_LDADD = $(LDADD) +tconst_pi_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcos_SOURCES = tcos.c +tcos_OBJECTS = tcos.$(OBJEXT) +tcos_LDADD = $(LDADD) +tcos_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcosh_SOURCES = tcosh.c +tcosh_OBJECTS = tcosh.$(OBJEXT) +tcosh_LDADD = $(LDADD) +tcosh_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcot_SOURCES = tcot.c +tcot_OBJECTS = tcot.$(OBJEXT) +tcot_LDADD = $(LDADD) +tcot_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcoth_SOURCES = tcoth.c +tcoth_OBJECTS = tcoth.$(OBJEXT) +tcoth_LDADD = $(LDADD) +tcoth_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcsc_SOURCES = tcsc.c +tcsc_OBJECTS = tcsc.$(OBJEXT) +tcsc_LDADD = $(LDADD) +tcsc_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tcsch_SOURCES = tcsch.c +tcsch_OBJECTS = tcsch.$(OBJEXT) +tcsch_LDADD = $(LDADD) +tcsch_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +td_div_SOURCES = td_div.c +td_div_OBJECTS = td_div.$(OBJEXT) +td_div_LDADD = $(LDADD) +td_div_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +td_sub_SOURCES = td_sub.c +td_sub_OBJECTS = td_sub.$(OBJEXT) +td_sub_LDADD = $(LDADD) +td_sub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiam_SOURCES = tdiam.c +tdiam_OBJECTS = tdiam.$(OBJEXT) +tdiam_LDADD = $(LDADD) +tdiam_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiam_abs_SOURCES = tdiam_abs.c +tdiam_abs_OBJECTS = tdiam_abs.$(OBJEXT) +tdiam_abs_LDADD = $(LDADD) +tdiam_abs_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiam_rel_SOURCES = tdiam_rel.c +tdiam_rel_OBJECTS = tdiam_rel.$(OBJEXT) +tdiam_rel_LDADD = $(LDADD) +tdiam_rel_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_SOURCES = tdiv.c +tdiv_OBJECTS = tdiv.$(OBJEXT) +tdiv_LDADD = $(LDADD) +tdiv_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_2exp_SOURCES = tdiv_2exp.c +tdiv_2exp_OBJECTS = tdiv_2exp.$(OBJEXT) +tdiv_2exp_LDADD = $(LDADD) +tdiv_2exp_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_2si_SOURCES = tdiv_2si.c +tdiv_2si_OBJECTS = tdiv_2si.$(OBJEXT) +tdiv_2si_LDADD = $(LDADD) +tdiv_2si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_2ui_SOURCES = tdiv_2ui.c +tdiv_2ui_OBJECTS = tdiv_2ui.$(OBJEXT) +tdiv_2ui_LDADD = $(LDADD) +tdiv_2ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_d_SOURCES = tdiv_d.c +tdiv_d_OBJECTS = tdiv_d.$(OBJEXT) +tdiv_d_LDADD = $(LDADD) +tdiv_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_ext_SOURCES = tdiv_ext.c +tdiv_ext_OBJECTS = tdiv_ext.$(OBJEXT) +tdiv_ext_LDADD = $(LDADD) +tdiv_ext_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_fr_SOURCES = tdiv_fr.c +tdiv_fr_OBJECTS = tdiv_fr.$(OBJEXT) +tdiv_fr_LDADD = $(LDADD) +tdiv_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_q_SOURCES = tdiv_q.c +tdiv_q_OBJECTS = tdiv_q.$(OBJEXT) +tdiv_q_LDADD = $(LDADD) +tdiv_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_si_SOURCES = tdiv_si.c +tdiv_si_OBJECTS = tdiv_si.$(OBJEXT) +tdiv_si_LDADD = $(LDADD) +tdiv_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_ui_SOURCES = tdiv_ui.c +tdiv_ui_OBJECTS = tdiv_ui.$(OBJEXT) +tdiv_ui_LDADD = $(LDADD) +tdiv_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tdiv_z_SOURCES = tdiv_z.c +tdiv_z_OBJECTS = tdiv_z.$(OBJEXT) +tdiv_z_LDADD = $(LDADD) +tdiv_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +terror_SOURCES = terror.c +terror_OBJECTS = terror.$(OBJEXT) +terror_LDADD = $(LDADD) +terror_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +texp_SOURCES = texp.c +texp_OBJECTS = texp.$(OBJEXT) +texp_LDADD = $(LDADD) +texp_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +texp10_SOURCES = texp10.c +texp10_OBJECTS = texp10.$(OBJEXT) +texp10_LDADD = $(LDADD) +texp10_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +texp10m1_SOURCES = texp10m1.c +texp10m1_OBJECTS = texp10m1.$(OBJEXT) +texp10m1_LDADD = $(LDADD) +texp10m1_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +texp2_SOURCES = texp2.c +texp2_OBJECTS = texp2.$(OBJEXT) +texp2_LDADD = $(LDADD) +texp2_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +texp2m1_SOURCES = texp2m1.c +texp2m1_OBJECTS = texp2m1.$(OBJEXT) +texp2m1_LDADD = $(LDADD) +texp2m1_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +texpm1_SOURCES = texpm1.c +texpm1_OBJECTS = texpm1.$(OBJEXT) +texpm1_LDADD = $(LDADD) +texpm1_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tfr_div_SOURCES = tfr_div.c +tfr_div_OBJECTS = tfr_div.$(OBJEXT) +tfr_div_LDADD = $(LDADD) +tfr_div_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tfr_sub_SOURCES = tfr_sub.c +tfr_sub_OBJECTS = tfr_sub.$(OBJEXT) +tfr_sub_LDADD = $(LDADD) +tfr_sub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tget_d_SOURCES = tget_d.c +tget_d_OBJECTS = tget_d.$(OBJEXT) +tget_d_LDADD = $(LDADD) +tget_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tget_endpoints_SOURCES = tget_endpoints.c +tget_endpoints_OBJECTS = tget_endpoints.$(OBJEXT) +tget_endpoints_LDADD = $(LDADD) +tget_endpoints_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tget_fr_SOURCES = tget_fr.c +tget_fr_OBJECTS = tget_fr.$(OBJEXT) +tget_fr_LDADD = $(LDADD) +tget_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tget_version_SOURCES = tget_version.c +tget_version_OBJECTS = tget_version.$(OBJEXT) +tget_version_LDADD = $(LDADD) +tget_version_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +thas_zero_SOURCES = thas_zero.c +thas_zero_OBJECTS = thas_zero.$(OBJEXT) +thas_zero_LDADD = $(LDADD) +thas_zero_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +thypot_SOURCES = thypot.c +thypot_OBJECTS = thypot.$(OBJEXT) +thypot_LDADD = $(LDADD) +thypot_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tincrease_SOURCES = tincrease.c +tincrease_OBJECTS = tincrease.$(OBJEXT) +tincrease_LDADD = $(LDADD) +tincrease_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinf_p_SOURCES = tinf_p.c +tinf_p_OBJECTS = tinf_p.$(OBJEXT) +tinf_p_LDADD = $(LDADD) +tinf_p_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinit_SOURCES = tinit.c +tinit_OBJECTS = tinit.$(OBJEXT) +tinit_LDADD = $(LDADD) +tinit_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinit_set_SOURCES = tinit_set.c +tinit_set_OBJECTS = tinit_set.$(OBJEXT) +tinit_set_LDADD = $(LDADD) +tinit_set_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinits_SOURCES = tinits.c +tinits_OBJECTS = tinits.$(OBJEXT) +tinits_LDADD = $(LDADD) +tinits_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tintersect_SOURCES = tintersect.c +tintersect_OBJECTS = tintersect.$(OBJEXT) +tintersect_LDADD = $(LDADD) +tintersect_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinterv_d_SOURCES = tinterv_d.c +tinterv_d_OBJECTS = tinterv_d.$(OBJEXT) +tinterv_d_LDADD = $(LDADD) +tinterv_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinterv_fr_SOURCES = tinterv_fr.c +tinterv_fr_OBJECTS = tinterv_fr.$(OBJEXT) +tinterv_fr_LDADD = $(LDADD) +tinterv_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinterv_q_SOURCES = tinterv_q.c +tinterv_q_OBJECTS = tinterv_q.$(OBJEXT) +tinterv_q_LDADD = $(LDADD) +tinterv_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinterv_si_SOURCES = tinterv_si.c +tinterv_si_OBJECTS = tinterv_si.$(OBJEXT) +tinterv_si_LDADD = $(LDADD) +tinterv_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinterv_ui_SOURCES = tinterv_ui.c +tinterv_ui_OBJECTS = tinterv_ui.$(OBJEXT) +tinterv_ui_LDADD = $(LDADD) +tinterv_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinterv_z_SOURCES = tinterv_z.c +tinterv_z_OBJECTS = tinterv_z.$(OBJEXT) +tinterv_z_LDADD = $(LDADD) +tinterv_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tinv_SOURCES = tinv.c +tinv_OBJECTS = tinv.$(OBJEXT) +tinv_LDADD = $(LDADD) +tinv_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tio_str_SOURCES = tio_str.c +tio_str_OBJECTS = tio_str.$(OBJEXT) +tio_str_LDADD = $(LDADD) +tio_str_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_empty_SOURCES = tis_empty.c +tis_empty_OBJECTS = tis_empty.$(OBJEXT) +tis_empty_LDADD = $(LDADD) +tis_empty_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_SOURCES = tis_inside.c +tis_inside_OBJECTS = tis_inside.$(OBJEXT) +tis_inside_LDADD = $(LDADD) +tis_inside_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_d_SOURCES = tis_inside_d.c +tis_inside_d_OBJECTS = tis_inside_d.$(OBJEXT) +tis_inside_d_LDADD = $(LDADD) +tis_inside_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_fr_SOURCES = tis_inside_fr.c +tis_inside_fr_OBJECTS = tis_inside_fr.$(OBJEXT) +tis_inside_fr_LDADD = $(LDADD) +tis_inside_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_q_SOURCES = tis_inside_q.c +tis_inside_q_OBJECTS = tis_inside_q.$(OBJEXT) +tis_inside_q_LDADD = $(LDADD) +tis_inside_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_si_SOURCES = tis_inside_si.c +tis_inside_si_OBJECTS = tis_inside_si.$(OBJEXT) +tis_inside_si_LDADD = $(LDADD) +tis_inside_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_ui_SOURCES = tis_inside_ui.c +tis_inside_ui_OBJECTS = tis_inside_ui.$(OBJEXT) +tis_inside_ui_LDADD = $(LDADD) +tis_inside_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_inside_z_SOURCES = tis_inside_z.c +tis_inside_z_OBJECTS = tis_inside_z.$(OBJEXT) +tis_inside_z_LDADD = $(LDADD) +tis_inside_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_neg_SOURCES = tis_neg.c +tis_neg_OBJECTS = tis_neg.$(OBJEXT) +tis_neg_LDADD = $(LDADD) +tis_neg_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_nonneg_SOURCES = tis_nonneg.c +tis_nonneg_OBJECTS = tis_nonneg.$(OBJEXT) +tis_nonneg_LDADD = $(LDADD) +tis_nonneg_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_nonpos_SOURCES = tis_nonpos.c +tis_nonpos_OBJECTS = tis_nonpos.$(OBJEXT) +tis_nonpos_LDADD = $(LDADD) +tis_nonpos_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_pos_SOURCES = tis_pos.c +tis_pos_OBJECTS = tis_pos.$(OBJEXT) +tis_pos_LDADD = $(LDADD) +tis_pos_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_strictly_inside_SOURCES = tis_strictly_inside.c +tis_strictly_inside_OBJECTS = tis_strictly_inside.$(OBJEXT) +tis_strictly_inside_LDADD = $(LDADD) +tis_strictly_inside_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_strictly_neg_SOURCES = tis_strictly_neg.c +tis_strictly_neg_OBJECTS = tis_strictly_neg.$(OBJEXT) +tis_strictly_neg_LDADD = $(LDADD) +tis_strictly_neg_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_strictly_pos_SOURCES = tis_strictly_pos.c +tis_strictly_pos_OBJECTS = tis_strictly_pos.$(OBJEXT) +tis_strictly_pos_LDADD = $(LDADD) +tis_strictly_pos_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tis_zero_SOURCES = tis_zero.c +tis_zero_OBJECTS = tis_zero.$(OBJEXT) +tis_zero_LDADD = $(LDADD) +tis_zero_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tlog_SOURCES = tlog.c +tlog_OBJECTS = tlog.$(OBJEXT) +tlog_LDADD = $(LDADD) +tlog_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tlog10_SOURCES = tlog10.c +tlog10_OBJECTS = tlog10.$(OBJEXT) +tlog10_LDADD = $(LDADD) +tlog10_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tlog1p_SOURCES = tlog1p.c +tlog1p_OBJECTS = tlog1p.$(OBJEXT) +tlog1p_LDADD = $(LDADD) +tlog1p_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tlog2_SOURCES = tlog2.c +tlog2_OBJECTS = tlog2.$(OBJEXT) +tlog2_LDADD = $(LDADD) +tlog2_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmag_SOURCES = tmag.c +tmag_OBJECTS = tmag.$(OBJEXT) +tmag_LDADD = $(LDADD) +tmag_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmid_SOURCES = tmid.c +tmid_OBJECTS = tmid.$(OBJEXT) +tmid_LDADD = $(LDADD) +tmid_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmig_SOURCES = tmig.c +tmig_OBJECTS = tmig.$(OBJEXT) +tmig_LDADD = $(LDADD) +tmig_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_SOURCES = tmul.c +tmul_OBJECTS = tmul.$(OBJEXT) +tmul_LDADD = $(LDADD) +tmul_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_2exp_SOURCES = tmul_2exp.c +tmul_2exp_OBJECTS = tmul_2exp.$(OBJEXT) +tmul_2exp_LDADD = $(LDADD) +tmul_2exp_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_2si_SOURCES = tmul_2si.c +tmul_2si_OBJECTS = tmul_2si.$(OBJEXT) +tmul_2si_LDADD = $(LDADD) +tmul_2si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_2ui_SOURCES = tmul_2ui.c +tmul_2ui_OBJECTS = tmul_2ui.$(OBJEXT) +tmul_2ui_LDADD = $(LDADD) +tmul_2ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_d_SOURCES = tmul_d.c +tmul_d_OBJECTS = tmul_d.$(OBJEXT) +tmul_d_LDADD = $(LDADD) +tmul_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_fr_SOURCES = tmul_fr.c +tmul_fr_OBJECTS = tmul_fr.$(OBJEXT) +tmul_fr_LDADD = $(LDADD) +tmul_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_q_SOURCES = tmul_q.c +tmul_q_OBJECTS = tmul_q.$(OBJEXT) +tmul_q_LDADD = $(LDADD) +tmul_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_si_SOURCES = tmul_si.c +tmul_si_OBJECTS = tmul_si.$(OBJEXT) +tmul_si_LDADD = $(LDADD) +tmul_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_ui_SOURCES = tmul_ui.c +tmul_ui_OBJECTS = tmul_ui.$(OBJEXT) +tmul_ui_LDADD = $(LDADD) +tmul_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tmul_z_SOURCES = tmul_z.c +tmul_z_OBJECTS = tmul_z.$(OBJEXT) +tmul_z_LDADD = $(LDADD) +tmul_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tnan_p_SOURCES = tnan_p.c +tnan_p_OBJECTS = tnan_p.$(OBJEXT) +tnan_p_LDADD = $(LDADD) +tnan_p_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tneg_SOURCES = tneg.c +tneg_OBJECTS = tneg.$(OBJEXT) +tneg_LDADD = $(LDADD) +tneg_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tput_d_SOURCES = tput_d.c +tput_d_OBJECTS = tput_d.$(OBJEXT) +tput_d_LDADD = $(LDADD) +tput_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tput_fr_SOURCES = tput_fr.c +tput_fr_OBJECTS = tput_fr.$(OBJEXT) +tput_fr_LDADD = $(LDADD) +tput_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tput_q_SOURCES = tput_q.c +tput_q_OBJECTS = tput_q.$(OBJEXT) +tput_q_LDADD = $(LDADD) +tput_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tput_si_SOURCES = tput_si.c +tput_si_OBJECTS = tput_si.$(OBJEXT) +tput_si_LDADD = $(LDADD) +tput_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tput_ui_SOURCES = tput_ui.c +tput_ui_OBJECTS = tput_ui.$(OBJEXT) +tput_ui_LDADD = $(LDADD) +tput_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tput_z_SOURCES = tput_z.c +tput_z_OBJECTS = tput_z.$(OBJEXT) +tput_z_LDADD = $(LDADD) +tput_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tq_div_SOURCES = tq_div.c +tq_div_OBJECTS = tq_div.$(OBJEXT) +tq_div_LDADD = $(LDADD) +tq_div_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tq_sub_SOURCES = tq_sub.c +tq_sub_OBJECTS = tq_sub.$(OBJEXT) +tq_sub_LDADD = $(LDADD) +tq_sub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +trec_sqrt_SOURCES = trec_sqrt.c +trec_sqrt_OBJECTS = trec_sqrt.$(OBJEXT) +trec_sqrt_LDADD = $(LDADD) +trec_sqrt_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tround_prec_SOURCES = tround_prec.c +tround_prec_OBJECTS = tround_prec.$(OBJEXT) +tround_prec_LDADD = $(LDADD) +tround_prec_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsec_SOURCES = tsec.c +tsec_OBJECTS = tsec.$(OBJEXT) +tsec_LDADD = $(LDADD) +tsec_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsech_SOURCES = tsech.c +tsech_OBJECTS = tsech.$(OBJEXT) +tsech_LDADD = $(LDADD) +tsech_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_SOURCES = tset.c +tset_OBJECTS = tset.$(OBJEXT) +tset_LDADD = $(LDADD) +tset_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_d_SOURCES = tset_d.c +tset_d_OBJECTS = tset_d.$(OBJEXT) +tset_d_LDADD = $(LDADD) +tset_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_flt_SOURCES = tset_flt.c +tset_flt_OBJECTS = tset_flt.$(OBJEXT) +tset_flt_LDADD = $(LDADD) +tset_flt_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_fr_SOURCES = tset_fr.c +tset_fr_OBJECTS = tset_fr.$(OBJEXT) +tset_fr_LDADD = $(LDADD) +tset_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_ld_SOURCES = tset_ld.c +tset_ld_OBJECTS = tset_ld.$(OBJEXT) +tset_ld_LDADD = $(LDADD) +tset_ld_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_q_SOURCES = tset_q.c +tset_q_OBJECTS = tset_q.$(OBJEXT) +tset_q_LDADD = $(LDADD) +tset_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_si_SOURCES = tset_si.c +tset_si_OBJECTS = tset_si.$(OBJEXT) +tset_si_LDADD = $(LDADD) +tset_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_str_SOURCES = tset_str.c +tset_str_OBJECTS = tset_str.$(OBJEXT) +tset_str_LDADD = $(LDADD) +tset_str_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_ui_SOURCES = tset_ui.c +tset_ui_OBJECTS = tset_ui.$(OBJEXT) +tset_ui_LDADD = $(LDADD) +tset_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tset_z_SOURCES = tset_z.c +tset_z_OBJECTS = tset_z.$(OBJEXT) +tset_z_LDADD = $(LDADD) +tset_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsi_div_SOURCES = tsi_div.c +tsi_div_OBJECTS = tsi_div.$(OBJEXT) +tsi_div_LDADD = $(LDADD) +tsi_div_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsi_sub_SOURCES = tsi_sub.c +tsi_sub_OBJECTS = tsi_sub.$(OBJEXT) +tsi_sub_LDADD = $(LDADD) +tsi_sub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsin_SOURCES = tsin.c +tsin_OBJECTS = tsin.$(OBJEXT) +tsin_LDADD = $(LDADD) +tsin_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsinh_SOURCES = tsinh.c +tsinh_OBJECTS = tsinh.$(OBJEXT) +tsinh_LDADD = $(LDADD) +tsinh_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsqr_SOURCES = tsqr.c +tsqr_OBJECTS = tsqr.$(OBJEXT) +tsqr_LDADD = $(LDADD) +tsqr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsqrt_SOURCES = tsqrt.c +tsqrt_OBJECTS = tsqrt.$(OBJEXT) +tsqrt_LDADD = $(LDADD) +tsqrt_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_SOURCES = tsub.c +tsub_OBJECTS = tsub.$(OBJEXT) +tsub_LDADD = $(LDADD) +tsub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_d_SOURCES = tsub_d.c +tsub_d_OBJECTS = tsub_d.$(OBJEXT) +tsub_d_LDADD = $(LDADD) +tsub_d_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_fr_SOURCES = tsub_fr.c +tsub_fr_OBJECTS = tsub_fr.$(OBJEXT) +tsub_fr_LDADD = $(LDADD) +tsub_fr_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_q_SOURCES = tsub_q.c +tsub_q_OBJECTS = tsub_q.$(OBJEXT) +tsub_q_LDADD = $(LDADD) +tsub_q_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_si_SOURCES = tsub_si.c +tsub_si_OBJECTS = tsub_si.$(OBJEXT) +tsub_si_LDADD = $(LDADD) +tsub_si_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_ui_SOURCES = tsub_ui.c +tsub_ui_OBJECTS = tsub_ui.$(OBJEXT) +tsub_ui_LDADD = $(LDADD) +tsub_ui_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tsub_z_SOURCES = tsub_z.c +tsub_z_OBJECTS = tsub_z.$(OBJEXT) +tsub_z_LDADD = $(LDADD) +tsub_z_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tswap_SOURCES = tswap.c +tswap_OBJECTS = tswap.$(OBJEXT) +tswap_LDADD = $(LDADD) +tswap_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +ttan_SOURCES = ttan.c +ttan_OBJECTS = ttan.$(OBJEXT) +ttan_LDADD = $(LDADD) +ttan_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +ttanh_SOURCES = ttanh.c +ttanh_OBJECTS = ttanh.$(OBJEXT) +ttanh_LDADD = $(LDADD) +ttanh_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tui_div_SOURCES = tui_div.c +tui_div_OBJECTS = tui_div.$(OBJEXT) +tui_div_LDADD = $(LDADD) +tui_div_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tui_sub_SOURCES = tui_sub.c +tui_sub_OBJECTS = tui_sub.$(OBJEXT) +tui_sub_LDADD = $(LDADD) +tui_sub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tunion_SOURCES = tunion.c +tunion_OBJECTS = tunion.$(OBJEXT) +tunion_LDADD = $(LDADD) +tunion_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tz_div_SOURCES = tz_div.c +tz_div_OBJECTS = tz_div.$(OBJEXT) +tz_div_LDADD = $(LDADD) +tz_div_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +tz_sub_SOURCES = tz_sub.c +tz_sub_OBJECTS = tz_sub.$(OBJEXT) +tz_sub_LDADD = $(LDADD) +tz_sub_DEPENDENCIES = libmpfi-tests.la \ + $(top_builddir)/src/.libs/libmpfi.la +AM_V_P = $(am__v_P_@AM_V@) +am__v_P_ = $(am__v_P_@AM_DEFAULT_V@) +am__v_P_0 = false +am__v_P_1 = : +AM_V_GEN = $(am__v_GEN_@AM_V@) +am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@) +am__v_GEN_0 = @echo " GEN " $@; +am__v_GEN_1 = +AM_V_at = $(am__v_at_@AM_V@) +am__v_at_ = $(am__v_at_@AM_DEFAULT_V@) +am__v_at_0 = @ +am__v_at_1 = +DEFAULT_INCLUDES = -I.@am__isrc@ -I$(top_builddir) +depcomp = $(SHELL) $(top_srcdir)/depcomp +am__maybe_remake_depfiles = depfiles +am__depfiles_remade = ./$(DEPDIR)/check_data.Plo \ + ./$(DEPDIR)/mpfi-tests.Plo ./$(DEPDIR)/random.Plo \ + ./$(DEPDIR)/read_data.Plo ./$(DEPDIR)/tabs.Po \ + ./$(DEPDIR)/tacos.Po ./$(DEPDIR)/tacosh.Po ./$(DEPDIR)/tadd.Po \ + ./$(DEPDIR)/tadd_d.Po ./$(DEPDIR)/tadd_fr.Po \ + ./$(DEPDIR)/tadd_q.Po ./$(DEPDIR)/tadd_si.Po \ + ./$(DEPDIR)/tadd_ui.Po ./$(DEPDIR)/tadd_z.Po \ + ./$(DEPDIR)/tasin.Po ./$(DEPDIR)/tasinh.Po \ + ./$(DEPDIR)/tatan.Po ./$(DEPDIR)/tatan2.Po \ + ./$(DEPDIR)/tatanh.Po ./$(DEPDIR)/tbisect.Po \ + ./$(DEPDIR)/tblow.Po ./$(DEPDIR)/tbounded_p.Po \ + ./$(DEPDIR)/tcbrt.Po ./$(DEPDIR)/tcmp.Po ./$(DEPDIR)/tcmp_d.Po \ + ./$(DEPDIR)/tcmp_fr.Po ./$(DEPDIR)/tcmp_q.Po \ + ./$(DEPDIR)/tcmp_si.Po ./$(DEPDIR)/tcmp_ui.Po \ + ./$(DEPDIR)/tcmp_z.Po ./$(DEPDIR)/tconst_catalan.Po \ + ./$(DEPDIR)/tconst_euler.Po ./$(DEPDIR)/tconst_log2.Po \ + ./$(DEPDIR)/tconst_pi.Po ./$(DEPDIR)/tcos.Po \ + ./$(DEPDIR)/tcosh.Po ./$(DEPDIR)/tcot.Po ./$(DEPDIR)/tcoth.Po \ + ./$(DEPDIR)/tcsc.Po ./$(DEPDIR)/tcsch.Po ./$(DEPDIR)/td_div.Po \ + ./$(DEPDIR)/td_sub.Po ./$(DEPDIR)/tdiam.Po \ + ./$(DEPDIR)/tdiam_abs.Po ./$(DEPDIR)/tdiam_rel.Po \ + ./$(DEPDIR)/tdiv.Po ./$(DEPDIR)/tdiv_2exp.Po \ + ./$(DEPDIR)/tdiv_2si.Po ./$(DEPDIR)/tdiv_2ui.Po \ + ./$(DEPDIR)/tdiv_d.Po ./$(DEPDIR)/tdiv_ext.Po \ + ./$(DEPDIR)/tdiv_fr.Po ./$(DEPDIR)/tdiv_q.Po \ + ./$(DEPDIR)/tdiv_si.Po ./$(DEPDIR)/tdiv_ui.Po \ + ./$(DEPDIR)/tdiv_z.Po ./$(DEPDIR)/terror.Po \ + ./$(DEPDIR)/texp.Po ./$(DEPDIR)/texp10.Po \ + ./$(DEPDIR)/texp10m1.Po ./$(DEPDIR)/texp2.Po \ + ./$(DEPDIR)/texp2m1.Po ./$(DEPDIR)/texpm1.Po \ + ./$(DEPDIR)/tfr_div.Po ./$(DEPDIR)/tfr_sub.Po \ + ./$(DEPDIR)/tget_d.Po ./$(DEPDIR)/tget_endpoints.Po \ + ./$(DEPDIR)/tget_fr.Po ./$(DEPDIR)/tget_version.Po \ + ./$(DEPDIR)/thas_zero.Po ./$(DEPDIR)/thypot.Po \ + ./$(DEPDIR)/tincrease.Po ./$(DEPDIR)/tinf_p.Po \ + ./$(DEPDIR)/tinit.Po ./$(DEPDIR)/tinit_set.Po \ + ./$(DEPDIR)/tinits.Po ./$(DEPDIR)/tintersect.Po \ + ./$(DEPDIR)/tinterv_d.Po ./$(DEPDIR)/tinterv_fr.Po \ + ./$(DEPDIR)/tinterv_q.Po ./$(DEPDIR)/tinterv_si.Po \ + ./$(DEPDIR)/tinterv_ui.Po ./$(DEPDIR)/tinterv_z.Po \ + ./$(DEPDIR)/tinv.Po ./$(DEPDIR)/tio_str.Po \ + ./$(DEPDIR)/tis_empty.Po ./$(DEPDIR)/tis_inside.Po \ + ./$(DEPDIR)/tis_inside_d.Po ./$(DEPDIR)/tis_inside_fr.Po \ + ./$(DEPDIR)/tis_inside_q.Po ./$(DEPDIR)/tis_inside_si.Po \ + ./$(DEPDIR)/tis_inside_ui.Po ./$(DEPDIR)/tis_inside_z.Po \ + ./$(DEPDIR)/tis_neg.Po ./$(DEPDIR)/tis_nonneg.Po \ + ./$(DEPDIR)/tis_nonpos.Po ./$(DEPDIR)/tis_pos.Po \ + ./$(DEPDIR)/tis_strictly_inside.Po \ + ./$(DEPDIR)/tis_strictly_neg.Po \ + ./$(DEPDIR)/tis_strictly_pos.Po ./$(DEPDIR)/tis_zero.Po \ + ./$(DEPDIR)/tlog.Po ./$(DEPDIR)/tlog10.Po \ + ./$(DEPDIR)/tlog1p.Po ./$(DEPDIR)/tlog2.Po ./$(DEPDIR)/tmag.Po \ + ./$(DEPDIR)/tmid.Po ./$(DEPDIR)/tmig.Po ./$(DEPDIR)/tmul.Po \ + ./$(DEPDIR)/tmul_2exp.Po ./$(DEPDIR)/tmul_2si.Po \ + ./$(DEPDIR)/tmul_2ui.Po ./$(DEPDIR)/tmul_d.Po \ + ./$(DEPDIR)/tmul_fr.Po ./$(DEPDIR)/tmul_q.Po \ + ./$(DEPDIR)/tmul_si.Po ./$(DEPDIR)/tmul_ui.Po \ + ./$(DEPDIR)/tmul_z.Po ./$(DEPDIR)/tnan_p.Po \ + ./$(DEPDIR)/tneg.Po ./$(DEPDIR)/tput_d.Po \ + ./$(DEPDIR)/tput_fr.Po ./$(DEPDIR)/tput_q.Po \ + ./$(DEPDIR)/tput_si.Po ./$(DEPDIR)/tput_ui.Po \ + ./$(DEPDIR)/tput_z.Po ./$(DEPDIR)/tq_div.Po \ + ./$(DEPDIR)/tq_sub.Po ./$(DEPDIR)/trec_sqrt.Po \ + ./$(DEPDIR)/tround_prec.Po ./$(DEPDIR)/tsec.Po \ + ./$(DEPDIR)/tsech.Po ./$(DEPDIR)/tset.Po ./$(DEPDIR)/tset_d.Po \ + ./$(DEPDIR)/tset_flt.Po ./$(DEPDIR)/tset_fr.Po \ + ./$(DEPDIR)/tset_ld.Po ./$(DEPDIR)/tset_q.Po \ + ./$(DEPDIR)/tset_si.Po ./$(DEPDIR)/tset_str.Po \ + ./$(DEPDIR)/tset_ui.Po ./$(DEPDIR)/tset_z.Po \ + ./$(DEPDIR)/tsi_div.Po ./$(DEPDIR)/tsi_sub.Po \ + ./$(DEPDIR)/tsin.Po ./$(DEPDIR)/tsinh.Po ./$(DEPDIR)/tsqr.Po \ + ./$(DEPDIR)/tsqrt.Po ./$(DEPDIR)/tsub.Po ./$(DEPDIR)/tsub_d.Po \ + ./$(DEPDIR)/tsub_fr.Po ./$(DEPDIR)/tsub_q.Po \ + ./$(DEPDIR)/tsub_si.Po ./$(DEPDIR)/tsub_ui.Po \ + ./$(DEPDIR)/tsub_z.Po ./$(DEPDIR)/tswap.Po ./$(DEPDIR)/ttan.Po \ + ./$(DEPDIR)/ttanh.Po ./$(DEPDIR)/tui_div.Po \ + ./$(DEPDIR)/tui_sub.Po ./$(DEPDIR)/tunion.Po \ + ./$(DEPDIR)/type_i.Plo ./$(DEPDIR)/type_id.Plo \ + ./$(DEPDIR)/type_idi.Plo ./$(DEPDIR)/type_if.Plo \ + ./$(DEPDIR)/type_ii.Plo ./$(DEPDIR)/type_iid.Plo \ + ./$(DEPDIR)/type_iii.Plo ./$(DEPDIR)/type_iiii.Plo \ + ./$(DEPDIR)/type_iiq.Plo ./$(DEPDIR)/type_iir.Plo \ + ./$(DEPDIR)/type_iis.Plo ./$(DEPDIR)/type_iiu.Plo \ + ./$(DEPDIR)/type_iiz.Plo ./$(DEPDIR)/type_il.Plo \ + ./$(DEPDIR)/type_iq.Plo ./$(DEPDIR)/type_iqi.Plo \ + ./$(DEPDIR)/type_ir.Plo ./$(DEPDIR)/type_iri.Plo \ + ./$(DEPDIR)/type_is.Plo ./$(DEPDIR)/type_isi.Plo \ + ./$(DEPDIR)/type_iu.Plo ./$(DEPDIR)/type_iui.Plo \ + ./$(DEPDIR)/type_iz.Plo ./$(DEPDIR)/type_izi.Plo \ + ./$(DEPDIR)/type_ri.Plo ./$(DEPDIR)/tz_div.Po \ + ./$(DEPDIR)/tz_sub.Po +am__mv = mv -f +COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \ + $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) +LTCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ + $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) \ + $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \ + $(AM_CFLAGS) $(CFLAGS) +AM_V_CC = $(am__v_CC_@AM_V@) +am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@) +am__v_CC_0 = @echo " CC " $@; +am__v_CC_1 = +CCLD = $(CC) +LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ + $(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \ + $(AM_LDFLAGS) $(LDFLAGS) -o $@ +AM_V_CCLD = $(am__v_CCLD_@AM_V@) +am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@) +am__v_CCLD_0 = @echo " CCLD " $@; +am__v_CCLD_1 = +SOURCES = $(libmpfi_tests_la_SOURCES) tabs.c tacos.c tacosh.c tadd.c \ + tadd_d.c tadd_fr.c tadd_q.c tadd_si.c tadd_ui.c tadd_z.c \ + tasin.c tasinh.c tatan.c tatan2.c tatanh.c tbisect.c tblow.c \ + tbounded_p.c tcbrt.c tcmp.c tcmp_d.c tcmp_fr.c tcmp_q.c \ + tcmp_si.c tcmp_ui.c tcmp_z.c tconst_catalan.c tconst_euler.c \ + tconst_log2.c tconst_pi.c tcos.c tcosh.c tcot.c tcoth.c tcsc.c \ + tcsch.c td_div.c td_sub.c tdiam.c tdiam_abs.c tdiam_rel.c \ + tdiv.c tdiv_2exp.c tdiv_2si.c tdiv_2ui.c tdiv_d.c tdiv_ext.c \ + tdiv_fr.c tdiv_q.c tdiv_si.c tdiv_ui.c tdiv_z.c terror.c \ + texp.c texp10.c texp10m1.c texp2.c texp2m1.c texpm1.c \ + tfr_div.c tfr_sub.c tget_d.c tget_endpoints.c tget_fr.c \ + tget_version.c thas_zero.c thypot.c tincrease.c tinf_p.c \ + tinit.c tinit_set.c tinits.c tintersect.c tinterv_d.c \ + tinterv_fr.c tinterv_q.c tinterv_si.c tinterv_ui.c tinterv_z.c \ + tinv.c tio_str.c tis_empty.c tis_inside.c tis_inside_d.c \ + tis_inside_fr.c tis_inside_q.c tis_inside_si.c tis_inside_ui.c \ + tis_inside_z.c tis_neg.c tis_nonneg.c tis_nonpos.c tis_pos.c \ + tis_strictly_inside.c tis_strictly_neg.c tis_strictly_pos.c \ + tis_zero.c tlog.c tlog10.c tlog1p.c tlog2.c tmag.c tmid.c \ + tmig.c tmul.c tmul_2exp.c tmul_2si.c tmul_2ui.c tmul_d.c \ + tmul_fr.c tmul_q.c tmul_si.c tmul_ui.c tmul_z.c tnan_p.c \ + tneg.c tput_d.c tput_fr.c tput_q.c tput_si.c tput_ui.c \ + tput_z.c tq_div.c tq_sub.c trec_sqrt.c tround_prec.c tsec.c \ + tsech.c tset.c tset_d.c tset_flt.c tset_fr.c tset_ld.c \ + tset_q.c tset_si.c tset_str.c tset_ui.c tset_z.c tsi_div.c \ + tsi_sub.c tsin.c tsinh.c tsqr.c tsqrt.c tsub.c tsub_d.c \ + tsub_fr.c tsub_q.c tsub_si.c tsub_ui.c tsub_z.c tswap.c ttan.c \ + ttanh.c tui_div.c tui_sub.c tunion.c tz_div.c tz_sub.c +DIST_SOURCES = $(libmpfi_tests_la_SOURCES) tabs.c tacos.c tacosh.c \ + tadd.c tadd_d.c tadd_fr.c tadd_q.c tadd_si.c tadd_ui.c \ + tadd_z.c tasin.c tasinh.c tatan.c tatan2.c tatanh.c tbisect.c \ + tblow.c tbounded_p.c tcbrt.c tcmp.c tcmp_d.c tcmp_fr.c \ + tcmp_q.c tcmp_si.c tcmp_ui.c tcmp_z.c tconst_catalan.c \ + tconst_euler.c tconst_log2.c tconst_pi.c tcos.c tcosh.c tcot.c \ + tcoth.c tcsc.c tcsch.c td_div.c td_sub.c tdiam.c tdiam_abs.c \ + tdiam_rel.c tdiv.c tdiv_2exp.c tdiv_2si.c tdiv_2ui.c tdiv_d.c \ + tdiv_ext.c tdiv_fr.c tdiv_q.c tdiv_si.c tdiv_ui.c tdiv_z.c \ + terror.c texp.c texp10.c texp10m1.c texp2.c texp2m1.c texpm1.c \ + tfr_div.c tfr_sub.c tget_d.c tget_endpoints.c tget_fr.c \ + tget_version.c thas_zero.c thypot.c tincrease.c tinf_p.c \ + tinit.c tinit_set.c tinits.c tintersect.c tinterv_d.c \ + tinterv_fr.c tinterv_q.c tinterv_si.c tinterv_ui.c tinterv_z.c \ + tinv.c tio_str.c tis_empty.c tis_inside.c tis_inside_d.c \ + tis_inside_fr.c tis_inside_q.c tis_inside_si.c tis_inside_ui.c \ + tis_inside_z.c tis_neg.c tis_nonneg.c tis_nonpos.c tis_pos.c \ + tis_strictly_inside.c tis_strictly_neg.c tis_strictly_pos.c \ + tis_zero.c tlog.c tlog10.c tlog1p.c tlog2.c tmag.c tmid.c \ + tmig.c tmul.c tmul_2exp.c tmul_2si.c tmul_2ui.c tmul_d.c \ + tmul_fr.c tmul_q.c tmul_si.c tmul_ui.c tmul_z.c tnan_p.c \ + tneg.c tput_d.c tput_fr.c tput_q.c tput_si.c tput_ui.c \ + tput_z.c tq_div.c tq_sub.c trec_sqrt.c tround_prec.c tsec.c \ + tsech.c tset.c tset_d.c tset_flt.c tset_fr.c tset_ld.c \ + tset_q.c tset_si.c tset_str.c tset_ui.c tset_z.c tsi_div.c \ + tsi_sub.c tsin.c tsinh.c tsqr.c tsqrt.c tsub.c tsub_d.c \ + tsub_fr.c tsub_q.c tsub_si.c tsub_ui.c tsub_z.c tswap.c ttan.c \ + ttanh.c tui_div.c tui_sub.c tunion.c tz_div.c tz_sub.c +am__can_run_installinfo = \ + case $$AM_UPDATE_INFO_DIR in \ + n|no|NO) false;; \ + *) (install-info --version) >/dev/null 2>&1;; \ + esac +am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP) +# Read a list of newline-separated strings from the standard input, +# and print each of them once, without duplicates. Input order is +# *not* preserved. +am__uniquify_input = $(AWK) '\ + BEGIN { nonempty = 0; } \ + { items[$$0] = 1; nonempty = 1; } \ + END { if (nonempty) { for (i in items) print i; }; } \ +' +# Make sure the list of sources is unique. This is necessary because, +# e.g., the same source file might be shared among _SOURCES variables +# for different programs/libraries. +am__define_uniq_tagged_files = \ + list='$(am__tagged_files)'; \ + unique=`for i in $$list; do \ + if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \ + done | $(am__uniquify_input)` +am__tty_colors_dummy = \ + mgn= red= grn= lgn= blu= brg= std=; \ + am__color_tests=no +am__tty_colors = { \ + $(am__tty_colors_dummy); \ + if test "X$(AM_COLOR_TESTS)" = Xno; then \ + am__color_tests=no; \ + elif test "X$(AM_COLOR_TESTS)" = Xalways; then \ + am__color_tests=yes; \ + elif test "X$$TERM" != Xdumb && { test -t 1; } 2>/dev/null; then \ + am__color_tests=yes; \ + fi; \ + if test $$am__color_tests = yes; then \ + red=''; \ + grn=''; \ + lgn=''; \ + blu=''; \ + mgn=''; \ + brg=''; \ + std=''; \ + fi; \ +} +am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; +am__vpath_adj = case $$p in \ + $(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \ + *) f=$$p;; \ + esac; +am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`; +am__install_max = 40 +am__nobase_strip_setup = \ + srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'` +am__nobase_strip = \ + for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||" +am__nobase_list = $(am__nobase_strip_setup); \ + for p in $$list; do echo "$$p $$p"; done | \ + sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \ + $(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \ + if (++n[$$2] == $(am__install_max)) \ + { print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \ + END { for (dir in files) print dir, files[dir] }' +am__base_list = \ + sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \ + sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g' +am__uninstall_files_from_dir = { \ + test -z "$$files" \ + || { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \ + || { echo " ( cd '$$dir' && rm -f" $$files ")"; \ + $(am__cd) "$$dir" && rm -f $$files; }; \ + } +am__recheck_rx = ^[ ]*:recheck:[ ]* +am__global_test_result_rx = ^[ ]*:global-test-result:[ ]* +am__copy_in_global_log_rx = ^[ ]*:copy-in-global-log:[ ]* +# A command that, given a newline-separated list of test names on the +# standard input, print the name of the tests that are to be re-run +# upon "make recheck". +am__list_recheck_tests = $(AWK) '{ \ + recheck = 1; \ + while ((rc = (getline line < ($$0 ".trs"))) != 0) \ + { \ + if (rc < 0) \ + { \ + if ((getline line2 < ($$0 ".log")) < 0) \ + recheck = 0; \ + break; \ + } \ + else if (line ~ /$(am__recheck_rx)[nN][Oo]/) \ + { \ + recheck = 0; \ + break; \ + } \ + else if (line ~ /$(am__recheck_rx)[yY][eE][sS]/) \ + { \ + break; \ + } \ + }; \ + if (recheck) \ + print $$0; \ + close ($$0 ".trs"); \ + close ($$0 ".log"); \ +}' +# A command that, given a newline-separated list of test names on the +# standard input, create the global log from their .trs and .log files. +am__create_global_log = $(AWK) ' \ +function fatal(msg) \ +{ \ + print "fatal: making $@: " msg | "cat >&2"; \ + exit 1; \ +} \ +function rst_section(header) \ +{ \ + print header; \ + len = length(header); \ + for (i = 1; i <= len; i = i + 1) \ + printf "="; \ + printf "\n\n"; \ +} \ +{ \ + copy_in_global_log = 1; \ + global_test_result = "RUN"; \ + while ((rc = (getline line < ($$0 ".trs"))) != 0) \ + { \ + if (rc < 0) \ + fatal("failed to read from " $$0 ".trs"); \ + if (line ~ /$(am__global_test_result_rx)/) \ + { \ + sub("$(am__global_test_result_rx)", "", line); \ + sub("[ ]*$$", "", line); \ + global_test_result = line; \ + } \ + else if (line ~ /$(am__copy_in_global_log_rx)[nN][oO]/) \ + copy_in_global_log = 0; \ + }; \ + if (copy_in_global_log) \ + { \ + rst_section(global_test_result ": " $$0); \ + while ((rc = (getline line < ($$0 ".log"))) != 0) \ + { \ + if (rc < 0) \ + fatal("failed to read from " $$0 ".log"); \ + print line; \ + }; \ + printf "\n"; \ + }; \ + close ($$0 ".trs"); \ + close ($$0 ".log"); \ +}' +# Restructured Text title. +am__rst_title = { sed 's/.*/ & /;h;s/./=/g;p;x;s/ *$$//;p;g' && echo; } +# Solaris 10 'make', and several other traditional 'make' implementations, +# pass "-e" to $(SHELL), and POSIX 2008 even requires this. Work around it +# by disabling -e (using the XSI extension "set +e") if it's set. +am__sh_e_setup = case $$- in *e*) set +e;; esac +# Default flags passed to test drivers. +am__common_driver_flags = \ + --color-tests "$$am__color_tests" \ + --enable-hard-errors "$$am__enable_hard_errors" \ + --expect-failure "$$am__expect_failure" +# To be inserted before the command running the test. Creates the +# directory for the log if needed. Stores in $dir the directory +# containing $f, in $tst the test, in $log the log. Executes the +# developer- defined test setup AM_TESTS_ENVIRONMENT (if any), and +# passes TESTS_ENVIRONMENT. Set up options for the wrapper that +# will run the test scripts (or their associated LOG_COMPILER, if +# thy have one). +am__check_pre = \ +$(am__sh_e_setup); \ +$(am__vpath_adj_setup) $(am__vpath_adj) \ +$(am__tty_colors); \ +srcdir=$(srcdir); export srcdir; \ +case "$@" in \ + */*) am__odir=`echo "./$@" | sed 's|/[^/]*$$||'`;; \ + *) am__odir=.;; \ +esac; \ +test "x$$am__odir" = x"." || test -d "$$am__odir" \ + || $(MKDIR_P) "$$am__odir" || exit $$?; \ +if test -f "./$$f"; then dir=./; \ +elif test -f "$$f"; then dir=; \ +else dir="$(srcdir)/"; fi; \ +tst=$$dir$$f; log='$@'; \ +if test -n '$(DISABLE_HARD_ERRORS)'; then \ + am__enable_hard_errors=no; \ +else \ + am__enable_hard_errors=yes; \ +fi; \ +case " $(XFAIL_TESTS) " in \ + *[\ \ ]$$f[\ \ ]* | *[\ \ ]$$dir$$f[\ \ ]*) \ + am__expect_failure=yes;; \ + *) \ + am__expect_failure=no;; \ +esac; \ +$(AM_TESTS_ENVIRONMENT) $(TESTS_ENVIRONMENT) +# A shell command to get the names of the tests scripts with any registered +# extension removed (i.e., equivalently, the names of the test logs, with +# the '.log' extension removed). The result is saved in the shell variable +# '$bases'. This honors runtime overriding of TESTS and TEST_LOGS. Sadly, +# we cannot use something simpler, involving e.g., "$(TEST_LOGS:.log=)", +# since that might cause problem with VPATH rewrites for suffix-less tests. +# See also 'test-harness-vpath-rewrite.sh' and 'test-trs-basic.sh'. +am__set_TESTS_bases = \ + bases='$(TEST_LOGS)'; \ + bases=`for i in $$bases; do echo $$i; done | sed 's/\.log$$//'`; \ + bases=`echo $$bases` +AM_TESTSUITE_SUMMARY_HEADER = ' for $(PACKAGE_STRING)' +RECHECK_LOGS = $(TEST_LOGS) +AM_RECURSIVE_TARGETS = check recheck +TEST_SUITE_LOG = test-suite.log +TEST_EXTENSIONS = @EXEEXT@ .test +LOG_DRIVER = $(SHELL) $(top_srcdir)/test-driver +LOG_COMPILE = $(LOG_COMPILER) $(AM_LOG_FLAGS) $(LOG_FLAGS) +am__set_b = \ + case '$@' in \ + */*) \ + case '$*' in \ + */*) b='$*';; \ + *) b=`echo '$@' | sed 's/\.log$$//'`; \ + esac;; \ + *) \ + b='$*';; \ + esac +am__test_logs1 = $(TESTS:=.log) +am__test_logs2 = $(am__test_logs1:@EXEEXT@.log=.log) +TEST_LOGS = $(am__test_logs2:.test.log=.log) +TEST_LOG_DRIVER = $(SHELL) $(top_srcdir)/test-driver +TEST_LOG_COMPILE = $(TEST_LOG_COMPILER) $(AM_TEST_LOG_FLAGS) \ + $(TEST_LOG_FLAGS) +am__DIST_COMMON = $(srcdir)/Makefile.in $(top_srcdir)/depcomp \ + $(top_srcdir)/test-driver +DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) +ACLOCAL = @ACLOCAL@ +AMTAR = @AMTAR@ +AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@ +AR = @AR@ +AUTOCONF = @AUTOCONF@ +AUTOHEADER = @AUTOHEADER@ +AUTOMAKE = @AUTOMAKE@ +AWK = @AWK@ +CC = @CC@ +CCDEPMODE = @CCDEPMODE@ +CFLAGS = @CFLAGS@ +CPP = @CPP@ +CPPFLAGS = @CPPFLAGS@ +CSCOPE = @CSCOPE@ +CTAGS = @CTAGS@ +CYGPATH_W = @CYGPATH_W@ +DEFS = @DEFS@ +DEPDIR = @DEPDIR@ +DLLTOOL = @DLLTOOL@ +DSYMUTIL = @DSYMUTIL@ +DUMPBIN = @DUMPBIN@ +ECHO_C = @ECHO_C@ +ECHO_N = @ECHO_N@ +ECHO_T = @ECHO_T@ +EGREP = @EGREP@ +ETAGS = @ETAGS@ +EXEEXT = @EXEEXT@ +FGREP = @FGREP@ +GREP = @GREP@ +INSTALL = @INSTALL@ +INSTALL_DATA = @INSTALL_DATA@ +INSTALL_PROGRAM = @INSTALL_PROGRAM@ +INSTALL_SCRIPT = @INSTALL_SCRIPT@ +INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ +LD = @LD@ +LDFLAGS = @LDFLAGS@ +LIBOBJS = @LIBOBJS@ +LIBS = @LIBS@ +LIBTOOL = @LIBTOOL@ +LIPO = @LIPO@ +LN_S = @LN_S@ +LTLIBOBJS = @LTLIBOBJS@ +LT_SYS_LIBRARY_PATH = @LT_SYS_LIBRARY_PATH@ +MAINT = @MAINT@ +MAKEINFO = @MAKEINFO@ +MANIFEST_TOOL = @MANIFEST_TOOL@ +MKDIR_P = @MKDIR_P@ +NM = @NM@ +NMEDIT = @NMEDIT@ +OBJDUMP = @OBJDUMP@ +OBJEXT = @OBJEXT@ +OTOOL = @OTOOL@ +OTOOL64 = @OTOOL64@ +PACKAGE = @PACKAGE@ +PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ +PACKAGE_NAME = @PACKAGE_NAME@ +PACKAGE_STRING = @PACKAGE_STRING@ +PACKAGE_TARNAME = @PACKAGE_TARNAME@ +PACKAGE_URL = @PACKAGE_URL@ +PACKAGE_VERSION = @PACKAGE_VERSION@ +PATH_SEPARATOR = @PATH_SEPARATOR@ +RANLIB = @RANLIB@ +SED = @SED@ +SET_MAKE = @SET_MAKE@ +SHELL = @SHELL@ +STRIP = @STRIP@ +VERSION = @VERSION@ +abs_builddir = @abs_builddir@ +abs_srcdir = @abs_srcdir@ +abs_top_builddir = @abs_top_builddir@ +abs_top_srcdir = @abs_top_srcdir@ +ac_ct_AR = @ac_ct_AR@ +ac_ct_CC = @ac_ct_CC@ +ac_ct_DUMPBIN = @ac_ct_DUMPBIN@ +am__include = @am__include@ +am__leading_dot = @am__leading_dot@ +am__quote = @am__quote@ +am__tar = @am__tar@ +am__untar = @am__untar@ +bindir = @bindir@ +build = @build@ +build_alias = @build_alias@ +build_cpu = @build_cpu@ +build_os = @build_os@ +build_vendor = @build_vendor@ +builddir = @builddir@ +datadir = @datadir@ +datarootdir = @datarootdir@ +docdir = @docdir@ +dvidir = @dvidir@ +exec_prefix = @exec_prefix@ +host = @host@ +host_alias = @host_alias@ +host_cpu = @host_cpu@ +host_os = @host_os@ +host_vendor = @host_vendor@ +htmldir = @htmldir@ +includedir = @includedir@ +infodir = @infodir@ +install_sh = @install_sh@ +libdir = @libdir@ +libexecdir = @libexecdir@ +localedir = @localedir@ +localstatedir = @localstatedir@ +mandir = @mandir@ +mkdir_p = @mkdir_p@ +oldincludedir = @oldincludedir@ +pdfdir = @pdfdir@ +prefix = @prefix@ +program_transform_name = @program_transform_name@ +psdir = @psdir@ +runstatedir = @runstatedir@ +sbindir = @sbindir@ +sharedstatedir = @sharedstatedir@ +srcdir = @srcdir@ +sysconfdir = @sysconfdir@ +target_alias = @target_alias@ +top_build_prefix = @top_build_prefix@ +top_builddir = @top_builddir@ +top_srcdir = @top_srcdir@ +LDADD = libmpfi-tests.la $(top_builddir)/src/.libs/libmpfi.la +AM_CPPFLAGS = -I$(top_srcdir)/src +check_LTLIBRARIES = libmpfi-tests.la +libmpfi_tests_la_SOURCES = mpfi-tests.h read_data.c random.c \ + type_i.c type_ii.c type_iii.c type_iiii.c type_iu.c type_is.c \ + type_id.c type_if.c type_il.c type_iz.c type_iq.c type_ir.c type_iiu.c \ + type_iis.c type_iid.c type_iiz.c type_iiq.c type_iir.c \ + type_iui.c type_isi.c type_idi.c type_izi.c type_iqi.c \ + type_iri.c type_ri.c check_data.c mpfi-tests.c + + +#EXTRA_DIST = abs.dat acos.dat acosh.dat add.dat add_d.dat \ +# add_fr.dat add_q.dat add_si.dat add_ui.dat add_z.dat \ +# asin.dat asinh.dat atan.dat atan2.dat atanh.dat \ +# bisect.dat blow.dat bounded_p.dat cbrt.dat \ +# const_catalan.dat const_euler.dat const_log2.dat \ +# const_pi.dat cos.dat cosh.dat cot.dat coth.dat csc.dat \ +# csch.dat d_div.dat d_sub.dat diam.dat diam_abs.dat \ +# diam_rel.dat div.dat div_2si.dat div_2ui.dat div_d.dat \ +# div_ext.dat div_fr.dat div_q.dat div_si.dat div_ui.dat div_z.dat \ +# exp.dat exp2.dat expm1.dat exp2m1.dat fr_div.dat fr_sub.dat \ +# has_zero.dat hypot.dat increase.dat inf_p.dat \ +# inp_str.dat intersect.dat inv.dat is_neg.dat \ +# is_nonneg.dat is_nonpos.dat is_pos.dat \ +# is_strictly_neg.dat is_strictly_pos.dat log.dat \ +# log10.dat log1p.dat log2.dat mag.dat mid.dat mig.dat \ +# mul.dat mul_2si.dat mul_2ui.dat mul_d.dat mul_fr.dat \ +# mul_q.dat mul_si.dat mul_ui.dat mul_z.dat nan_p.dat \ +# neg.dat put_d.dat put_fr.dat put_q.dat put_si.dat \ +# put_ui.dat put_z.dat q_div.dat q_sub.dat rec_sqrt.dat sec.dat \ +# sech.dat set_d.dat set_flt.dat set_fr.dat set_ld.dat set_q.dat set_si.dat set_sj.dat\ +# set_ui.dat set_uj.dat set_z.dat si_div.dat si_sub.dat sin.dat\ +# sinh.dat sqr.dat sqrt.dat sub.dat sub_d.dat sub_fr.dat \ +# sub_q.dat sub_si.dat sub_ui.dat sub_z.dat tan.dat \ +# tanh.dat ui_div.dat ui_sub.dat union.dat z_div.dat \ +# z_sub.dat +EXTRA_DIST = abs.dat acos.dat acosh.dat add.dat add_d.dat \ + add_fr.dat add_q.dat add_si.dat add_ui.dat add_z.dat \ + asin.dat asinh.dat atan.dat atan2.dat atanh.dat \ + bisect.dat blow.dat bounded_p.dat cbrt.dat \ + const_catalan.dat const_euler.dat const_log2.dat \ + const_pi.dat cos.dat cosh.dat cot.dat coth.dat csc.dat \ + csch.dat d_div.dat d_sub.dat diam.dat diam_abs.dat \ + diam_rel.dat div.dat div_2si.dat div_2ui.dat div_d.dat \ + div_ext.dat div_fr.dat div_q.dat div_si.dat div_ui.dat div_z.dat \ + exp.dat exp2.dat expm1.dat exp2m1.dat exp10m1.dat fr_div.dat fr_sub.dat \ + has_zero.dat hypot.dat increase.dat inf_p.dat \ + inp_str.dat intersect.dat inv.dat is_neg.dat \ + is_nonneg.dat is_nonpos.dat is_pos.dat \ + is_strictly_neg.dat is_strictly_pos.dat log.dat \ + log10.dat log1p.dat log2.dat mag.dat mid.dat mig.dat \ + mul.dat mul_2si.dat mul_2ui.dat mul_d.dat mul_fr.dat \ + mul_q.dat mul_si.dat mul_ui.dat mul_z.dat nan_p.dat \ + neg.dat put_d.dat put_fr.dat put_q.dat put_si.dat \ + put_ui.dat put_z.dat q_div.dat q_sub.dat rec_sqrt.dat \ + sec.dat sech.dat set_d.dat set_flt.dat set_fr.dat set_ld.dat \ + set_q.dat set_si.dat \ + set_ui.dat set_z.dat si_div.dat si_sub.dat sin.dat \ + sinh.dat sqr.dat sqrt.dat sub.dat sub_d.dat sub_fr.dat \ + sub_q.dat sub_si.dat sub_ui.dat sub_z.dat tan.dat \ + tanh.dat ui_div.dat ui_sub.dat union.dat z_div.dat \ + z_sub.dat + +TESTS = $(check_PROGRAMS) +CLEANFILES = io_str.tmp +all: all-am + +.SUFFIXES: +.SUFFIXES: .c .lo .log .o .obj .test .test$(EXEEXT) .trs +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(am__configure_deps) + @for dep in $?; do \ + case '$(am__configure_deps)' in \ + *$$dep*) \ + ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \ + && { if test -f $@; then exit 0; else break; fi; }; \ + exit 1;; \ + esac; \ + done; \ + echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnu tests/Makefile'; \ + $(am__cd) $(top_srcdir) && \ + $(AUTOMAKE) --gnu tests/Makefile +Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status + @case '$?' in \ + *config.status*) \ + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \ + *) \ + echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles)'; \ + cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles);; \ + esac; + +$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh + +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(am__aclocal_m4_deps): + +clean-checkPROGRAMS: + @list='$(check_PROGRAMS)'; test -n "$$list" || exit 0; \ + echo " rm -f" $$list; \ + rm -f $$list || exit $$?; \ + test -n "$(EXEEXT)" || exit 0; \ + list=`for p in $$list; do echo "$$p"; done | sed 's/$(EXEEXT)$$//'`; \ + echo " rm -f" $$list; \ + rm -f $$list + +clean-checkLTLIBRARIES: + -test -z "$(check_LTLIBRARIES)" || rm -f $(check_LTLIBRARIES) + @list='$(check_LTLIBRARIES)'; \ + locs=`for p in $$list; do echo $$p; done | \ + sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \ + sort -u`; \ + test -z "$$locs" || { \ + echo rm -f $${locs}; \ + rm -f $${locs}; \ + } + +libmpfi-tests.la: $(libmpfi_tests_la_OBJECTS) $(libmpfi_tests_la_DEPENDENCIES) $(EXTRA_libmpfi_tests_la_DEPENDENCIES) + $(AM_V_CCLD)$(LINK) $(libmpfi_tests_la_OBJECTS) $(libmpfi_tests_la_LIBADD) $(LIBS) + +tabs$(EXEEXT): $(tabs_OBJECTS) $(tabs_DEPENDENCIES) $(EXTRA_tabs_DEPENDENCIES) + @rm -f tabs$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tabs_OBJECTS) $(tabs_LDADD) $(LIBS) + +tacos$(EXEEXT): $(tacos_OBJECTS) $(tacos_DEPENDENCIES) $(EXTRA_tacos_DEPENDENCIES) + @rm -f tacos$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tacos_OBJECTS) $(tacos_LDADD) $(LIBS) + +tacosh$(EXEEXT): $(tacosh_OBJECTS) $(tacosh_DEPENDENCIES) $(EXTRA_tacosh_DEPENDENCIES) + @rm -f tacosh$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tacosh_OBJECTS) $(tacosh_LDADD) $(LIBS) + +tadd$(EXEEXT): $(tadd_OBJECTS) $(tadd_DEPENDENCIES) $(EXTRA_tadd_DEPENDENCIES) + @rm -f tadd$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_OBJECTS) $(tadd_LDADD) $(LIBS) + +tadd_d$(EXEEXT): $(tadd_d_OBJECTS) $(tadd_d_DEPENDENCIES) $(EXTRA_tadd_d_DEPENDENCIES) + @rm -f tadd_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_d_OBJECTS) $(tadd_d_LDADD) $(LIBS) + +tadd_fr$(EXEEXT): $(tadd_fr_OBJECTS) $(tadd_fr_DEPENDENCIES) $(EXTRA_tadd_fr_DEPENDENCIES) + @rm -f tadd_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_fr_OBJECTS) $(tadd_fr_LDADD) $(LIBS) + +tadd_q$(EXEEXT): $(tadd_q_OBJECTS) $(tadd_q_DEPENDENCIES) $(EXTRA_tadd_q_DEPENDENCIES) + @rm -f tadd_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_q_OBJECTS) $(tadd_q_LDADD) $(LIBS) + +tadd_si$(EXEEXT): $(tadd_si_OBJECTS) $(tadd_si_DEPENDENCIES) $(EXTRA_tadd_si_DEPENDENCIES) + @rm -f tadd_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_si_OBJECTS) $(tadd_si_LDADD) $(LIBS) + +tadd_ui$(EXEEXT): $(tadd_ui_OBJECTS) $(tadd_ui_DEPENDENCIES) $(EXTRA_tadd_ui_DEPENDENCIES) + @rm -f tadd_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_ui_OBJECTS) $(tadd_ui_LDADD) $(LIBS) + +tadd_z$(EXEEXT): $(tadd_z_OBJECTS) $(tadd_z_DEPENDENCIES) $(EXTRA_tadd_z_DEPENDENCIES) + @rm -f tadd_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tadd_z_OBJECTS) $(tadd_z_LDADD) $(LIBS) + +tasin$(EXEEXT): $(tasin_OBJECTS) $(tasin_DEPENDENCIES) $(EXTRA_tasin_DEPENDENCIES) + @rm -f tasin$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tasin_OBJECTS) $(tasin_LDADD) $(LIBS) + +tasinh$(EXEEXT): $(tasinh_OBJECTS) $(tasinh_DEPENDENCIES) $(EXTRA_tasinh_DEPENDENCIES) + @rm -f tasinh$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tasinh_OBJECTS) $(tasinh_LDADD) $(LIBS) + +tatan$(EXEEXT): $(tatan_OBJECTS) $(tatan_DEPENDENCIES) $(EXTRA_tatan_DEPENDENCIES) + @rm -f tatan$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tatan_OBJECTS) $(tatan_LDADD) $(LIBS) + +tatan2$(EXEEXT): $(tatan2_OBJECTS) $(tatan2_DEPENDENCIES) $(EXTRA_tatan2_DEPENDENCIES) + @rm -f tatan2$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tatan2_OBJECTS) $(tatan2_LDADD) $(LIBS) + +tatanh$(EXEEXT): $(tatanh_OBJECTS) $(tatanh_DEPENDENCIES) $(EXTRA_tatanh_DEPENDENCIES) + @rm -f tatanh$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tatanh_OBJECTS) $(tatanh_LDADD) $(LIBS) + +tbisect$(EXEEXT): $(tbisect_OBJECTS) $(tbisect_DEPENDENCIES) $(EXTRA_tbisect_DEPENDENCIES) + @rm -f tbisect$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tbisect_OBJECTS) $(tbisect_LDADD) $(LIBS) + +tblow$(EXEEXT): $(tblow_OBJECTS) $(tblow_DEPENDENCIES) $(EXTRA_tblow_DEPENDENCIES) + @rm -f tblow$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tblow_OBJECTS) $(tblow_LDADD) $(LIBS) + +tbounded_p$(EXEEXT): $(tbounded_p_OBJECTS) $(tbounded_p_DEPENDENCIES) $(EXTRA_tbounded_p_DEPENDENCIES) + @rm -f tbounded_p$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tbounded_p_OBJECTS) $(tbounded_p_LDADD) $(LIBS) + +tcbrt$(EXEEXT): $(tcbrt_OBJECTS) $(tcbrt_DEPENDENCIES) $(EXTRA_tcbrt_DEPENDENCIES) + @rm -f tcbrt$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcbrt_OBJECTS) $(tcbrt_LDADD) $(LIBS) + +tcmp$(EXEEXT): $(tcmp_OBJECTS) $(tcmp_DEPENDENCIES) $(EXTRA_tcmp_DEPENDENCIES) + @rm -f tcmp$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_OBJECTS) $(tcmp_LDADD) $(LIBS) + +tcmp_d$(EXEEXT): $(tcmp_d_OBJECTS) $(tcmp_d_DEPENDENCIES) $(EXTRA_tcmp_d_DEPENDENCIES) + @rm -f tcmp_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_d_OBJECTS) $(tcmp_d_LDADD) $(LIBS) + +tcmp_fr$(EXEEXT): $(tcmp_fr_OBJECTS) $(tcmp_fr_DEPENDENCIES) $(EXTRA_tcmp_fr_DEPENDENCIES) + @rm -f tcmp_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_fr_OBJECTS) $(tcmp_fr_LDADD) $(LIBS) + +tcmp_q$(EXEEXT): $(tcmp_q_OBJECTS) $(tcmp_q_DEPENDENCIES) $(EXTRA_tcmp_q_DEPENDENCIES) + @rm -f tcmp_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_q_OBJECTS) $(tcmp_q_LDADD) $(LIBS) + +tcmp_si$(EXEEXT): $(tcmp_si_OBJECTS) $(tcmp_si_DEPENDENCIES) $(EXTRA_tcmp_si_DEPENDENCIES) + @rm -f tcmp_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_si_OBJECTS) $(tcmp_si_LDADD) $(LIBS) + +tcmp_ui$(EXEEXT): $(tcmp_ui_OBJECTS) $(tcmp_ui_DEPENDENCIES) $(EXTRA_tcmp_ui_DEPENDENCIES) + @rm -f tcmp_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_ui_OBJECTS) $(tcmp_ui_LDADD) $(LIBS) + +tcmp_z$(EXEEXT): $(tcmp_z_OBJECTS) $(tcmp_z_DEPENDENCIES) $(EXTRA_tcmp_z_DEPENDENCIES) + @rm -f tcmp_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcmp_z_OBJECTS) $(tcmp_z_LDADD) $(LIBS) + +tconst_catalan$(EXEEXT): $(tconst_catalan_OBJECTS) $(tconst_catalan_DEPENDENCIES) $(EXTRA_tconst_catalan_DEPENDENCIES) + @rm -f tconst_catalan$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tconst_catalan_OBJECTS) $(tconst_catalan_LDADD) $(LIBS) + +tconst_euler$(EXEEXT): $(tconst_euler_OBJECTS) $(tconst_euler_DEPENDENCIES) $(EXTRA_tconst_euler_DEPENDENCIES) + @rm -f tconst_euler$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tconst_euler_OBJECTS) $(tconst_euler_LDADD) $(LIBS) + +tconst_log2$(EXEEXT): $(tconst_log2_OBJECTS) $(tconst_log2_DEPENDENCIES) $(EXTRA_tconst_log2_DEPENDENCIES) + @rm -f tconst_log2$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tconst_log2_OBJECTS) $(tconst_log2_LDADD) $(LIBS) + +tconst_pi$(EXEEXT): $(tconst_pi_OBJECTS) $(tconst_pi_DEPENDENCIES) $(EXTRA_tconst_pi_DEPENDENCIES) + @rm -f tconst_pi$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tconst_pi_OBJECTS) $(tconst_pi_LDADD) $(LIBS) + +tcos$(EXEEXT): $(tcos_OBJECTS) $(tcos_DEPENDENCIES) $(EXTRA_tcos_DEPENDENCIES) + @rm -f tcos$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcos_OBJECTS) $(tcos_LDADD) $(LIBS) + +tcosh$(EXEEXT): $(tcosh_OBJECTS) $(tcosh_DEPENDENCIES) $(EXTRA_tcosh_DEPENDENCIES) + @rm -f tcosh$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcosh_OBJECTS) $(tcosh_LDADD) $(LIBS) + +tcot$(EXEEXT): $(tcot_OBJECTS) $(tcot_DEPENDENCIES) $(EXTRA_tcot_DEPENDENCIES) + @rm -f tcot$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcot_OBJECTS) $(tcot_LDADD) $(LIBS) + +tcoth$(EXEEXT): $(tcoth_OBJECTS) $(tcoth_DEPENDENCIES) $(EXTRA_tcoth_DEPENDENCIES) + @rm -f tcoth$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcoth_OBJECTS) $(tcoth_LDADD) $(LIBS) + +tcsc$(EXEEXT): $(tcsc_OBJECTS) $(tcsc_DEPENDENCIES) $(EXTRA_tcsc_DEPENDENCIES) + @rm -f tcsc$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcsc_OBJECTS) $(tcsc_LDADD) $(LIBS) + +tcsch$(EXEEXT): $(tcsch_OBJECTS) $(tcsch_DEPENDENCIES) $(EXTRA_tcsch_DEPENDENCIES) + @rm -f tcsch$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tcsch_OBJECTS) $(tcsch_LDADD) $(LIBS) + +td_div$(EXEEXT): $(td_div_OBJECTS) $(td_div_DEPENDENCIES) $(EXTRA_td_div_DEPENDENCIES) + @rm -f td_div$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(td_div_OBJECTS) $(td_div_LDADD) $(LIBS) + +td_sub$(EXEEXT): $(td_sub_OBJECTS) $(td_sub_DEPENDENCIES) $(EXTRA_td_sub_DEPENDENCIES) + @rm -f td_sub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(td_sub_OBJECTS) $(td_sub_LDADD) $(LIBS) + +tdiam$(EXEEXT): $(tdiam_OBJECTS) $(tdiam_DEPENDENCIES) $(EXTRA_tdiam_DEPENDENCIES) + @rm -f tdiam$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiam_OBJECTS) $(tdiam_LDADD) $(LIBS) + +tdiam_abs$(EXEEXT): $(tdiam_abs_OBJECTS) $(tdiam_abs_DEPENDENCIES) $(EXTRA_tdiam_abs_DEPENDENCIES) + @rm -f tdiam_abs$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiam_abs_OBJECTS) $(tdiam_abs_LDADD) $(LIBS) + +tdiam_rel$(EXEEXT): $(tdiam_rel_OBJECTS) $(tdiam_rel_DEPENDENCIES) $(EXTRA_tdiam_rel_DEPENDENCIES) + @rm -f tdiam_rel$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiam_rel_OBJECTS) $(tdiam_rel_LDADD) $(LIBS) + +tdiv$(EXEEXT): $(tdiv_OBJECTS) $(tdiv_DEPENDENCIES) $(EXTRA_tdiv_DEPENDENCIES) + @rm -f tdiv$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_OBJECTS) $(tdiv_LDADD) $(LIBS) + +tdiv_2exp$(EXEEXT): $(tdiv_2exp_OBJECTS) $(tdiv_2exp_DEPENDENCIES) $(EXTRA_tdiv_2exp_DEPENDENCIES) + @rm -f tdiv_2exp$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_2exp_OBJECTS) $(tdiv_2exp_LDADD) $(LIBS) + +tdiv_2si$(EXEEXT): $(tdiv_2si_OBJECTS) $(tdiv_2si_DEPENDENCIES) $(EXTRA_tdiv_2si_DEPENDENCIES) + @rm -f tdiv_2si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_2si_OBJECTS) $(tdiv_2si_LDADD) $(LIBS) + +tdiv_2ui$(EXEEXT): $(tdiv_2ui_OBJECTS) $(tdiv_2ui_DEPENDENCIES) $(EXTRA_tdiv_2ui_DEPENDENCIES) + @rm -f tdiv_2ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_2ui_OBJECTS) $(tdiv_2ui_LDADD) $(LIBS) + +tdiv_d$(EXEEXT): $(tdiv_d_OBJECTS) $(tdiv_d_DEPENDENCIES) $(EXTRA_tdiv_d_DEPENDENCIES) + @rm -f tdiv_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_d_OBJECTS) $(tdiv_d_LDADD) $(LIBS) + +tdiv_ext$(EXEEXT): $(tdiv_ext_OBJECTS) $(tdiv_ext_DEPENDENCIES) $(EXTRA_tdiv_ext_DEPENDENCIES) + @rm -f tdiv_ext$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_ext_OBJECTS) $(tdiv_ext_LDADD) $(LIBS) + +tdiv_fr$(EXEEXT): $(tdiv_fr_OBJECTS) $(tdiv_fr_DEPENDENCIES) $(EXTRA_tdiv_fr_DEPENDENCIES) + @rm -f tdiv_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_fr_OBJECTS) $(tdiv_fr_LDADD) $(LIBS) + +tdiv_q$(EXEEXT): $(tdiv_q_OBJECTS) $(tdiv_q_DEPENDENCIES) $(EXTRA_tdiv_q_DEPENDENCIES) + @rm -f tdiv_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_q_OBJECTS) $(tdiv_q_LDADD) $(LIBS) + +tdiv_si$(EXEEXT): $(tdiv_si_OBJECTS) $(tdiv_si_DEPENDENCIES) $(EXTRA_tdiv_si_DEPENDENCIES) + @rm -f tdiv_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_si_OBJECTS) $(tdiv_si_LDADD) $(LIBS) + +tdiv_ui$(EXEEXT): $(tdiv_ui_OBJECTS) $(tdiv_ui_DEPENDENCIES) $(EXTRA_tdiv_ui_DEPENDENCIES) + @rm -f tdiv_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_ui_OBJECTS) $(tdiv_ui_LDADD) $(LIBS) + +tdiv_z$(EXEEXT): $(tdiv_z_OBJECTS) $(tdiv_z_DEPENDENCIES) $(EXTRA_tdiv_z_DEPENDENCIES) + @rm -f tdiv_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tdiv_z_OBJECTS) $(tdiv_z_LDADD) $(LIBS) + +terror$(EXEEXT): $(terror_OBJECTS) $(terror_DEPENDENCIES) $(EXTRA_terror_DEPENDENCIES) + @rm -f terror$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(terror_OBJECTS) $(terror_LDADD) $(LIBS) + +texp$(EXEEXT): $(texp_OBJECTS) $(texp_DEPENDENCIES) $(EXTRA_texp_DEPENDENCIES) + @rm -f texp$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(texp_OBJECTS) $(texp_LDADD) $(LIBS) + +texp10$(EXEEXT): $(texp10_OBJECTS) $(texp10_DEPENDENCIES) $(EXTRA_texp10_DEPENDENCIES) + @rm -f texp10$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(texp10_OBJECTS) $(texp10_LDADD) $(LIBS) + +texp10m1$(EXEEXT): $(texp10m1_OBJECTS) $(texp10m1_DEPENDENCIES) $(EXTRA_texp10m1_DEPENDENCIES) + @rm -f texp10m1$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(texp10m1_OBJECTS) $(texp10m1_LDADD) $(LIBS) + +texp2$(EXEEXT): $(texp2_OBJECTS) $(texp2_DEPENDENCIES) $(EXTRA_texp2_DEPENDENCIES) + @rm -f texp2$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(texp2_OBJECTS) $(texp2_LDADD) $(LIBS) + +texp2m1$(EXEEXT): $(texp2m1_OBJECTS) $(texp2m1_DEPENDENCIES) $(EXTRA_texp2m1_DEPENDENCIES) + @rm -f texp2m1$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(texp2m1_OBJECTS) $(texp2m1_LDADD) $(LIBS) + +texpm1$(EXEEXT): $(texpm1_OBJECTS) $(texpm1_DEPENDENCIES) $(EXTRA_texpm1_DEPENDENCIES) + @rm -f texpm1$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(texpm1_OBJECTS) $(texpm1_LDADD) $(LIBS) + +tfr_div$(EXEEXT): $(tfr_div_OBJECTS) $(tfr_div_DEPENDENCIES) $(EXTRA_tfr_div_DEPENDENCIES) + @rm -f tfr_div$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tfr_div_OBJECTS) $(tfr_div_LDADD) $(LIBS) + +tfr_sub$(EXEEXT): $(tfr_sub_OBJECTS) $(tfr_sub_DEPENDENCIES) $(EXTRA_tfr_sub_DEPENDENCIES) + @rm -f tfr_sub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tfr_sub_OBJECTS) $(tfr_sub_LDADD) $(LIBS) + +tget_d$(EXEEXT): $(tget_d_OBJECTS) $(tget_d_DEPENDENCIES) $(EXTRA_tget_d_DEPENDENCIES) + @rm -f tget_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tget_d_OBJECTS) $(tget_d_LDADD) $(LIBS) + +tget_endpoints$(EXEEXT): $(tget_endpoints_OBJECTS) $(tget_endpoints_DEPENDENCIES) $(EXTRA_tget_endpoints_DEPENDENCIES) + @rm -f tget_endpoints$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tget_endpoints_OBJECTS) $(tget_endpoints_LDADD) $(LIBS) + +tget_fr$(EXEEXT): $(tget_fr_OBJECTS) $(tget_fr_DEPENDENCIES) $(EXTRA_tget_fr_DEPENDENCIES) + @rm -f tget_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tget_fr_OBJECTS) $(tget_fr_LDADD) $(LIBS) + +tget_version$(EXEEXT): $(tget_version_OBJECTS) $(tget_version_DEPENDENCIES) $(EXTRA_tget_version_DEPENDENCIES) + @rm -f tget_version$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tget_version_OBJECTS) $(tget_version_LDADD) $(LIBS) + +thas_zero$(EXEEXT): $(thas_zero_OBJECTS) $(thas_zero_DEPENDENCIES) $(EXTRA_thas_zero_DEPENDENCIES) + @rm -f thas_zero$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(thas_zero_OBJECTS) $(thas_zero_LDADD) $(LIBS) + +thypot$(EXEEXT): $(thypot_OBJECTS) $(thypot_DEPENDENCIES) $(EXTRA_thypot_DEPENDENCIES) + @rm -f thypot$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(thypot_OBJECTS) $(thypot_LDADD) $(LIBS) + +tincrease$(EXEEXT): $(tincrease_OBJECTS) $(tincrease_DEPENDENCIES) $(EXTRA_tincrease_DEPENDENCIES) + @rm -f tincrease$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tincrease_OBJECTS) $(tincrease_LDADD) $(LIBS) + +tinf_p$(EXEEXT): $(tinf_p_OBJECTS) $(tinf_p_DEPENDENCIES) $(EXTRA_tinf_p_DEPENDENCIES) + @rm -f tinf_p$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinf_p_OBJECTS) $(tinf_p_LDADD) $(LIBS) + +tinit$(EXEEXT): $(tinit_OBJECTS) $(tinit_DEPENDENCIES) $(EXTRA_tinit_DEPENDENCIES) + @rm -f tinit$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinit_OBJECTS) $(tinit_LDADD) $(LIBS) + +tinit_set$(EXEEXT): $(tinit_set_OBJECTS) $(tinit_set_DEPENDENCIES) $(EXTRA_tinit_set_DEPENDENCIES) + @rm -f tinit_set$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinit_set_OBJECTS) $(tinit_set_LDADD) $(LIBS) + +tinits$(EXEEXT): $(tinits_OBJECTS) $(tinits_DEPENDENCIES) $(EXTRA_tinits_DEPENDENCIES) + @rm -f tinits$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinits_OBJECTS) $(tinits_LDADD) $(LIBS) + +tintersect$(EXEEXT): $(tintersect_OBJECTS) $(tintersect_DEPENDENCIES) $(EXTRA_tintersect_DEPENDENCIES) + @rm -f tintersect$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tintersect_OBJECTS) $(tintersect_LDADD) $(LIBS) + +tinterv_d$(EXEEXT): $(tinterv_d_OBJECTS) $(tinterv_d_DEPENDENCIES) $(EXTRA_tinterv_d_DEPENDENCIES) + @rm -f tinterv_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinterv_d_OBJECTS) $(tinterv_d_LDADD) $(LIBS) + +tinterv_fr$(EXEEXT): $(tinterv_fr_OBJECTS) $(tinterv_fr_DEPENDENCIES) $(EXTRA_tinterv_fr_DEPENDENCIES) + @rm -f tinterv_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinterv_fr_OBJECTS) $(tinterv_fr_LDADD) $(LIBS) + +tinterv_q$(EXEEXT): $(tinterv_q_OBJECTS) $(tinterv_q_DEPENDENCIES) $(EXTRA_tinterv_q_DEPENDENCIES) + @rm -f tinterv_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinterv_q_OBJECTS) $(tinterv_q_LDADD) $(LIBS) + +tinterv_si$(EXEEXT): $(tinterv_si_OBJECTS) $(tinterv_si_DEPENDENCIES) $(EXTRA_tinterv_si_DEPENDENCIES) + @rm -f tinterv_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinterv_si_OBJECTS) $(tinterv_si_LDADD) $(LIBS) + +tinterv_ui$(EXEEXT): $(tinterv_ui_OBJECTS) $(tinterv_ui_DEPENDENCIES) $(EXTRA_tinterv_ui_DEPENDENCIES) + @rm -f tinterv_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinterv_ui_OBJECTS) $(tinterv_ui_LDADD) $(LIBS) + +tinterv_z$(EXEEXT): $(tinterv_z_OBJECTS) $(tinterv_z_DEPENDENCIES) $(EXTRA_tinterv_z_DEPENDENCIES) + @rm -f tinterv_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinterv_z_OBJECTS) $(tinterv_z_LDADD) $(LIBS) + +tinv$(EXEEXT): $(tinv_OBJECTS) $(tinv_DEPENDENCIES) $(EXTRA_tinv_DEPENDENCIES) + @rm -f tinv$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tinv_OBJECTS) $(tinv_LDADD) $(LIBS) + +tio_str$(EXEEXT): $(tio_str_OBJECTS) $(tio_str_DEPENDENCIES) $(EXTRA_tio_str_DEPENDENCIES) + @rm -f tio_str$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tio_str_OBJECTS) $(tio_str_LDADD) $(LIBS) + +tis_empty$(EXEEXT): $(tis_empty_OBJECTS) $(tis_empty_DEPENDENCIES) $(EXTRA_tis_empty_DEPENDENCIES) + @rm -f tis_empty$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_empty_OBJECTS) $(tis_empty_LDADD) $(LIBS) + +tis_inside$(EXEEXT): $(tis_inside_OBJECTS) $(tis_inside_DEPENDENCIES) $(EXTRA_tis_inside_DEPENDENCIES) + @rm -f tis_inside$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_OBJECTS) $(tis_inside_LDADD) $(LIBS) + +tis_inside_d$(EXEEXT): $(tis_inside_d_OBJECTS) $(tis_inside_d_DEPENDENCIES) $(EXTRA_tis_inside_d_DEPENDENCIES) + @rm -f tis_inside_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_d_OBJECTS) $(tis_inside_d_LDADD) $(LIBS) + +tis_inside_fr$(EXEEXT): $(tis_inside_fr_OBJECTS) $(tis_inside_fr_DEPENDENCIES) $(EXTRA_tis_inside_fr_DEPENDENCIES) + @rm -f tis_inside_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_fr_OBJECTS) $(tis_inside_fr_LDADD) $(LIBS) + +tis_inside_q$(EXEEXT): $(tis_inside_q_OBJECTS) $(tis_inside_q_DEPENDENCIES) $(EXTRA_tis_inside_q_DEPENDENCIES) + @rm -f tis_inside_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_q_OBJECTS) $(tis_inside_q_LDADD) $(LIBS) + +tis_inside_si$(EXEEXT): $(tis_inside_si_OBJECTS) $(tis_inside_si_DEPENDENCIES) $(EXTRA_tis_inside_si_DEPENDENCIES) + @rm -f tis_inside_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_si_OBJECTS) $(tis_inside_si_LDADD) $(LIBS) + +tis_inside_ui$(EXEEXT): $(tis_inside_ui_OBJECTS) $(tis_inside_ui_DEPENDENCIES) $(EXTRA_tis_inside_ui_DEPENDENCIES) + @rm -f tis_inside_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_ui_OBJECTS) $(tis_inside_ui_LDADD) $(LIBS) + +tis_inside_z$(EXEEXT): $(tis_inside_z_OBJECTS) $(tis_inside_z_DEPENDENCIES) $(EXTRA_tis_inside_z_DEPENDENCIES) + @rm -f tis_inside_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_inside_z_OBJECTS) $(tis_inside_z_LDADD) $(LIBS) + +tis_neg$(EXEEXT): $(tis_neg_OBJECTS) $(tis_neg_DEPENDENCIES) $(EXTRA_tis_neg_DEPENDENCIES) + @rm -f tis_neg$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_neg_OBJECTS) $(tis_neg_LDADD) $(LIBS) + +tis_nonneg$(EXEEXT): $(tis_nonneg_OBJECTS) $(tis_nonneg_DEPENDENCIES) $(EXTRA_tis_nonneg_DEPENDENCIES) + @rm -f tis_nonneg$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_nonneg_OBJECTS) $(tis_nonneg_LDADD) $(LIBS) + +tis_nonpos$(EXEEXT): $(tis_nonpos_OBJECTS) $(tis_nonpos_DEPENDENCIES) $(EXTRA_tis_nonpos_DEPENDENCIES) + @rm -f tis_nonpos$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_nonpos_OBJECTS) $(tis_nonpos_LDADD) $(LIBS) + +tis_pos$(EXEEXT): $(tis_pos_OBJECTS) $(tis_pos_DEPENDENCIES) $(EXTRA_tis_pos_DEPENDENCIES) + @rm -f tis_pos$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_pos_OBJECTS) $(tis_pos_LDADD) $(LIBS) + +tis_strictly_inside$(EXEEXT): $(tis_strictly_inside_OBJECTS) $(tis_strictly_inside_DEPENDENCIES) $(EXTRA_tis_strictly_inside_DEPENDENCIES) + @rm -f tis_strictly_inside$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_strictly_inside_OBJECTS) $(tis_strictly_inside_LDADD) $(LIBS) + +tis_strictly_neg$(EXEEXT): $(tis_strictly_neg_OBJECTS) $(tis_strictly_neg_DEPENDENCIES) $(EXTRA_tis_strictly_neg_DEPENDENCIES) + @rm -f tis_strictly_neg$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_strictly_neg_OBJECTS) $(tis_strictly_neg_LDADD) $(LIBS) + +tis_strictly_pos$(EXEEXT): $(tis_strictly_pos_OBJECTS) $(tis_strictly_pos_DEPENDENCIES) $(EXTRA_tis_strictly_pos_DEPENDENCIES) + @rm -f tis_strictly_pos$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_strictly_pos_OBJECTS) $(tis_strictly_pos_LDADD) $(LIBS) + +tis_zero$(EXEEXT): $(tis_zero_OBJECTS) $(tis_zero_DEPENDENCIES) $(EXTRA_tis_zero_DEPENDENCIES) + @rm -f tis_zero$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tis_zero_OBJECTS) $(tis_zero_LDADD) $(LIBS) + +tlog$(EXEEXT): $(tlog_OBJECTS) $(tlog_DEPENDENCIES) $(EXTRA_tlog_DEPENDENCIES) + @rm -f tlog$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tlog_OBJECTS) $(tlog_LDADD) $(LIBS) + +tlog10$(EXEEXT): $(tlog10_OBJECTS) $(tlog10_DEPENDENCIES) $(EXTRA_tlog10_DEPENDENCIES) + @rm -f tlog10$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tlog10_OBJECTS) $(tlog10_LDADD) $(LIBS) + +tlog1p$(EXEEXT): $(tlog1p_OBJECTS) $(tlog1p_DEPENDENCIES) $(EXTRA_tlog1p_DEPENDENCIES) + @rm -f tlog1p$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tlog1p_OBJECTS) $(tlog1p_LDADD) $(LIBS) + +tlog2$(EXEEXT): $(tlog2_OBJECTS) $(tlog2_DEPENDENCIES) $(EXTRA_tlog2_DEPENDENCIES) + @rm -f tlog2$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tlog2_OBJECTS) $(tlog2_LDADD) $(LIBS) + +tmag$(EXEEXT): $(tmag_OBJECTS) $(tmag_DEPENDENCIES) $(EXTRA_tmag_DEPENDENCIES) + @rm -f tmag$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmag_OBJECTS) $(tmag_LDADD) $(LIBS) + +tmid$(EXEEXT): $(tmid_OBJECTS) $(tmid_DEPENDENCIES) $(EXTRA_tmid_DEPENDENCIES) + @rm -f tmid$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmid_OBJECTS) $(tmid_LDADD) $(LIBS) + +tmig$(EXEEXT): $(tmig_OBJECTS) $(tmig_DEPENDENCIES) $(EXTRA_tmig_DEPENDENCIES) + @rm -f tmig$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmig_OBJECTS) $(tmig_LDADD) $(LIBS) + +tmul$(EXEEXT): $(tmul_OBJECTS) $(tmul_DEPENDENCIES) $(EXTRA_tmul_DEPENDENCIES) + @rm -f tmul$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_OBJECTS) $(tmul_LDADD) $(LIBS) + +tmul_2exp$(EXEEXT): $(tmul_2exp_OBJECTS) $(tmul_2exp_DEPENDENCIES) $(EXTRA_tmul_2exp_DEPENDENCIES) + @rm -f tmul_2exp$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_2exp_OBJECTS) $(tmul_2exp_LDADD) $(LIBS) + +tmul_2si$(EXEEXT): $(tmul_2si_OBJECTS) $(tmul_2si_DEPENDENCIES) $(EXTRA_tmul_2si_DEPENDENCIES) + @rm -f tmul_2si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_2si_OBJECTS) $(tmul_2si_LDADD) $(LIBS) + +tmul_2ui$(EXEEXT): $(tmul_2ui_OBJECTS) $(tmul_2ui_DEPENDENCIES) $(EXTRA_tmul_2ui_DEPENDENCIES) + @rm -f tmul_2ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_2ui_OBJECTS) $(tmul_2ui_LDADD) $(LIBS) + +tmul_d$(EXEEXT): $(tmul_d_OBJECTS) $(tmul_d_DEPENDENCIES) $(EXTRA_tmul_d_DEPENDENCIES) + @rm -f tmul_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_d_OBJECTS) $(tmul_d_LDADD) $(LIBS) + +tmul_fr$(EXEEXT): $(tmul_fr_OBJECTS) $(tmul_fr_DEPENDENCIES) $(EXTRA_tmul_fr_DEPENDENCIES) + @rm -f tmul_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_fr_OBJECTS) $(tmul_fr_LDADD) $(LIBS) + +tmul_q$(EXEEXT): $(tmul_q_OBJECTS) $(tmul_q_DEPENDENCIES) $(EXTRA_tmul_q_DEPENDENCIES) + @rm -f tmul_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_q_OBJECTS) $(tmul_q_LDADD) $(LIBS) + +tmul_si$(EXEEXT): $(tmul_si_OBJECTS) $(tmul_si_DEPENDENCIES) $(EXTRA_tmul_si_DEPENDENCIES) + @rm -f tmul_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_si_OBJECTS) $(tmul_si_LDADD) $(LIBS) + +tmul_ui$(EXEEXT): $(tmul_ui_OBJECTS) $(tmul_ui_DEPENDENCIES) $(EXTRA_tmul_ui_DEPENDENCIES) + @rm -f tmul_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_ui_OBJECTS) $(tmul_ui_LDADD) $(LIBS) + +tmul_z$(EXEEXT): $(tmul_z_OBJECTS) $(tmul_z_DEPENDENCIES) $(EXTRA_tmul_z_DEPENDENCIES) + @rm -f tmul_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tmul_z_OBJECTS) $(tmul_z_LDADD) $(LIBS) + +tnan_p$(EXEEXT): $(tnan_p_OBJECTS) $(tnan_p_DEPENDENCIES) $(EXTRA_tnan_p_DEPENDENCIES) + @rm -f tnan_p$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tnan_p_OBJECTS) $(tnan_p_LDADD) $(LIBS) + +tneg$(EXEEXT): $(tneg_OBJECTS) $(tneg_DEPENDENCIES) $(EXTRA_tneg_DEPENDENCIES) + @rm -f tneg$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tneg_OBJECTS) $(tneg_LDADD) $(LIBS) + +tput_d$(EXEEXT): $(tput_d_OBJECTS) $(tput_d_DEPENDENCIES) $(EXTRA_tput_d_DEPENDENCIES) + @rm -f tput_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tput_d_OBJECTS) $(tput_d_LDADD) $(LIBS) + +tput_fr$(EXEEXT): $(tput_fr_OBJECTS) $(tput_fr_DEPENDENCIES) $(EXTRA_tput_fr_DEPENDENCIES) + @rm -f tput_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tput_fr_OBJECTS) $(tput_fr_LDADD) $(LIBS) + +tput_q$(EXEEXT): $(tput_q_OBJECTS) $(tput_q_DEPENDENCIES) $(EXTRA_tput_q_DEPENDENCIES) + @rm -f tput_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tput_q_OBJECTS) $(tput_q_LDADD) $(LIBS) + +tput_si$(EXEEXT): $(tput_si_OBJECTS) $(tput_si_DEPENDENCIES) $(EXTRA_tput_si_DEPENDENCIES) + @rm -f tput_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tput_si_OBJECTS) $(tput_si_LDADD) $(LIBS) + +tput_ui$(EXEEXT): $(tput_ui_OBJECTS) $(tput_ui_DEPENDENCIES) $(EXTRA_tput_ui_DEPENDENCIES) + @rm -f tput_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tput_ui_OBJECTS) $(tput_ui_LDADD) $(LIBS) + +tput_z$(EXEEXT): $(tput_z_OBJECTS) $(tput_z_DEPENDENCIES) $(EXTRA_tput_z_DEPENDENCIES) + @rm -f tput_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tput_z_OBJECTS) $(tput_z_LDADD) $(LIBS) + +tq_div$(EXEEXT): $(tq_div_OBJECTS) $(tq_div_DEPENDENCIES) $(EXTRA_tq_div_DEPENDENCIES) + @rm -f tq_div$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tq_div_OBJECTS) $(tq_div_LDADD) $(LIBS) + +tq_sub$(EXEEXT): $(tq_sub_OBJECTS) $(tq_sub_DEPENDENCIES) $(EXTRA_tq_sub_DEPENDENCIES) + @rm -f tq_sub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tq_sub_OBJECTS) $(tq_sub_LDADD) $(LIBS) + +trec_sqrt$(EXEEXT): $(trec_sqrt_OBJECTS) $(trec_sqrt_DEPENDENCIES) $(EXTRA_trec_sqrt_DEPENDENCIES) + @rm -f trec_sqrt$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(trec_sqrt_OBJECTS) $(trec_sqrt_LDADD) $(LIBS) + +tround_prec$(EXEEXT): $(tround_prec_OBJECTS) $(tround_prec_DEPENDENCIES) $(EXTRA_tround_prec_DEPENDENCIES) + @rm -f tround_prec$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tround_prec_OBJECTS) $(tround_prec_LDADD) $(LIBS) + +tsec$(EXEEXT): $(tsec_OBJECTS) $(tsec_DEPENDENCIES) $(EXTRA_tsec_DEPENDENCIES) + @rm -f tsec$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsec_OBJECTS) $(tsec_LDADD) $(LIBS) + +tsech$(EXEEXT): $(tsech_OBJECTS) $(tsech_DEPENDENCIES) $(EXTRA_tsech_DEPENDENCIES) + @rm -f tsech$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsech_OBJECTS) $(tsech_LDADD) $(LIBS) + +tset$(EXEEXT): $(tset_OBJECTS) $(tset_DEPENDENCIES) $(EXTRA_tset_DEPENDENCIES) + @rm -f tset$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_OBJECTS) $(tset_LDADD) $(LIBS) + +tset_d$(EXEEXT): $(tset_d_OBJECTS) $(tset_d_DEPENDENCIES) $(EXTRA_tset_d_DEPENDENCIES) + @rm -f tset_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_d_OBJECTS) $(tset_d_LDADD) $(LIBS) + +tset_flt$(EXEEXT): $(tset_flt_OBJECTS) $(tset_flt_DEPENDENCIES) $(EXTRA_tset_flt_DEPENDENCIES) + @rm -f tset_flt$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_flt_OBJECTS) $(tset_flt_LDADD) $(LIBS) + +tset_fr$(EXEEXT): $(tset_fr_OBJECTS) $(tset_fr_DEPENDENCIES) $(EXTRA_tset_fr_DEPENDENCIES) + @rm -f tset_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_fr_OBJECTS) $(tset_fr_LDADD) $(LIBS) + +tset_ld$(EXEEXT): $(tset_ld_OBJECTS) $(tset_ld_DEPENDENCIES) $(EXTRA_tset_ld_DEPENDENCIES) + @rm -f tset_ld$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_ld_OBJECTS) $(tset_ld_LDADD) $(LIBS) + +tset_q$(EXEEXT): $(tset_q_OBJECTS) $(tset_q_DEPENDENCIES) $(EXTRA_tset_q_DEPENDENCIES) + @rm -f tset_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_q_OBJECTS) $(tset_q_LDADD) $(LIBS) + +tset_si$(EXEEXT): $(tset_si_OBJECTS) $(tset_si_DEPENDENCIES) $(EXTRA_tset_si_DEPENDENCIES) + @rm -f tset_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_si_OBJECTS) $(tset_si_LDADD) $(LIBS) + +tset_str$(EXEEXT): $(tset_str_OBJECTS) $(tset_str_DEPENDENCIES) $(EXTRA_tset_str_DEPENDENCIES) + @rm -f tset_str$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_str_OBJECTS) $(tset_str_LDADD) $(LIBS) + +tset_ui$(EXEEXT): $(tset_ui_OBJECTS) $(tset_ui_DEPENDENCIES) $(EXTRA_tset_ui_DEPENDENCIES) + @rm -f tset_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_ui_OBJECTS) $(tset_ui_LDADD) $(LIBS) + +tset_z$(EXEEXT): $(tset_z_OBJECTS) $(tset_z_DEPENDENCIES) $(EXTRA_tset_z_DEPENDENCIES) + @rm -f tset_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tset_z_OBJECTS) $(tset_z_LDADD) $(LIBS) + +tsi_div$(EXEEXT): $(tsi_div_OBJECTS) $(tsi_div_DEPENDENCIES) $(EXTRA_tsi_div_DEPENDENCIES) + @rm -f tsi_div$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsi_div_OBJECTS) $(tsi_div_LDADD) $(LIBS) + +tsi_sub$(EXEEXT): $(tsi_sub_OBJECTS) $(tsi_sub_DEPENDENCIES) $(EXTRA_tsi_sub_DEPENDENCIES) + @rm -f tsi_sub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsi_sub_OBJECTS) $(tsi_sub_LDADD) $(LIBS) + +tsin$(EXEEXT): $(tsin_OBJECTS) $(tsin_DEPENDENCIES) $(EXTRA_tsin_DEPENDENCIES) + @rm -f tsin$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsin_OBJECTS) $(tsin_LDADD) $(LIBS) + +tsinh$(EXEEXT): $(tsinh_OBJECTS) $(tsinh_DEPENDENCIES) $(EXTRA_tsinh_DEPENDENCIES) + @rm -f tsinh$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsinh_OBJECTS) $(tsinh_LDADD) $(LIBS) + +tsqr$(EXEEXT): $(tsqr_OBJECTS) $(tsqr_DEPENDENCIES) $(EXTRA_tsqr_DEPENDENCIES) + @rm -f tsqr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsqr_OBJECTS) $(tsqr_LDADD) $(LIBS) + +tsqrt$(EXEEXT): $(tsqrt_OBJECTS) $(tsqrt_DEPENDENCIES) $(EXTRA_tsqrt_DEPENDENCIES) + @rm -f tsqrt$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsqrt_OBJECTS) $(tsqrt_LDADD) $(LIBS) + +tsub$(EXEEXT): $(tsub_OBJECTS) $(tsub_DEPENDENCIES) $(EXTRA_tsub_DEPENDENCIES) + @rm -f tsub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_OBJECTS) $(tsub_LDADD) $(LIBS) + +tsub_d$(EXEEXT): $(tsub_d_OBJECTS) $(tsub_d_DEPENDENCIES) $(EXTRA_tsub_d_DEPENDENCIES) + @rm -f tsub_d$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_d_OBJECTS) $(tsub_d_LDADD) $(LIBS) + +tsub_fr$(EXEEXT): $(tsub_fr_OBJECTS) $(tsub_fr_DEPENDENCIES) $(EXTRA_tsub_fr_DEPENDENCIES) + @rm -f tsub_fr$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_fr_OBJECTS) $(tsub_fr_LDADD) $(LIBS) + +tsub_q$(EXEEXT): $(tsub_q_OBJECTS) $(tsub_q_DEPENDENCIES) $(EXTRA_tsub_q_DEPENDENCIES) + @rm -f tsub_q$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_q_OBJECTS) $(tsub_q_LDADD) $(LIBS) + +tsub_si$(EXEEXT): $(tsub_si_OBJECTS) $(tsub_si_DEPENDENCIES) $(EXTRA_tsub_si_DEPENDENCIES) + @rm -f tsub_si$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_si_OBJECTS) $(tsub_si_LDADD) $(LIBS) + +tsub_ui$(EXEEXT): $(tsub_ui_OBJECTS) $(tsub_ui_DEPENDENCIES) $(EXTRA_tsub_ui_DEPENDENCIES) + @rm -f tsub_ui$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_ui_OBJECTS) $(tsub_ui_LDADD) $(LIBS) + +tsub_z$(EXEEXT): $(tsub_z_OBJECTS) $(tsub_z_DEPENDENCIES) $(EXTRA_tsub_z_DEPENDENCIES) + @rm -f tsub_z$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tsub_z_OBJECTS) $(tsub_z_LDADD) $(LIBS) + +tswap$(EXEEXT): $(tswap_OBJECTS) $(tswap_DEPENDENCIES) $(EXTRA_tswap_DEPENDENCIES) + @rm -f tswap$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tswap_OBJECTS) $(tswap_LDADD) $(LIBS) + +ttan$(EXEEXT): $(ttan_OBJECTS) $(ttan_DEPENDENCIES) $(EXTRA_ttan_DEPENDENCIES) + @rm -f ttan$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(ttan_OBJECTS) $(ttan_LDADD) $(LIBS) + +ttanh$(EXEEXT): $(ttanh_OBJECTS) $(ttanh_DEPENDENCIES) $(EXTRA_ttanh_DEPENDENCIES) + @rm -f ttanh$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(ttanh_OBJECTS) $(ttanh_LDADD) $(LIBS) + +tui_div$(EXEEXT): $(tui_div_OBJECTS) $(tui_div_DEPENDENCIES) $(EXTRA_tui_div_DEPENDENCIES) + @rm -f tui_div$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tui_div_OBJECTS) $(tui_div_LDADD) $(LIBS) + +tui_sub$(EXEEXT): $(tui_sub_OBJECTS) $(tui_sub_DEPENDENCIES) $(EXTRA_tui_sub_DEPENDENCIES) + @rm -f tui_sub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tui_sub_OBJECTS) $(tui_sub_LDADD) $(LIBS) + +tunion$(EXEEXT): $(tunion_OBJECTS) $(tunion_DEPENDENCIES) $(EXTRA_tunion_DEPENDENCIES) + @rm -f tunion$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tunion_OBJECTS) $(tunion_LDADD) $(LIBS) + +tz_div$(EXEEXT): $(tz_div_OBJECTS) $(tz_div_DEPENDENCIES) $(EXTRA_tz_div_DEPENDENCIES) + @rm -f tz_div$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tz_div_OBJECTS) $(tz_div_LDADD) $(LIBS) + +tz_sub$(EXEEXT): $(tz_sub_OBJECTS) $(tz_sub_DEPENDENCIES) $(EXTRA_tz_sub_DEPENDENCIES) + @rm -f tz_sub$(EXEEXT) + $(AM_V_CCLD)$(LINK) $(tz_sub_OBJECTS) $(tz_sub_LDADD) $(LIBS) + +mostlyclean-compile: + -rm -f *.$(OBJEXT) + +distclean-compile: + -rm -f *.tab.c + +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/check_data.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mpfi-tests.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/random.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/read_data.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tabs.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tacos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tacosh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tadd_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tasin.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tasinh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tatan.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tatan2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tatanh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tbisect.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tblow.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tbounded_p.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcbrt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcmp_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tconst_catalan.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tconst_euler.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tconst_log2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tconst_pi.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcosh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcot.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcoth.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcsc.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcsch.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/td_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/td_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiam.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiam_abs.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiam_rel.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_2exp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_2si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_2ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_ext.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tdiv_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/terror.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/texp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/texp10.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/texp10m1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/texp2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/texp2m1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/texpm1.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tfr_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tfr_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tget_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tget_endpoints.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tget_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tget_version.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/thas_zero.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/thypot.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tincrease.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinf_p.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinit.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinit_set.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinits.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tintersect.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinterv_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinterv_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinterv_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinterv_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinterv_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinterv_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tinv.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tio_str.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_empty.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_inside_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_neg.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_nonneg.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_nonpos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_pos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_strictly_inside.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_strictly_neg.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_strictly_pos.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tis_zero.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tlog.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tlog10.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tlog1p.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tlog2.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmag.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmid.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmig.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_2exp.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_2si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_2ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tmul_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tnan_p.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tneg.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tput_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tput_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tput_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tput_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tput_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tput_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tq_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tq_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/trec_sqrt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tround_prec.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsec.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsech.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_flt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_ld.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_str.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tset_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsi_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsi_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsin.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsinh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsqr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsqrt.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub_d.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub_fr.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub_q.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub_si.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub_ui.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tsub_z.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tswap.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/ttan.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/ttanh.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tui_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tui_sub.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tunion.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_i.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_id.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_idi.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_if.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_ii.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iid.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iii.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iiii.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iiq.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iir.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iis.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iiu.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iiz.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_il.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iq.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iqi.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_ir.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iri.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_is.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_isi.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iu.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iui.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_iz.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_izi.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/type_ri.Plo@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tz_div.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tz_sub.Po@am__quote@ # am--include-marker + +$(am__depfiles_remade): + @$(MKDIR_P) $(@D) + @echo '# dummy' >$@-t && $(am__mv) $@-t $@ + +am--depfiles: $(am__depfiles_remade) + +.c.o: +@am__fastdepCC_TRUE@ $(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $< +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ $< + +.c.obj: +@am__fastdepCC_TRUE@ $(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ `$(CYGPATH_W) '$<'` +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ `$(CYGPATH_W) '$<'` + +.c.lo: +@am__fastdepCC_TRUE@ $(AM_V_CC)$(LTCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $< +@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Plo +@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@ +@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ +@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $< + +mostlyclean-libtool: + -rm -f *.lo + +clean-libtool: + -rm -rf .libs _libs + +ID: $(am__tagged_files) + $(am__define_uniq_tagged_files); mkid -fID $$unique +tags: tags-am +TAGS: tags + +tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) + set x; \ + here=`pwd`; \ + $(am__define_uniq_tagged_files); \ + shift; \ + if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \ + test -n "$$unique" || unique=$$empty_fix; \ + if test $$# -gt 0; then \ + $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ + "$$@" $$unique; \ + else \ + $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ + $$unique; \ + fi; \ + fi +ctags: ctags-am + +CTAGS: ctags +ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) + $(am__define_uniq_tagged_files); \ + test -z "$(CTAGS_ARGS)$$unique" \ + || $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \ + $$unique + +GTAGS: + here=`$(am__cd) $(top_builddir) && pwd` \ + && $(am__cd) $(top_srcdir) \ + && gtags -i $(GTAGS_ARGS) "$$here" +cscopelist: cscopelist-am + +cscopelist-am: $(am__tagged_files) + list='$(am__tagged_files)'; \ + case "$(srcdir)" in \ + [\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \ + *) sdir=$(subdir)/$(srcdir) ;; \ + esac; \ + for i in $$list; do \ + if test -f "$$i"; then \ + echo "$(subdir)/$$i"; \ + else \ + echo "$$sdir/$$i"; \ + fi; \ + done >> $(top_builddir)/cscope.files + +distclean-tags: + -rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags + +# Recover from deleted '.trs' file; this should ensure that +# "rm -f foo.log; make foo.trs" re-run 'foo.test', and re-create +# both 'foo.log' and 'foo.trs'. Break the recipe in two subshells +# to avoid problems with "make -n". +.log.trs: + rm -f $< $@ + $(MAKE) $(AM_MAKEFLAGS) $< + +# Leading 'am--fnord' is there to ensure the list of targets does not +# expand to empty, as could happen e.g. with make check TESTS=''. +am--fnord $(TEST_LOGS) $(TEST_LOGS:.log=.trs): $(am__force_recheck) +am--force-recheck: + @: + +$(TEST_SUITE_LOG): $(TEST_LOGS) + @$(am__set_TESTS_bases); \ + am__f_ok () { test -f "$$1" && test -r "$$1"; }; \ + redo_bases=`for i in $$bases; do \ + am__f_ok $$i.trs && am__f_ok $$i.log || echo $$i; \ + done`; \ + if test -n "$$redo_bases"; then \ + redo_logs=`for i in $$redo_bases; do echo $$i.log; done`; \ + redo_results=`for i in $$redo_bases; do echo $$i.trs; done`; \ + if $(am__make_dryrun); then :; else \ + rm -f $$redo_logs && rm -f $$redo_results || exit 1; \ + fi; \ + fi; \ + if test -n "$$am__remaking_logs"; then \ + echo "fatal: making $(TEST_SUITE_LOG): possible infinite" \ + "recursion detected" >&2; \ + elif test -n "$$redo_logs"; then \ + am__remaking_logs=yes $(MAKE) $(AM_MAKEFLAGS) $$redo_logs; \ + fi; \ + if $(am__make_dryrun); then :; else \ + st=0; \ + errmsg="fatal: making $(TEST_SUITE_LOG): failed to create"; \ + for i in $$redo_bases; do \ + test -f $$i.trs && test -r $$i.trs \ + || { echo "$$errmsg $$i.trs" >&2; st=1; }; \ + test -f $$i.log && test -r $$i.log \ + || { echo "$$errmsg $$i.log" >&2; st=1; }; \ + done; \ + test $$st -eq 0 || exit 1; \ + fi + @$(am__sh_e_setup); $(am__tty_colors); $(am__set_TESTS_bases); \ + ws='[ ]'; \ + results=`for b in $$bases; do echo $$b.trs; done`; \ + test -n "$$results" || results=/dev/null; \ + all=` grep "^$$ws*:test-result:" $$results | wc -l`; \ + pass=` grep "^$$ws*:test-result:$$ws*PASS" $$results | wc -l`; \ + fail=` grep "^$$ws*:test-result:$$ws*FAIL" $$results | wc -l`; \ + skip=` grep "^$$ws*:test-result:$$ws*SKIP" $$results | wc -l`; \ + xfail=`grep "^$$ws*:test-result:$$ws*XFAIL" $$results | wc -l`; \ + xpass=`grep "^$$ws*:test-result:$$ws*XPASS" $$results | wc -l`; \ + error=`grep "^$$ws*:test-result:$$ws*ERROR" $$results | wc -l`; \ + if test `expr $$fail + $$xpass + $$error` -eq 0; then \ + success=true; \ + else \ + success=false; \ + fi; \ + br='==================='; br=$$br$$br$$br$$br; \ + result_count () \ + { \ + if test x"$$1" = x"--maybe-color"; then \ + maybe_colorize=yes; \ + elif test x"$$1" = x"--no-color"; then \ + maybe_colorize=no; \ + else \ + echo "$@: invalid 'result_count' usage" >&2; exit 4; \ + fi; \ + shift; \ + desc=$$1 count=$$2; \ + if test $$maybe_colorize = yes && test $$count -gt 0; then \ + color_start=$$3 color_end=$$std; \ + else \ + color_start= color_end=; \ + fi; \ + echo "$${color_start}# $$desc $$count$${color_end}"; \ + }; \ + create_testsuite_report () \ + { \ + result_count $$1 "TOTAL:" $$all "$$brg"; \ + result_count $$1 "PASS: " $$pass "$$grn"; \ + result_count $$1 "SKIP: " $$skip "$$blu"; \ + result_count $$1 "XFAIL:" $$xfail "$$lgn"; \ + result_count $$1 "FAIL: " $$fail "$$red"; \ + result_count $$1 "XPASS:" $$xpass "$$red"; \ + result_count $$1 "ERROR:" $$error "$$mgn"; \ + }; \ + { \ + echo "$(PACKAGE_STRING): $(subdir)/$(TEST_SUITE_LOG)" | \ + $(am__rst_title); \ + create_testsuite_report --no-color; \ + echo; \ + echo ".. contents:: :depth: 2"; \ + echo; \ + for b in $$bases; do echo $$b; done \ + | $(am__create_global_log); \ + } >$(TEST_SUITE_LOG).tmp || exit 1; \ + mv $(TEST_SUITE_LOG).tmp $(TEST_SUITE_LOG); \ + if $$success; then \ + col="$$grn"; \ + else \ + col="$$red"; \ + test x"$$VERBOSE" = x || cat $(TEST_SUITE_LOG); \ + fi; \ + echo "$${col}$$br$${std}"; \ + echo "$${col}Testsuite summary"$(AM_TESTSUITE_SUMMARY_HEADER)"$${std}"; \ + echo "$${col}$$br$${std}"; \ + create_testsuite_report --maybe-color; \ + echo "$$col$$br$$std"; \ + if $$success; then :; else \ + echo "$${col}See $(subdir)/$(TEST_SUITE_LOG)$${std}"; \ + if test -n "$(PACKAGE_BUGREPORT)"; then \ + echo "$${col}Please report to $(PACKAGE_BUGREPORT)$${std}"; \ + fi; \ + echo "$$col$$br$$std"; \ + fi; \ + $$success || exit 1 + +check-TESTS: $(check_PROGRAMS) $(check_LTLIBRARIES) + @list='$(RECHECK_LOGS)'; test -z "$$list" || rm -f $$list + @list='$(RECHECK_LOGS:.log=.trs)'; test -z "$$list" || rm -f $$list + @test -z "$(TEST_SUITE_LOG)" || rm -f $(TEST_SUITE_LOG) + @set +e; $(am__set_TESTS_bases); \ + log_list=`for i in $$bases; do echo $$i.log; done`; \ + trs_list=`for i in $$bases; do echo $$i.trs; done`; \ + log_list=`echo $$log_list`; trs_list=`echo $$trs_list`; \ + $(MAKE) $(AM_MAKEFLAGS) $(TEST_SUITE_LOG) TEST_LOGS="$$log_list"; \ + exit $$?; +recheck: all $(check_PROGRAMS) $(check_LTLIBRARIES) + @test -z "$(TEST_SUITE_LOG)" || rm -f $(TEST_SUITE_LOG) + @set +e; $(am__set_TESTS_bases); \ + bases=`for i in $$bases; do echo $$i; done \ + | $(am__list_recheck_tests)` || exit 1; \ + log_list=`for i in $$bases; do echo $$i.log; done`; \ + log_list=`echo $$log_list`; \ + $(MAKE) $(AM_MAKEFLAGS) $(TEST_SUITE_LOG) \ + am__force_recheck=am--force-recheck \ + TEST_LOGS="$$log_list"; \ + exit $$? +tabs.log: tabs$(EXEEXT) + @p='tabs$(EXEEXT)'; \ + b='tabs'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tacos.log: tacos$(EXEEXT) + @p='tacos$(EXEEXT)'; \ + b='tacos'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tacosh.log: tacosh$(EXEEXT) + @p='tacosh$(EXEEXT)'; \ + b='tacosh'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd.log: tadd$(EXEEXT) + @p='tadd$(EXEEXT)'; \ + b='tadd'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd_d.log: tadd_d$(EXEEXT) + @p='tadd_d$(EXEEXT)'; \ + b='tadd_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd_fr.log: tadd_fr$(EXEEXT) + @p='tadd_fr$(EXEEXT)'; \ + b='tadd_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd_q.log: tadd_q$(EXEEXT) + @p='tadd_q$(EXEEXT)'; \ + b='tadd_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd_si.log: tadd_si$(EXEEXT) + @p='tadd_si$(EXEEXT)'; \ + b='tadd_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd_ui.log: tadd_ui$(EXEEXT) + @p='tadd_ui$(EXEEXT)'; \ + b='tadd_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tadd_z.log: tadd_z$(EXEEXT) + @p='tadd_z$(EXEEXT)'; \ + b='tadd_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tasin.log: tasin$(EXEEXT) + @p='tasin$(EXEEXT)'; \ + b='tasin'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tasinh.log: tasinh$(EXEEXT) + @p='tasinh$(EXEEXT)'; \ + b='tasinh'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tatan.log: tatan$(EXEEXT) + @p='tatan$(EXEEXT)'; \ + b='tatan'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tatan2.log: tatan2$(EXEEXT) + @p='tatan2$(EXEEXT)'; \ + b='tatan2'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tatanh.log: tatanh$(EXEEXT) + @p='tatanh$(EXEEXT)'; \ + b='tatanh'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tbisect.log: tbisect$(EXEEXT) + @p='tbisect$(EXEEXT)'; \ + b='tbisect'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tblow.log: tblow$(EXEEXT) + @p='tblow$(EXEEXT)'; \ + b='tblow'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tbounded_p.log: tbounded_p$(EXEEXT) + @p='tbounded_p$(EXEEXT)'; \ + b='tbounded_p'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcbrt.log: tcbrt$(EXEEXT) + @p='tcbrt$(EXEEXT)'; \ + b='tcbrt'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp.log: tcmp$(EXEEXT) + @p='tcmp$(EXEEXT)'; \ + b='tcmp'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp_d.log: tcmp_d$(EXEEXT) + @p='tcmp_d$(EXEEXT)'; \ + b='tcmp_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp_fr.log: tcmp_fr$(EXEEXT) + @p='tcmp_fr$(EXEEXT)'; \ + b='tcmp_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp_q.log: tcmp_q$(EXEEXT) + @p='tcmp_q$(EXEEXT)'; \ + b='tcmp_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp_si.log: tcmp_si$(EXEEXT) + @p='tcmp_si$(EXEEXT)'; \ + b='tcmp_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp_ui.log: tcmp_ui$(EXEEXT) + @p='tcmp_ui$(EXEEXT)'; \ + b='tcmp_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcmp_z.log: tcmp_z$(EXEEXT) + @p='tcmp_z$(EXEEXT)'; \ + b='tcmp_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tconst_catalan.log: tconst_catalan$(EXEEXT) + @p='tconst_catalan$(EXEEXT)'; \ + b='tconst_catalan'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tconst_euler.log: tconst_euler$(EXEEXT) + @p='tconst_euler$(EXEEXT)'; \ + b='tconst_euler'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tconst_log2.log: tconst_log2$(EXEEXT) + @p='tconst_log2$(EXEEXT)'; \ + b='tconst_log2'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tconst_pi.log: tconst_pi$(EXEEXT) + @p='tconst_pi$(EXEEXT)'; \ + b='tconst_pi'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcos.log: tcos$(EXEEXT) + @p='tcos$(EXEEXT)'; \ + b='tcos'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcosh.log: tcosh$(EXEEXT) + @p='tcosh$(EXEEXT)'; \ + b='tcosh'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcot.log: tcot$(EXEEXT) + @p='tcot$(EXEEXT)'; \ + b='tcot'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcoth.log: tcoth$(EXEEXT) + @p='tcoth$(EXEEXT)'; \ + b='tcoth'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcsc.log: tcsc$(EXEEXT) + @p='tcsc$(EXEEXT)'; \ + b='tcsc'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tcsch.log: tcsch$(EXEEXT) + @p='tcsch$(EXEEXT)'; \ + b='tcsch'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +td_div.log: td_div$(EXEEXT) + @p='td_div$(EXEEXT)'; \ + b='td_div'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +td_sub.log: td_sub$(EXEEXT) + @p='td_sub$(EXEEXT)'; \ + b='td_sub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiam.log: tdiam$(EXEEXT) + @p='tdiam$(EXEEXT)'; \ + b='tdiam'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiam_abs.log: tdiam_abs$(EXEEXT) + @p='tdiam_abs$(EXEEXT)'; \ + b='tdiam_abs'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiam_rel.log: tdiam_rel$(EXEEXT) + @p='tdiam_rel$(EXEEXT)'; \ + b='tdiam_rel'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv.log: tdiv$(EXEEXT) + @p='tdiv$(EXEEXT)'; \ + b='tdiv'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_2exp.log: tdiv_2exp$(EXEEXT) + @p='tdiv_2exp$(EXEEXT)'; \ + b='tdiv_2exp'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_2si.log: tdiv_2si$(EXEEXT) + @p='tdiv_2si$(EXEEXT)'; \ + b='tdiv_2si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_2ui.log: tdiv_2ui$(EXEEXT) + @p='tdiv_2ui$(EXEEXT)'; \ + b='tdiv_2ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_d.log: tdiv_d$(EXEEXT) + @p='tdiv_d$(EXEEXT)'; \ + b='tdiv_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_ext.log: tdiv_ext$(EXEEXT) + @p='tdiv_ext$(EXEEXT)'; \ + b='tdiv_ext'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_fr.log: tdiv_fr$(EXEEXT) + @p='tdiv_fr$(EXEEXT)'; \ + b='tdiv_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_q.log: tdiv_q$(EXEEXT) + @p='tdiv_q$(EXEEXT)'; \ + b='tdiv_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_si.log: tdiv_si$(EXEEXT) + @p='tdiv_si$(EXEEXT)'; \ + b='tdiv_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_ui.log: tdiv_ui$(EXEEXT) + @p='tdiv_ui$(EXEEXT)'; \ + b='tdiv_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tdiv_z.log: tdiv_z$(EXEEXT) + @p='tdiv_z$(EXEEXT)'; \ + b='tdiv_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +terror.log: terror$(EXEEXT) + @p='terror$(EXEEXT)'; \ + b='terror'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +texp.log: texp$(EXEEXT) + @p='texp$(EXEEXT)'; \ + b='texp'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +texp2.log: texp2$(EXEEXT) + @p='texp2$(EXEEXT)'; \ + b='texp2'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +texp10.log: texp10$(EXEEXT) + @p='texp10$(EXEEXT)'; \ + b='texp10'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +texpm1.log: texpm1$(EXEEXT) + @p='texpm1$(EXEEXT)'; \ + b='texpm1'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +texp2m1.log: texp2m1$(EXEEXT) + @p='texp2m1$(EXEEXT)'; \ + b='texp2m1'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +texp10m1.log: texp10m1$(EXEEXT) + @p='texp10m1$(EXEEXT)'; \ + b='texp10m1'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tfr_div.log: tfr_div$(EXEEXT) + @p='tfr_div$(EXEEXT)'; \ + b='tfr_div'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tfr_sub.log: tfr_sub$(EXEEXT) + @p='tfr_sub$(EXEEXT)'; \ + b='tfr_sub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tget_d.log: tget_d$(EXEEXT) + @p='tget_d$(EXEEXT)'; \ + b='tget_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tget_endpoints.log: tget_endpoints$(EXEEXT) + @p='tget_endpoints$(EXEEXT)'; \ + b='tget_endpoints'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tget_fr.log: tget_fr$(EXEEXT) + @p='tget_fr$(EXEEXT)'; \ + b='tget_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +thas_zero.log: thas_zero$(EXEEXT) + @p='thas_zero$(EXEEXT)'; \ + b='thas_zero'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +thypot.log: thypot$(EXEEXT) + @p='thypot$(EXEEXT)'; \ + b='thypot'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tincrease.log: tincrease$(EXEEXT) + @p='tincrease$(EXEEXT)'; \ + b='tincrease'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinf_p.log: tinf_p$(EXEEXT) + @p='tinf_p$(EXEEXT)'; \ + b='tinf_p'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinit.log: tinit$(EXEEXT) + @p='tinit$(EXEEXT)'; \ + b='tinit'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinits.log: tinits$(EXEEXT) + @p='tinits$(EXEEXT)'; \ + b='tinits'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinit_set.log: tinit_set$(EXEEXT) + @p='tinit_set$(EXEEXT)'; \ + b='tinit_set'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tintersect.log: tintersect$(EXEEXT) + @p='tintersect$(EXEEXT)'; \ + b='tintersect'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinterv_d.log: tinterv_d$(EXEEXT) + @p='tinterv_d$(EXEEXT)'; \ + b='tinterv_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinterv_fr.log: tinterv_fr$(EXEEXT) + @p='tinterv_fr$(EXEEXT)'; \ + b='tinterv_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinterv_q.log: tinterv_q$(EXEEXT) + @p='tinterv_q$(EXEEXT)'; \ + b='tinterv_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinterv_si.log: tinterv_si$(EXEEXT) + @p='tinterv_si$(EXEEXT)'; \ + b='tinterv_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinterv_ui.log: tinterv_ui$(EXEEXT) + @p='tinterv_ui$(EXEEXT)'; \ + b='tinterv_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinterv_z.log: tinterv_z$(EXEEXT) + @p='tinterv_z$(EXEEXT)'; \ + b='tinterv_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tinv.log: tinv$(EXEEXT) + @p='tinv$(EXEEXT)'; \ + b='tinv'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tio_str.log: tio_str$(EXEEXT) + @p='tio_str$(EXEEXT)'; \ + b='tio_str'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_empty.log: tis_empty$(EXEEXT) + @p='tis_empty$(EXEEXT)'; \ + b='tis_empty'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside.log: tis_inside$(EXEEXT) + @p='tis_inside$(EXEEXT)'; \ + b='tis_inside'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside_d.log: tis_inside_d$(EXEEXT) + @p='tis_inside_d$(EXEEXT)'; \ + b='tis_inside_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside_fr.log: tis_inside_fr$(EXEEXT) + @p='tis_inside_fr$(EXEEXT)'; \ + b='tis_inside_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside_q.log: tis_inside_q$(EXEEXT) + @p='tis_inside_q$(EXEEXT)'; \ + b='tis_inside_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside_si.log: tis_inside_si$(EXEEXT) + @p='tis_inside_si$(EXEEXT)'; \ + b='tis_inside_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside_ui.log: tis_inside_ui$(EXEEXT) + @p='tis_inside_ui$(EXEEXT)'; \ + b='tis_inside_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_inside_z.log: tis_inside_z$(EXEEXT) + @p='tis_inside_z$(EXEEXT)'; \ + b='tis_inside_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_neg.log: tis_neg$(EXEEXT) + @p='tis_neg$(EXEEXT)'; \ + b='tis_neg'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_nonneg.log: tis_nonneg$(EXEEXT) + @p='tis_nonneg$(EXEEXT)'; \ + b='tis_nonneg'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_nonpos.log: tis_nonpos$(EXEEXT) + @p='tis_nonpos$(EXEEXT)'; \ + b='tis_nonpos'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_pos.log: tis_pos$(EXEEXT) + @p='tis_pos$(EXEEXT)'; \ + b='tis_pos'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_strictly_inside.log: tis_strictly_inside$(EXEEXT) + @p='tis_strictly_inside$(EXEEXT)'; \ + b='tis_strictly_inside'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_strictly_neg.log: tis_strictly_neg$(EXEEXT) + @p='tis_strictly_neg$(EXEEXT)'; \ + b='tis_strictly_neg'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_strictly_pos.log: tis_strictly_pos$(EXEEXT) + @p='tis_strictly_pos$(EXEEXT)'; \ + b='tis_strictly_pos'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tis_zero.log: tis_zero$(EXEEXT) + @p='tis_zero$(EXEEXT)'; \ + b='tis_zero'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tlog.log: tlog$(EXEEXT) + @p='tlog$(EXEEXT)'; \ + b='tlog'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tlog10.log: tlog10$(EXEEXT) + @p='tlog10$(EXEEXT)'; \ + b='tlog10'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tlog1p.log: tlog1p$(EXEEXT) + @p='tlog1p$(EXEEXT)'; \ + b='tlog1p'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tlog2.log: tlog2$(EXEEXT) + @p='tlog2$(EXEEXT)'; \ + b='tlog2'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmag.log: tmag$(EXEEXT) + @p='tmag$(EXEEXT)'; \ + b='tmag'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmid.log: tmid$(EXEEXT) + @p='tmid$(EXEEXT)'; \ + b='tmid'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmig.log: tmig$(EXEEXT) + @p='tmig$(EXEEXT)'; \ + b='tmig'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul.log: tmul$(EXEEXT) + @p='tmul$(EXEEXT)'; \ + b='tmul'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_2exp.log: tmul_2exp$(EXEEXT) + @p='tmul_2exp$(EXEEXT)'; \ + b='tmul_2exp'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_2si.log: tmul_2si$(EXEEXT) + @p='tmul_2si$(EXEEXT)'; \ + b='tmul_2si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_2ui.log: tmul_2ui$(EXEEXT) + @p='tmul_2ui$(EXEEXT)'; \ + b='tmul_2ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_d.log: tmul_d$(EXEEXT) + @p='tmul_d$(EXEEXT)'; \ + b='tmul_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_fr.log: tmul_fr$(EXEEXT) + @p='tmul_fr$(EXEEXT)'; \ + b='tmul_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_q.log: tmul_q$(EXEEXT) + @p='tmul_q$(EXEEXT)'; \ + b='tmul_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_si.log: tmul_si$(EXEEXT) + @p='tmul_si$(EXEEXT)'; \ + b='tmul_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_ui.log: tmul_ui$(EXEEXT) + @p='tmul_ui$(EXEEXT)'; \ + b='tmul_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tmul_z.log: tmul_z$(EXEEXT) + @p='tmul_z$(EXEEXT)'; \ + b='tmul_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tnan_p.log: tnan_p$(EXEEXT) + @p='tnan_p$(EXEEXT)'; \ + b='tnan_p'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tneg.log: tneg$(EXEEXT) + @p='tneg$(EXEEXT)'; \ + b='tneg'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tput_d.log: tput_d$(EXEEXT) + @p='tput_d$(EXEEXT)'; \ + b='tput_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tput_fr.log: tput_fr$(EXEEXT) + @p='tput_fr$(EXEEXT)'; \ + b='tput_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tput_q.log: tput_q$(EXEEXT) + @p='tput_q$(EXEEXT)'; \ + b='tput_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tput_si.log: tput_si$(EXEEXT) + @p='tput_si$(EXEEXT)'; \ + b='tput_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tput_ui.log: tput_ui$(EXEEXT) + @p='tput_ui$(EXEEXT)'; \ + b='tput_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tput_z.log: tput_z$(EXEEXT) + @p='tput_z$(EXEEXT)'; \ + b='tput_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tq_div.log: tq_div$(EXEEXT) + @p='tq_div$(EXEEXT)'; \ + b='tq_div'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tq_sub.log: tq_sub$(EXEEXT) + @p='tq_sub$(EXEEXT)'; \ + b='tq_sub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +trec_sqrt.log: trec_sqrt$(EXEEXT) + @p='trec_sqrt$(EXEEXT)'; \ + b='trec_sqrt'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tround_prec.log: tround_prec$(EXEEXT) + @p='tround_prec$(EXEEXT)'; \ + b='tround_prec'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsec.log: tsec$(EXEEXT) + @p='tsec$(EXEEXT)'; \ + b='tsec'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsech.log: tsech$(EXEEXT) + @p='tsech$(EXEEXT)'; \ + b='tsech'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset.log: tset$(EXEEXT) + @p='tset$(EXEEXT)'; \ + b='tset'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_d.log: tset_d$(EXEEXT) + @p='tset_d$(EXEEXT)'; \ + b='tset_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_flt.log: tset_flt$(EXEEXT) + @p='tset_flt$(EXEEXT)'; \ + b='tset_flt'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_fr.log: tset_fr$(EXEEXT) + @p='tset_fr$(EXEEXT)'; \ + b='tset_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_ld.log: tset_ld$(EXEEXT) + @p='tset_ld$(EXEEXT)'; \ + b='tset_ld'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_q.log: tset_q$(EXEEXT) + @p='tset_q$(EXEEXT)'; \ + b='tset_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_si.log: tset_si$(EXEEXT) + @p='tset_si$(EXEEXT)'; \ + b='tset_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_str.log: tset_str$(EXEEXT) + @p='tset_str$(EXEEXT)'; \ + b='tset_str'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_ui.log: tset_ui$(EXEEXT) + @p='tset_ui$(EXEEXT)'; \ + b='tset_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tset_z.log: tset_z$(EXEEXT) + @p='tset_z$(EXEEXT)'; \ + b='tset_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsi_div.log: tsi_div$(EXEEXT) + @p='tsi_div$(EXEEXT)'; \ + b='tsi_div'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsi_sub.log: tsi_sub$(EXEEXT) + @p='tsi_sub$(EXEEXT)'; \ + b='tsi_sub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsin.log: tsin$(EXEEXT) + @p='tsin$(EXEEXT)'; \ + b='tsin'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsinh.log: tsinh$(EXEEXT) + @p='tsinh$(EXEEXT)'; \ + b='tsinh'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsqr.log: tsqr$(EXEEXT) + @p='tsqr$(EXEEXT)'; \ + b='tsqr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsqrt.log: tsqrt$(EXEEXT) + @p='tsqrt$(EXEEXT)'; \ + b='tsqrt'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub.log: tsub$(EXEEXT) + @p='tsub$(EXEEXT)'; \ + b='tsub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub_d.log: tsub_d$(EXEEXT) + @p='tsub_d$(EXEEXT)'; \ + b='tsub_d'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub_fr.log: tsub_fr$(EXEEXT) + @p='tsub_fr$(EXEEXT)'; \ + b='tsub_fr'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub_q.log: tsub_q$(EXEEXT) + @p='tsub_q$(EXEEXT)'; \ + b='tsub_q'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub_si.log: tsub_si$(EXEEXT) + @p='tsub_si$(EXEEXT)'; \ + b='tsub_si'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub_ui.log: tsub_ui$(EXEEXT) + @p='tsub_ui$(EXEEXT)'; \ + b='tsub_ui'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tsub_z.log: tsub_z$(EXEEXT) + @p='tsub_z$(EXEEXT)'; \ + b='tsub_z'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tswap.log: tswap$(EXEEXT) + @p='tswap$(EXEEXT)'; \ + b='tswap'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +ttan.log: ttan$(EXEEXT) + @p='ttan$(EXEEXT)'; \ + b='ttan'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +ttanh.log: ttanh$(EXEEXT) + @p='ttanh$(EXEEXT)'; \ + b='ttanh'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tui_div.log: tui_div$(EXEEXT) + @p='tui_div$(EXEEXT)'; \ + b='tui_div'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tui_sub.log: tui_sub$(EXEEXT) + @p='tui_sub$(EXEEXT)'; \ + b='tui_sub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tunion.log: tunion$(EXEEXT) + @p='tunion$(EXEEXT)'; \ + b='tunion'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tz_div.log: tz_div$(EXEEXT) + @p='tz_div$(EXEEXT)'; \ + b='tz_div'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tz_sub.log: tz_sub$(EXEEXT) + @p='tz_sub$(EXEEXT)'; \ + b='tz_sub'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +tget_version.log: tget_version$(EXEEXT) + @p='tget_version$(EXEEXT)'; \ + b='tget_version'; \ + $(am__check_pre) $(LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_LOG_DRIVER_FLAGS) $(LOG_DRIVER_FLAGS) -- $(LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +.test.log: + @p='$<'; \ + $(am__set_b); \ + $(am__check_pre) $(TEST_LOG_DRIVER) --test-name "$$f" \ + --log-file $$b.log --trs-file $$b.trs \ + $(am__common_driver_flags) $(AM_TEST_LOG_DRIVER_FLAGS) $(TEST_LOG_DRIVER_FLAGS) -- $(TEST_LOG_COMPILE) \ + "$$tst" $(AM_TESTS_FD_REDIRECT) +@am__EXEEXT_TRUE@.test$(EXEEXT).log: +@am__EXEEXT_TRUE@ @p='$<'; \ +@am__EXEEXT_TRUE@ $(am__set_b); \ +@am__EXEEXT_TRUE@ $(am__check_pre) $(TEST_LOG_DRIVER) --test-name "$$f" \ +@am__EXEEXT_TRUE@ --log-file $$b.log --trs-file $$b.trs \ +@am__EXEEXT_TRUE@ $(am__common_driver_flags) $(AM_TEST_LOG_DRIVER_FLAGS) $(TEST_LOG_DRIVER_FLAGS) -- $(TEST_LOG_COMPILE) \ +@am__EXEEXT_TRUE@ "$$tst" $(AM_TESTS_FD_REDIRECT) +distdir: $(BUILT_SOURCES) + $(MAKE) $(AM_MAKEFLAGS) distdir-am + +distdir-am: $(DISTFILES) + @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + list='$(DISTFILES)'; \ + dist_files=`for file in $$list; do echo $$file; done | \ + sed -e "s|^$$srcdirstrip/||;t" \ + -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ + case $$dist_files in \ + */*) $(MKDIR_P) `echo "$$dist_files" | \ + sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ + sort -u` ;; \ + esac; \ + for file in $$dist_files; do \ + if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ + if test -d $$d/$$file; then \ + dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ + if test -d "$(distdir)/$$file"; then \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ + cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ + else \ + test -f "$(distdir)/$$file" \ + || cp -p $$d/$$file "$(distdir)/$$file" \ + || exit 1; \ + fi; \ + done +check-am: all-am + $(MAKE) $(AM_MAKEFLAGS) $(check_PROGRAMS) $(check_LTLIBRARIES) + $(MAKE) $(AM_MAKEFLAGS) check-TESTS +check: check-am +all-am: Makefile +installdirs: +install: install-am +install-exec: install-exec-am +install-data: install-data-am +uninstall: uninstall-am + +install-am: all-am + @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am + +installcheck: installcheck-am +install-strip: + if test -z '$(STRIP)'; then \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + install; \ + else \ + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \ + fi +mostlyclean-generic: + -test -z "$(TEST_LOGS)" || rm -f $(TEST_LOGS) + -test -z "$(TEST_LOGS:.log=.trs)" || rm -f $(TEST_LOGS:.log=.trs) + -test -z "$(TEST_SUITE_LOG)" || rm -f $(TEST_SUITE_LOG) + +clean-generic: + -test -z "$(CLEANFILES)" || rm -f $(CLEANFILES) + +distclean-generic: + -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) + -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + +maintainer-clean-generic: + @echo "This command is intended for maintainers to use" + @echo "it deletes files that may require special tools to rebuild." +clean: clean-am + +clean-am: clean-checkLTLIBRARIES clean-checkPROGRAMS clean-generic \ + clean-libtool mostlyclean-am + +distclean: distclean-am + -rm -f ./$(DEPDIR)/check_data.Plo + -rm -f ./$(DEPDIR)/mpfi-tests.Plo + -rm -f ./$(DEPDIR)/random.Plo + -rm -f ./$(DEPDIR)/read_data.Plo + -rm -f ./$(DEPDIR)/tabs.Po + -rm -f ./$(DEPDIR)/tacos.Po + -rm -f ./$(DEPDIR)/tacosh.Po + -rm -f ./$(DEPDIR)/tadd.Po + -rm -f ./$(DEPDIR)/tadd_d.Po + -rm -f ./$(DEPDIR)/tadd_fr.Po + -rm -f ./$(DEPDIR)/tadd_q.Po + -rm -f ./$(DEPDIR)/tadd_si.Po + -rm -f ./$(DEPDIR)/tadd_ui.Po + -rm -f ./$(DEPDIR)/tadd_z.Po + -rm -f ./$(DEPDIR)/tasin.Po + -rm -f ./$(DEPDIR)/tasinh.Po + -rm -f ./$(DEPDIR)/tatan.Po + -rm -f ./$(DEPDIR)/tatan2.Po + -rm -f ./$(DEPDIR)/tatanh.Po + -rm -f ./$(DEPDIR)/tbisect.Po + -rm -f ./$(DEPDIR)/tblow.Po + -rm -f ./$(DEPDIR)/tbounded_p.Po + -rm -f ./$(DEPDIR)/tcbrt.Po + -rm -f ./$(DEPDIR)/tcmp.Po + -rm -f ./$(DEPDIR)/tcmp_d.Po + -rm -f ./$(DEPDIR)/tcmp_fr.Po + -rm -f ./$(DEPDIR)/tcmp_q.Po + -rm -f ./$(DEPDIR)/tcmp_si.Po + -rm -f ./$(DEPDIR)/tcmp_ui.Po + -rm -f ./$(DEPDIR)/tcmp_z.Po + -rm -f ./$(DEPDIR)/tconst_catalan.Po + -rm -f ./$(DEPDIR)/tconst_euler.Po + -rm -f ./$(DEPDIR)/tconst_log2.Po + -rm -f ./$(DEPDIR)/tconst_pi.Po + -rm -f ./$(DEPDIR)/tcos.Po + -rm -f ./$(DEPDIR)/tcosh.Po + -rm -f ./$(DEPDIR)/tcot.Po + -rm -f ./$(DEPDIR)/tcoth.Po + -rm -f ./$(DEPDIR)/tcsc.Po + -rm -f ./$(DEPDIR)/tcsch.Po + -rm -f ./$(DEPDIR)/td_div.Po + -rm -f ./$(DEPDIR)/td_sub.Po + -rm -f ./$(DEPDIR)/tdiam.Po + -rm -f ./$(DEPDIR)/tdiam_abs.Po + -rm -f ./$(DEPDIR)/tdiam_rel.Po + -rm -f ./$(DEPDIR)/tdiv.Po + -rm -f ./$(DEPDIR)/tdiv_2exp.Po + -rm -f ./$(DEPDIR)/tdiv_2si.Po + -rm -f ./$(DEPDIR)/tdiv_2ui.Po + -rm -f ./$(DEPDIR)/tdiv_d.Po + -rm -f ./$(DEPDIR)/tdiv_ext.Po + -rm -f ./$(DEPDIR)/tdiv_fr.Po + -rm -f ./$(DEPDIR)/tdiv_q.Po + -rm -f ./$(DEPDIR)/tdiv_si.Po + -rm -f ./$(DEPDIR)/tdiv_ui.Po + -rm -f ./$(DEPDIR)/tdiv_z.Po + -rm -f ./$(DEPDIR)/terror.Po + -rm -f ./$(DEPDIR)/texp.Po + -rm -f ./$(DEPDIR)/texp10.Po + -rm -f ./$(DEPDIR)/texp10m1.Po + -rm -f ./$(DEPDIR)/texp2.Po + -rm -f ./$(DEPDIR)/texp2m1.Po + -rm -f ./$(DEPDIR)/texpm1.Po + -rm -f ./$(DEPDIR)/tfr_div.Po + -rm -f ./$(DEPDIR)/tfr_sub.Po + -rm -f ./$(DEPDIR)/tget_d.Po + -rm -f ./$(DEPDIR)/tget_endpoints.Po + -rm -f ./$(DEPDIR)/tget_fr.Po + -rm -f ./$(DEPDIR)/tget_version.Po + -rm -f ./$(DEPDIR)/thas_zero.Po + -rm -f ./$(DEPDIR)/thypot.Po + -rm -f ./$(DEPDIR)/tincrease.Po + -rm -f ./$(DEPDIR)/tinf_p.Po + -rm -f ./$(DEPDIR)/tinit.Po + -rm -f ./$(DEPDIR)/tinit_set.Po + -rm -f ./$(DEPDIR)/tinits.Po + -rm -f ./$(DEPDIR)/tintersect.Po + -rm -f ./$(DEPDIR)/tinterv_d.Po + -rm -f ./$(DEPDIR)/tinterv_fr.Po + -rm -f ./$(DEPDIR)/tinterv_q.Po + -rm -f ./$(DEPDIR)/tinterv_si.Po + -rm -f ./$(DEPDIR)/tinterv_ui.Po + -rm -f ./$(DEPDIR)/tinterv_z.Po + -rm -f ./$(DEPDIR)/tinv.Po + -rm -f ./$(DEPDIR)/tio_str.Po + -rm -f ./$(DEPDIR)/tis_empty.Po + -rm -f ./$(DEPDIR)/tis_inside.Po + -rm -f ./$(DEPDIR)/tis_inside_d.Po + -rm -f ./$(DEPDIR)/tis_inside_fr.Po + -rm -f ./$(DEPDIR)/tis_inside_q.Po + -rm -f ./$(DEPDIR)/tis_inside_si.Po + -rm -f ./$(DEPDIR)/tis_inside_ui.Po + -rm -f ./$(DEPDIR)/tis_inside_z.Po + -rm -f ./$(DEPDIR)/tis_neg.Po + -rm -f ./$(DEPDIR)/tis_nonneg.Po + -rm -f ./$(DEPDIR)/tis_nonpos.Po + -rm -f ./$(DEPDIR)/tis_pos.Po + -rm -f ./$(DEPDIR)/tis_strictly_inside.Po + -rm -f ./$(DEPDIR)/tis_strictly_neg.Po + -rm -f ./$(DEPDIR)/tis_strictly_pos.Po + -rm -f ./$(DEPDIR)/tis_zero.Po + -rm -f ./$(DEPDIR)/tlog.Po + -rm -f ./$(DEPDIR)/tlog10.Po + -rm -f ./$(DEPDIR)/tlog1p.Po + -rm -f ./$(DEPDIR)/tlog2.Po + -rm -f ./$(DEPDIR)/tmag.Po + -rm -f ./$(DEPDIR)/tmid.Po + -rm -f ./$(DEPDIR)/tmig.Po + -rm -f ./$(DEPDIR)/tmul.Po + -rm -f ./$(DEPDIR)/tmul_2exp.Po + -rm -f ./$(DEPDIR)/tmul_2si.Po + -rm -f ./$(DEPDIR)/tmul_2ui.Po + -rm -f ./$(DEPDIR)/tmul_d.Po + -rm -f ./$(DEPDIR)/tmul_fr.Po + -rm -f ./$(DEPDIR)/tmul_q.Po + -rm -f ./$(DEPDIR)/tmul_si.Po + -rm -f ./$(DEPDIR)/tmul_ui.Po + -rm -f ./$(DEPDIR)/tmul_z.Po + -rm -f ./$(DEPDIR)/tnan_p.Po + -rm -f ./$(DEPDIR)/tneg.Po + -rm -f ./$(DEPDIR)/tput_d.Po + -rm -f ./$(DEPDIR)/tput_fr.Po + -rm -f ./$(DEPDIR)/tput_q.Po + -rm -f ./$(DEPDIR)/tput_si.Po + -rm -f ./$(DEPDIR)/tput_ui.Po + -rm -f ./$(DEPDIR)/tput_z.Po + -rm -f ./$(DEPDIR)/tq_div.Po + -rm -f ./$(DEPDIR)/tq_sub.Po + -rm -f ./$(DEPDIR)/trec_sqrt.Po + -rm -f ./$(DEPDIR)/tround_prec.Po + -rm -f ./$(DEPDIR)/tsec.Po + -rm -f ./$(DEPDIR)/tsech.Po + -rm -f ./$(DEPDIR)/tset.Po + -rm -f ./$(DEPDIR)/tset_d.Po + -rm -f ./$(DEPDIR)/tset_flt.Po + -rm -f ./$(DEPDIR)/tset_fr.Po + -rm -f ./$(DEPDIR)/tset_ld.Po + -rm -f ./$(DEPDIR)/tset_q.Po + -rm -f ./$(DEPDIR)/tset_si.Po + -rm -f ./$(DEPDIR)/tset_str.Po + -rm -f ./$(DEPDIR)/tset_ui.Po + -rm -f ./$(DEPDIR)/tset_z.Po + -rm -f ./$(DEPDIR)/tsi_div.Po + -rm -f ./$(DEPDIR)/tsi_sub.Po + -rm -f ./$(DEPDIR)/tsin.Po + -rm -f ./$(DEPDIR)/tsinh.Po + -rm -f ./$(DEPDIR)/tsqr.Po + -rm -f ./$(DEPDIR)/tsqrt.Po + -rm -f ./$(DEPDIR)/tsub.Po + -rm -f ./$(DEPDIR)/tsub_d.Po + -rm -f ./$(DEPDIR)/tsub_fr.Po + -rm -f ./$(DEPDIR)/tsub_q.Po + -rm -f ./$(DEPDIR)/tsub_si.Po + -rm -f ./$(DEPDIR)/tsub_ui.Po + -rm -f ./$(DEPDIR)/tsub_z.Po + -rm -f ./$(DEPDIR)/tswap.Po + -rm -f ./$(DEPDIR)/ttan.Po + -rm -f ./$(DEPDIR)/ttanh.Po + -rm -f ./$(DEPDIR)/tui_div.Po + -rm -f ./$(DEPDIR)/tui_sub.Po + -rm -f ./$(DEPDIR)/tunion.Po + -rm -f ./$(DEPDIR)/type_i.Plo + -rm -f ./$(DEPDIR)/type_id.Plo + -rm -f ./$(DEPDIR)/type_idi.Plo + -rm -f ./$(DEPDIR)/type_if.Plo + -rm -f ./$(DEPDIR)/type_ii.Plo + -rm -f ./$(DEPDIR)/type_iid.Plo + -rm -f ./$(DEPDIR)/type_iii.Plo + -rm -f ./$(DEPDIR)/type_iiii.Plo + -rm -f ./$(DEPDIR)/type_iiq.Plo + -rm -f ./$(DEPDIR)/type_iir.Plo + -rm -f ./$(DEPDIR)/type_iis.Plo + -rm -f ./$(DEPDIR)/type_iiu.Plo + -rm -f ./$(DEPDIR)/type_iiz.Plo + -rm -f ./$(DEPDIR)/type_il.Plo + -rm -f ./$(DEPDIR)/type_iq.Plo + -rm -f ./$(DEPDIR)/type_iqi.Plo + -rm -f ./$(DEPDIR)/type_ir.Plo + -rm -f ./$(DEPDIR)/type_iri.Plo + -rm -f ./$(DEPDIR)/type_is.Plo + -rm -f ./$(DEPDIR)/type_isi.Plo + -rm -f ./$(DEPDIR)/type_iu.Plo + -rm -f ./$(DEPDIR)/type_iui.Plo + -rm -f ./$(DEPDIR)/type_iz.Plo + -rm -f ./$(DEPDIR)/type_izi.Plo + -rm -f ./$(DEPDIR)/type_ri.Plo + -rm -f ./$(DEPDIR)/tz_div.Po + -rm -f ./$(DEPDIR)/tz_sub.Po + -rm -f Makefile +distclean-am: clean-am distclean-compile distclean-generic \ + distclean-tags + +dvi: dvi-am + +dvi-am: + +html: html-am + +html-am: + +info: info-am + +info-am: + +install-data-am: + +install-dvi: install-dvi-am + +install-dvi-am: + +install-exec-am: + +install-html: install-html-am + +install-html-am: + +install-info: install-info-am + +install-info-am: + +install-man: + +install-pdf: install-pdf-am + +install-pdf-am: + +install-ps: install-ps-am + +install-ps-am: + +installcheck-am: + +maintainer-clean: maintainer-clean-am + -rm -f ./$(DEPDIR)/check_data.Plo + -rm -f ./$(DEPDIR)/mpfi-tests.Plo + -rm -f ./$(DEPDIR)/random.Plo + -rm -f ./$(DEPDIR)/read_data.Plo + -rm -f ./$(DEPDIR)/tabs.Po + -rm -f ./$(DEPDIR)/tacos.Po + -rm -f ./$(DEPDIR)/tacosh.Po + -rm -f ./$(DEPDIR)/tadd.Po + -rm -f ./$(DEPDIR)/tadd_d.Po + -rm -f ./$(DEPDIR)/tadd_fr.Po + -rm -f ./$(DEPDIR)/tadd_q.Po + -rm -f ./$(DEPDIR)/tadd_si.Po + -rm -f ./$(DEPDIR)/tadd_ui.Po + -rm -f ./$(DEPDIR)/tadd_z.Po + -rm -f ./$(DEPDIR)/tasin.Po + -rm -f ./$(DEPDIR)/tasinh.Po + -rm -f ./$(DEPDIR)/tatan.Po + -rm -f ./$(DEPDIR)/tatan2.Po + -rm -f ./$(DEPDIR)/tatanh.Po + -rm -f ./$(DEPDIR)/tbisect.Po + -rm -f ./$(DEPDIR)/tblow.Po + -rm -f ./$(DEPDIR)/tbounded_p.Po + -rm -f ./$(DEPDIR)/tcbrt.Po + -rm -f ./$(DEPDIR)/tcmp.Po + -rm -f ./$(DEPDIR)/tcmp_d.Po + -rm -f ./$(DEPDIR)/tcmp_fr.Po + -rm -f ./$(DEPDIR)/tcmp_q.Po + -rm -f ./$(DEPDIR)/tcmp_si.Po + -rm -f ./$(DEPDIR)/tcmp_ui.Po + -rm -f ./$(DEPDIR)/tcmp_z.Po + -rm -f ./$(DEPDIR)/tconst_catalan.Po + -rm -f ./$(DEPDIR)/tconst_euler.Po + -rm -f ./$(DEPDIR)/tconst_log2.Po + -rm -f ./$(DEPDIR)/tconst_pi.Po + -rm -f ./$(DEPDIR)/tcos.Po + -rm -f ./$(DEPDIR)/tcosh.Po + -rm -f ./$(DEPDIR)/tcot.Po + -rm -f ./$(DEPDIR)/tcoth.Po + -rm -f ./$(DEPDIR)/tcsc.Po + -rm -f ./$(DEPDIR)/tcsch.Po + -rm -f ./$(DEPDIR)/td_div.Po + -rm -f ./$(DEPDIR)/td_sub.Po + -rm -f ./$(DEPDIR)/tdiam.Po + -rm -f ./$(DEPDIR)/tdiam_abs.Po + -rm -f ./$(DEPDIR)/tdiam_rel.Po + -rm -f ./$(DEPDIR)/tdiv.Po + -rm -f ./$(DEPDIR)/tdiv_2exp.Po + -rm -f ./$(DEPDIR)/tdiv_2si.Po + -rm -f ./$(DEPDIR)/tdiv_2ui.Po + -rm -f ./$(DEPDIR)/tdiv_d.Po + -rm -f ./$(DEPDIR)/tdiv_ext.Po + -rm -f ./$(DEPDIR)/tdiv_fr.Po + -rm -f ./$(DEPDIR)/tdiv_q.Po + -rm -f ./$(DEPDIR)/tdiv_si.Po + -rm -f ./$(DEPDIR)/tdiv_ui.Po + -rm -f ./$(DEPDIR)/tdiv_z.Po + -rm -f ./$(DEPDIR)/terror.Po + -rm -f ./$(DEPDIR)/texp.Po + -rm -f ./$(DEPDIR)/texp10.Po + -rm -f ./$(DEPDIR)/texp10m1.Po + -rm -f ./$(DEPDIR)/texp2.Po + -rm -f ./$(DEPDIR)/texp2m1.Po + -rm -f ./$(DEPDIR)/texpm1.Po + -rm -f ./$(DEPDIR)/tfr_div.Po + -rm -f ./$(DEPDIR)/tfr_sub.Po + -rm -f ./$(DEPDIR)/tget_d.Po + -rm -f ./$(DEPDIR)/tget_endpoints.Po + -rm -f ./$(DEPDIR)/tget_fr.Po + -rm -f ./$(DEPDIR)/tget_version.Po + -rm -f ./$(DEPDIR)/thas_zero.Po + -rm -f ./$(DEPDIR)/thypot.Po + -rm -f ./$(DEPDIR)/tincrease.Po + -rm -f ./$(DEPDIR)/tinf_p.Po + -rm -f ./$(DEPDIR)/tinit.Po + -rm -f ./$(DEPDIR)/tinit_set.Po + -rm -f ./$(DEPDIR)/tinits.Po + -rm -f ./$(DEPDIR)/tintersect.Po + -rm -f ./$(DEPDIR)/tinterv_d.Po + -rm -f ./$(DEPDIR)/tinterv_fr.Po + -rm -f ./$(DEPDIR)/tinterv_q.Po + -rm -f ./$(DEPDIR)/tinterv_si.Po + -rm -f ./$(DEPDIR)/tinterv_ui.Po + -rm -f ./$(DEPDIR)/tinterv_z.Po + -rm -f ./$(DEPDIR)/tinv.Po + -rm -f ./$(DEPDIR)/tio_str.Po + -rm -f ./$(DEPDIR)/tis_empty.Po + -rm -f ./$(DEPDIR)/tis_inside.Po + -rm -f ./$(DEPDIR)/tis_inside_d.Po + -rm -f ./$(DEPDIR)/tis_inside_fr.Po + -rm -f ./$(DEPDIR)/tis_inside_q.Po + -rm -f ./$(DEPDIR)/tis_inside_si.Po + -rm -f ./$(DEPDIR)/tis_inside_ui.Po + -rm -f ./$(DEPDIR)/tis_inside_z.Po + -rm -f ./$(DEPDIR)/tis_neg.Po + -rm -f ./$(DEPDIR)/tis_nonneg.Po + -rm -f ./$(DEPDIR)/tis_nonpos.Po + -rm -f ./$(DEPDIR)/tis_pos.Po + -rm -f ./$(DEPDIR)/tis_strictly_inside.Po + -rm -f ./$(DEPDIR)/tis_strictly_neg.Po + -rm -f ./$(DEPDIR)/tis_strictly_pos.Po + -rm -f ./$(DEPDIR)/tis_zero.Po + -rm -f ./$(DEPDIR)/tlog.Po + -rm -f ./$(DEPDIR)/tlog10.Po + -rm -f ./$(DEPDIR)/tlog1p.Po + -rm -f ./$(DEPDIR)/tlog2.Po + -rm -f ./$(DEPDIR)/tmag.Po + -rm -f ./$(DEPDIR)/tmid.Po + -rm -f ./$(DEPDIR)/tmig.Po + -rm -f ./$(DEPDIR)/tmul.Po + -rm -f ./$(DEPDIR)/tmul_2exp.Po + -rm -f ./$(DEPDIR)/tmul_2si.Po + -rm -f ./$(DEPDIR)/tmul_2ui.Po + -rm -f ./$(DEPDIR)/tmul_d.Po + -rm -f ./$(DEPDIR)/tmul_fr.Po + -rm -f ./$(DEPDIR)/tmul_q.Po + -rm -f ./$(DEPDIR)/tmul_si.Po + -rm -f ./$(DEPDIR)/tmul_ui.Po + -rm -f ./$(DEPDIR)/tmul_z.Po + -rm -f ./$(DEPDIR)/tnan_p.Po + -rm -f ./$(DEPDIR)/tneg.Po + -rm -f ./$(DEPDIR)/tput_d.Po + -rm -f ./$(DEPDIR)/tput_fr.Po + -rm -f ./$(DEPDIR)/tput_q.Po + -rm -f ./$(DEPDIR)/tput_si.Po + -rm -f ./$(DEPDIR)/tput_ui.Po + -rm -f ./$(DEPDIR)/tput_z.Po + -rm -f ./$(DEPDIR)/tq_div.Po + -rm -f ./$(DEPDIR)/tq_sub.Po + -rm -f ./$(DEPDIR)/trec_sqrt.Po + -rm -f ./$(DEPDIR)/tround_prec.Po + -rm -f ./$(DEPDIR)/tsec.Po + -rm -f ./$(DEPDIR)/tsech.Po + -rm -f ./$(DEPDIR)/tset.Po + -rm -f ./$(DEPDIR)/tset_d.Po + -rm -f ./$(DEPDIR)/tset_flt.Po + -rm -f ./$(DEPDIR)/tset_fr.Po + -rm -f ./$(DEPDIR)/tset_ld.Po + -rm -f ./$(DEPDIR)/tset_q.Po + -rm -f ./$(DEPDIR)/tset_si.Po + -rm -f ./$(DEPDIR)/tset_str.Po + -rm -f ./$(DEPDIR)/tset_ui.Po + -rm -f ./$(DEPDIR)/tset_z.Po + -rm -f ./$(DEPDIR)/tsi_div.Po + -rm -f ./$(DEPDIR)/tsi_sub.Po + -rm -f ./$(DEPDIR)/tsin.Po + -rm -f ./$(DEPDIR)/tsinh.Po + -rm -f ./$(DEPDIR)/tsqr.Po + -rm -f ./$(DEPDIR)/tsqrt.Po + -rm -f ./$(DEPDIR)/tsub.Po + -rm -f ./$(DEPDIR)/tsub_d.Po + -rm -f ./$(DEPDIR)/tsub_fr.Po + -rm -f ./$(DEPDIR)/tsub_q.Po + -rm -f ./$(DEPDIR)/tsub_si.Po + -rm -f ./$(DEPDIR)/tsub_ui.Po + -rm -f ./$(DEPDIR)/tsub_z.Po + -rm -f ./$(DEPDIR)/tswap.Po + -rm -f ./$(DEPDIR)/ttan.Po + -rm -f ./$(DEPDIR)/ttanh.Po + -rm -f ./$(DEPDIR)/tui_div.Po + -rm -f ./$(DEPDIR)/tui_sub.Po + -rm -f ./$(DEPDIR)/tunion.Po + -rm -f ./$(DEPDIR)/type_i.Plo + -rm -f ./$(DEPDIR)/type_id.Plo + -rm -f ./$(DEPDIR)/type_idi.Plo + -rm -f ./$(DEPDIR)/type_if.Plo + -rm -f ./$(DEPDIR)/type_ii.Plo + -rm -f ./$(DEPDIR)/type_iid.Plo + -rm -f ./$(DEPDIR)/type_iii.Plo + -rm -f ./$(DEPDIR)/type_iiii.Plo + -rm -f ./$(DEPDIR)/type_iiq.Plo + -rm -f ./$(DEPDIR)/type_iir.Plo + -rm -f ./$(DEPDIR)/type_iis.Plo + -rm -f ./$(DEPDIR)/type_iiu.Plo + -rm -f ./$(DEPDIR)/type_iiz.Plo + -rm -f ./$(DEPDIR)/type_il.Plo + -rm -f ./$(DEPDIR)/type_iq.Plo + -rm -f ./$(DEPDIR)/type_iqi.Plo + -rm -f ./$(DEPDIR)/type_ir.Plo + -rm -f ./$(DEPDIR)/type_iri.Plo + -rm -f ./$(DEPDIR)/type_is.Plo + -rm -f ./$(DEPDIR)/type_isi.Plo + -rm -f ./$(DEPDIR)/type_iu.Plo + -rm -f ./$(DEPDIR)/type_iui.Plo + -rm -f ./$(DEPDIR)/type_iz.Plo + -rm -f ./$(DEPDIR)/type_izi.Plo + -rm -f ./$(DEPDIR)/type_ri.Plo + -rm -f ./$(DEPDIR)/tz_div.Po + -rm -f ./$(DEPDIR)/tz_sub.Po + -rm -f Makefile +maintainer-clean-am: distclean-am maintainer-clean-generic + +mostlyclean: mostlyclean-am + +mostlyclean-am: mostlyclean-compile mostlyclean-generic \ + mostlyclean-libtool + +pdf: pdf-am + +pdf-am: + +ps: ps-am + +ps-am: + +uninstall-am: + +.MAKE: check-am install-am install-strip + +.PHONY: CTAGS GTAGS TAGS all all-am am--depfiles check check-TESTS \ + check-am clean clean-checkLTLIBRARIES clean-checkPROGRAMS \ + clean-generic clean-libtool cscopelist-am ctags ctags-am \ + distclean distclean-compile distclean-generic \ + distclean-libtool distclean-tags distdir dvi dvi-am html \ + html-am info info-am install install-am install-data \ + install-data-am install-dvi install-dvi-am install-exec \ + install-exec-am install-html install-html-am install-info \ + install-info-am install-man install-pdf install-pdf-am \ + install-ps install-ps-am install-strip installcheck \ + installcheck-am installdirs maintainer-clean \ + maintainer-clean-generic mostlyclean mostlyclean-compile \ + mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \ + recheck tags tags-am uninstall uninstall-am + +.PRECIOUS: Makefile + + +# Tell versions [3.59,3.63) of GNU make to not export all variables. +# Otherwise a system limit (for SysV at least) may be exceeded. +.NOEXPORT: diff --git a/Build/source/libs/mpfi/mpfi-src/tests/abs.dat b/Build/source/libs/mpfi/mpfi-src/tests/abs.dat new file mode 100644 index 00000000000..ec210957d0a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/abs.dat @@ -0,0 +1,41 @@ +# data file for mpfi_abs +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 nan +1 +0 53 nan nan 53 +inf nan +0 53 +inf +inf 53 -inf -inf +0 53 +7 +inf 53 -inf -7 +0 53 +0 +inf 53 -inf -0 +0 53 +0 +inf 53 -inf -0 +0 53 +0 +inf 53 -inf +8 +0 53 +0 +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +0 53 +0 +8 53 +0 +8 +0 53 +0 +inf 53 +0 +inf +0 53 +0 +8 53 +0 +8 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 0x123456789p-16 0x123456799p-16 53 0x123456789p-16 0x123456799p-16 +1 12 0x888p+21 0x222p+24 53 0x111111111 0x222p+24 +2 12 0xaaa 0xaabp+4 53 -0xaaa1 -0xaaa +3 12 0xaaa0 0xb6d0 53 -0xb6c1 -0xaaa1 + +0 53 +0 0x123456799p-16 53 -0x123456789p-16 0x123456799p-16 +2 12 +0 0xaabp+4 53 -0xaaa1 0xaaa diff --git a/Build/source/libs/mpfi/mpfi-src/tests/acos.dat b/Build/source/libs/mpfi/mpfi-src/tests/acos.dat new file mode 100644 index 00000000000..71f87a0f4cc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/acos.dat @@ -0,0 +1,43 @@ +# data file for mpfi_acos +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 0x3243f6a8885a3p-49 nan 53 nan -0 +0 53 nan 0x1921fb54442d19p-52 53 +0 nan +0 53 0 nan 53 nan +1 +0 53 nan nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 0x3243f6a8885a3p-49 nan 53 -inf -0 +0 53 nan nan 53 -inf +8 +0 53 nan nan 53 -inf +inf +3 53 0x3243f6a8885a3p-49 0x1921fb54442d19p-51 53 -1 -0 +3 53 0x3243f6a8885a3p-49 0x1921fb54442d19p-52 53 +0 -0 +2 53 0 0x1921fb54442d19p-52 53 +0 +1 +0 53 nan 0x1921fb54442d19p-52 53 +0 +8 +0 53 nan 0x1921fb54442d19p-52 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 nan nan 53 -6 -4 +0 53 0x10c152382d7365p-51 nan 53 -2 -0.5 +3 53 0x10c152382d7365p-51 0x1921fb54442d19p-51 53 -1 -0.5 +3 53 0x1d2cf5c7c70f0bp-52 0x4d6749be4edb1p-49 53 -0.75 -0.25 +3 53 0x10c152382d7365p-52 0x860a91c16b9b3p-50 53 -0.5 0.5 +3 53 0x1ca94936b98a21p-53 0x151700e0c14b25p-52 53 0.25 0.625 +2 53 0 0x1921fb54442d19p-51 53 -1 1 +0 53 nan 0x1720a392c1d955p-52 53 0.125 17 +0 53 nan nan 53 17 42 +0 53 nan nan 53 -42 17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/acosh.dat b/Build/source/libs/mpfi/mpfi-src/tests/acosh.dat new file mode 100644 index 00000000000..4ff3002c7ee --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/acosh.dat @@ -0,0 +1,42 @@ +# data file for mpfi_acosh +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan -0 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan nan 53 -inf -0 +0 53 nan -0 53 -inf +1 +0 53 nan 0x5898db90230cfp-49 53 -inf +8 +0 53 nan +inf 53 -inf +inf +0 53 nan nan 53 -1 -0 +0 53 nan nan 53 +0 -0 +0 53 nan -0 53 +0 +1 +0 53 nan 0x5898db90230cfp-49 53 +0 +8 + +0 53 nan +inf 53 +0 +inf +0 53 +0 +inf 53 +1 +inf +1 53 0x1ecc2caec51609p-53 +inf 53 +1.5 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 nan nan 53 -6 -4 +0 53 nan 0xf661657628b05p-52 53 -2 1.5 +2 53 +0 0xf661657628b05p-52 53 1 1.5 +3 53 0x1ecc2caec51609p-53 0xf661657628b05p-52 53 1.5 1.5 +3 53 0x544909c66010dp-50 0x799d4ba2a13b5p-48 53 2 1000 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add.dat b/Build/source/libs/mpfi/mpfi-src/tests/add.dat new file mode 100644 index 00000000000..24ab5579e8a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add.dat @@ -0,0 +1,64 @@ +# data file for mpfi_add +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of second parameter +# 8: precision of second parameter +# 9: left endpoint value of second parameter +# 10: right endpoint value of second parameter + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan -7 53 nan -0 53 -inf -7 +0 53 nan +1 53 nan -0 53 -8 +1 +0 53 nan +inf 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan +inf 53 nan -7 53 +inf +inf +0 53 nan +1 53 nan +1 53 nan -0 +0 53 -inf -inf 53 -inf -inf 53 -inf -inf +0 53 -inf +1 53 -inf -7 53 -1 +8 +0 53 -inf +inf 53 -inf -0 53 +8 +inf +0 53 nan +inf 53 -inf -0 53 +inf +inf +0 53 -inf +16 53 -inf +8 53 +0 +8 +0 53 -inf +inf 53 -inf +inf 53 +0 +8 +0 53 -inf -7 53 +0 -0 53 -inf -7 +0 53 -7 +8 53 +0 +8 53 -7 -0 +0 53 +0 +8 53 +0 -0 53 +0 +8 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 +8 +inf 53 +0 -0 53 +8 +inf +0 53 +inf nan 53 +0 +8 53 +inf nan +0 53 -inf +inf 53 +0 -0 53 -inf +inf +0 53 +0 +16 53 +0 +8 53 +0 +8 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 -7 +inf 53 +0 +inf 53 -7 +8 +0 53 +8 nan 53 +0 nan 53 +8 +inf +0 53 +inf +inf 53 +0 +8 53 +inf +inf +0 53 nan +inf 53 +inf +inf 53 -inf +3 +0 53 +inf +inf 53 +inf +inf 53 +0 +inf +0 53 +inf nan 53 +inf +inf 53 +3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 +inf nan 53 +inf nan 53 +inf +inf +0 53 +inf nan 53 +inf nan 53 -3 +7 + +# regular values +0 53 -0x1p-1 -0x187p-256 53 -0.375 -0x10187p-256 53 -0.125 0x1p-240 +1 53 -0x10000000000001p-93 0x123456789abcd 53 -0x1p-300 0x123456p+28 53 -0x10000000000000p-93 0x789abcd +2 53 -0x123456791abcdp-17 0x8f596b3002c1bp+947 53 -4 +7 53 -0x123456789abcdp-17 3e300 +3 53 +0x1010101010101p+8 0x8f596b3002c1bp+947 53 0x1000100010001p+8 0x1p+60 53 0x1000100010001 3e300 + +# signed zeros +0 53 +0 +6 53 +4 +8 53 -4 -2 +0 53 -5 -0 53 +4 +8 53 -9 -8 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add_d.dat b/Build/source/libs/mpfi/mpfi-src/tests/add_d.dat new file mode 100644 index 00000000000..dfeb9922b19 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add_d.dat @@ -0,0 +1,110 @@ +# data file for mpfi_add_d +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan 53 nan nan -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 0.0 +0 53 nan nan 53 nan nan 0x170ef54646d497p-109 +0 53 nan -inf 53 nan -inf -0x114b37f4b51f71p-107 +0 53 nan -inf 53 nan -inf 0.0 +0 53 nan -inf 53 nan -inf 0x114b37f4b51f71p-107 +0 53 nan -0x1c000000000007p-50 53 nan -7 -0xfc339ab0a6b53p-99 +0 53 nan -7 53 nan -7 0.0 +0 53 nan -0 53 nan -7 7.0 +0 53 nan -15 53 nan -0 -15.0 +0 53 nan -0 53 nan -0 0.0 +0 53 nan 15 53 nan -0 15.0 +0 53 nan 0xfffffffffffffp-52 53 nan +1 -0xb2b3ece0a4ef9p-103 +0 53 nan 1 53 nan +1 0.0 +0 53 nan 0x8000000000001p-51 53 nan +1 0xb2b3ece0a4ef9p-103 +0 53 nan +inf 53 nan +inf -0x5acae5c4b6e51p-101 +0 53 nan +inf 53 nan +inf 0.0 +0 53 nan +inf 53 nan +inf 0x5acae5c4b6e51p-101 +0 53 -inf -inf 53 -inf -inf -0x170ef54646d497p-108 +0 53 -inf -inf 53 -inf -inf 0.0 +0 53 -inf -inf 53 -inf -inf 0x170ef54646d497p-108 +2 53 -inf -7 53 -inf -7 -0x170ef54646d497p-107 +0 53 -inf -7 53 -inf -7 0.0 +2 53 -inf -0x1bffffffffffffp-50 53 -inf -7 0x170ef54646d497p-107 +0 53 -inf -8.0e-17 53 -inf -0 -0x170ef54646d497p-106 +0 53 -inf -0 53 -inf -0 0.0 +0 53 -inf 0x170ef54646d497p-106 53 -inf -0 0x170ef54646d497p-106 +2 53 -inf -0x16345785d89fff00 53 -inf 8 -0x16345785d8a00000 +0 53 -inf 8 53 -inf 8 0.0 +2 53 -inf 0x16345785d8a00100 53 -inf 8 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf -0x170ef54646d497p-105 +0 53 -inf +inf 53 -inf +inf 0.0e-17 +0 53 -inf +inf 53 -inf +inf +0x170ef54646d497p-105 +0 53 -inf nan 53 -inf nan -0x170ef54646d497p-104 +0 53 -inf nan 53 -inf nan 0.0e-17 +0 53 -inf nan 53 -inf nan +0x170ef54646d497p-104 + +0 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 + 53 +0 -0 -0x170ef54646d497p-109 +0 53 +0 -0 + 53 +0 -0 0.0 +0 53 0x170ef54646d497p-109 0x170ef54646d497p-109 + 53 +0 -0 0x170ef54646d497p-109 +2 53 -0x114b37f4b51f71p-107 8 + 53 +0 8 -0x114b37f4b51f71p-107 +0 53 +0 8 + 53 +0 8 0.0 +2 53 0x114b37f4b51f7p-103 0x10000000000001p-49 + 53 +0 8 0x114b37f4b51f7p-103 +0 53 -0x50b45a75f7e81p-104 +inf + 53 +0 +inf -0x50b45a75f7e81p-104 +0 53 +0 +inf + 53 +0 +inf 0.0 +0 53 0x142d169d7dfa03p-106 +inf + 53 +0 +inf 0x142d169d7dfa03p-106 + +0 53 +inf +inf 53 +inf +inf -0x170ef54646d497p-109 +0 53 +inf +inf 53 +inf +inf 0.0 +0 53 +inf +inf 53 +inf +inf 0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan -0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan 0.0 +0 53 +inf nan 53 +inf nan 0x170ef54646d497p-109 + +# regular values +0 53 -0x1fb53d14aa9c2fp-47 -0x18353d14aa9c2fp-47 + 53 -32 -17 -0xfb53d14aa9c2fp-47 +0 53 +0 0x7353d14aa9c2fp-47 + 53 -0xfb53d14aa9c2fp-47 -17 0xfb53d14aa9c2fp-47 +0 53 -0x104ac2eb5563d1p-48 -0 + 53 -32 -0xfb53d14aa9c2fp-48 0xfb53d14aa9c2fp-48 + +0 53 0x15b456789abcdfp-48 0x123456789abd17p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 3.5 +1 53 0x3923456789abcdp-52 0x123456789abd17p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 3.5 +2 53 0x18p-4 0x101a3456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 256.5 +3 53 0xfff8p-4 0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 4097.5 + +0 53 0xeb456789abcdfp-48 0x123456789abca7p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 -3.5 +1 53 -0x36dcba98765434p-52 0x123456789abca7p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 -3.5 +2 53 -0x1ff8p-4 -0xff5cba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 -256.5 +3 53 -0x10038p-4 -0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 -4097.5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add_fr.dat b/Build/source/libs/mpfi/mpfi-src/tests/add_fr.dat new file mode 100644 index 00000000000..12dd83b1bb6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add_fr.dat @@ -0,0 +1,114 @@ +# data file for mpfi_add_fr +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 53 -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 53 -0 +0 53 nan nan 53 nan nan 53 0x170ef54646d497p-109 +0 53 nan -inf 53 nan -inf 53 -0x114b37f4b51f71p-107 +0 53 nan -inf 53 nan -inf 53 +0 +0 53 nan -inf 53 nan -inf 53 0x114b37f4b51f71p-107 +0 53 nan -0x1c000000000007p-50 53 nan -7 53 -0xfc339ab0a6b53p-99 +0 53 nan -7 53 nan -7 53 -0 +0 53 nan -0 53 nan -7 53 7.0 +0 53 nan -15 53 nan -0 53 -15.0 +0 53 nan -0 53 nan -0 53 +0 +0 53 nan 15 53 nan -0 53 15.0 +0 53 nan 0xfffffffffffffp-52 53 nan +1 53 -0xb2b3ece0a4ef9p-103 +0 53 nan 1 53 nan +1 53 -0 +0 53 nan 0x8000000000001p-51 53 nan +1 53 0xb2b3ece0a4ef9p-103 +0 53 nan +inf 53 nan +inf 53 -0x5acae5c4b6e51p-101 +0 53 nan +inf 53 nan +inf 53 +0 +0 53 nan +inf 53 nan +inf 53 0x5acae5c4b6e51p-101 +0 53 -inf -inf 53 -inf -inf 53 -0x170ef54646d497p-108 +0 53 -inf -inf 53 -inf -inf 53 +0 +0 53 -inf -inf 53 -inf -inf 53 0x170ef54646d497p-108 +2 53 -inf -7 53 -inf -7 53 -0x170ef54646d497p-107 +0 53 -inf -7 53 -inf -7 53 -0 +2 53 -inf -0x1bffffffffffffp-50 53 -inf -7 53 0x170ef54646d497p-107 +0 53 -inf -8.0e-17 53 -inf -0 53 -0x170ef54646d497p-106 +0 53 -inf -0 53 -inf -0 53 +0 +0 53 -inf 0x170ef54646d497p-106 53 -inf -0 53 0x170ef54646d497p-106 +2 53 -inf -0x16345785d89fff00 53 -inf 8 53 -0x16345785d8a00000 +0 53 -inf 8 53 -inf 8 53 -0 +2 53 -inf 0x16345785d8a00100 53 -inf 8 53 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf 53 -0x170ef54646d497p-105 +0 53 -inf +inf 53 -inf +inf 53 +0 +0 53 -inf +inf 53 -inf +inf 53 +0x170ef54646d497p-105 +0 53 -inf nan 53 -inf nan 53 -0x170ef54646d497p-104 +0 53 -inf nan 53 -inf nan 53 -0 +0 53 -inf nan 53 -inf nan 53 +0x170ef54646d497p-104 + +1 53 -0x10000000000001p-49 -0x114b37f4b51f71p-107 + 53 -8 -0 53 -0x114b37f4b51f71p-107 +0 53 -8 -0 + 53 -8 -0 53 -0 +1 53 -8 0x114b37f4b51f71p-107 + 53 -8 -0 53 0x114b37f4b51f71p-107 +0 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 + 53 +0 -0 53 -0x170ef54646d497p-109 +0 53 +0 -0 + 53 +0 -0 53 +0 +0 53 0x170ef54646d497p-109 0x170ef54646d497p-109 + 53 +0 -0 53 0x170ef54646d497p-109 +2 53 -0x114b37f4b51f71p-107 8 + 53 +0 8 53 -0x114b37f4b51f71p-107 +0 53 +0 8 + 53 +0 8 53 -0 +2 53 0x114b37f4b51f7p-103 0x10000000000001p-49 + 53 +0 8 53 0x114b37f4b51f7p-103 +0 53 -0x50b45a75f7e81p-104 +inf + 53 +0 +inf 53 -0x50b45a75f7e81p-104 +0 53 +0 +inf + 53 +0 +inf 53 +0 +0 53 0x142d169d7dfa03p-106 +inf + 53 +0 +inf 53 0x142d169d7dfa03p-106 +1 53 0x1fffffffffffffp-50 +inf + 53 8 +inf 53 -0x114b37f4b51f71p-107 +0 53 8 +inf + 53 8 +inf 53 +0 +1 53 8 +inf + 53 8 +inf 53 0x114b37f4b51f71p-107 + +0 53 +inf +inf 53 +inf +inf 53 -0x170ef54646d497p-109 +0 53 +inf +inf 53 +inf +inf 53 -0 +0 53 +inf +inf 53 +inf +inf 53 0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan 53 -0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan 53 +0 +0 53 +inf nan 53 +inf nan 53 0x170ef54646d497p-109 + +# regular values +0 53 -0x1fb53d14aa9c2fp-47 -0x18353d14aa9c2fp-47 + 53 -32 -17 53 -0xfb53d14aa9c2fp-47 +0 53 +0 0x7353d14aa9c2fp-47 + 53 -0xfb53d14aa9c2fp-47 -17 53 0xfb53d14aa9c2fp-47 +0 53 -0x104ac2eb5563d1p-48 -0 + 53 -32 -0xfb53d14aa9c2fp-48 53 0xfb53d14aa9c2fp-48 + +0 53 0x15b456789abcdfp-48 0x123456789abd17p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 53 3.5 +1 53 0x3923456789abcdp-52 0x123456789abd17p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 53 3.5 +2 53 0x18p-4 0x101a3456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 53 256.5 +3 53 0xfff8p-4 0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 53 4097.5 + +0 53 0xeb456789abcdfp-48 0x123456789abca7p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 53 -3.5 +1 53 -0x36dcba98765434p-52 0x123456789abca7p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 53 -3.5 +2 53 -0x1ff8p-4 -0xff5cba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 53 -256.5 +3 53 -0x10038p-4 -0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 53 -4097.5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add_q.dat b/Build/source/libs/mpfi/mpfi-src/tests/add_q.dat new file mode 100644 index 00000000000..7169b8389c4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add_q.dat @@ -0,0 +1,88 @@ +# data file for mpfi_add_q +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1/1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1/1 +0 53 nan -inf 53 nan -inf -3/1 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3/1 +0 53 nan -14 53 nan -7 -7/1 +0 53 nan -7 53 nan -7 0 +0 53 nan -0 53 nan -7 7/1 +0 53 nan -15 53 nan -0 -15/1 +0 53 nan -0 53 nan -0 0 +0 53 nan +15 53 nan -0 15/1 +0 53 nan -30 53 nan +1 -31/1 +0 53 nan +1 53 nan +1 0 +0 53 nan +32 53 nan +1 31/1 +0 53 nan +inf 53 nan +inf -63/1 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63/1 +0 53 -inf -inf 53 -inf -inf -2/1 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2/1 +0 53 -inf -11 53 -inf -7 -4/1 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -3 53 -inf -7 4/1 +0 53 -inf -8 53 -inf -0 -8/1 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf +8 53 -inf -0 8/1 +0 53 -inf -8 53 -inf +8 -16/1 +0 53 -inf +8 53 -inf +8 0 +0 53 -inf +24 53 -inf +8 16/1 +0 53 -inf +inf 53 -inf +inf -32/1 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32/1 +0 53 -inf nan 53 -inf nan -64/1 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64/1 +0 53 -1 -1 53 +0 -0 -1/1 +0 53 +0 -0 53 +0 -0 0 +0 53 +1 +1 53 +0 -0 1/1 +0 53 -3 +5 53 +0 +8 -3/1 +0 53 +0 +8 53 +0 +8 0 +0 53 +3 +11 53 +0 +8 3/1 +0 53 -7 +inf 53 +0 +inf -7/1 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +7 +inf 53 +0 +inf 7/1 +0 53 +inf +inf 53 +inf +inf -1/1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1/1 +0 53 +inf nan 53 +inf nan -1/1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1/1 + +# regular values +0 53 -64 -49 53 -32 -17 -32/1 +0 53 +0 +15 53 -32 -17 32/1 +0 53 -15 -0 53 -32 -17 17/1 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf 3/1 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf 3/1 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 256/1 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001/1 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf -3/1 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf -3/1 +2 53 -0x1ff -0xfedcba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 -256/1 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 -0x1001/1 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add_si.dat b/Build/source/libs/mpfi/mpfi-src/tests/add_si.dat new file mode 100644 index 00000000000..f8670ba8433 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add_si.dat @@ -0,0 +1,88 @@ +# data file for mpfi_add_si +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf -3 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -14 53 nan -7 -7 +0 53 nan -7 53 nan -7 0 +0 53 nan -0 53 nan -7 7 +0 53 nan -15 53 nan -0 -15 +0 53 nan -0 53 nan -0 0 +0 53 nan +15 53 nan -0 15 +0 53 nan -30 53 nan +1 -31 +0 53 nan +1 53 nan +1 0 +0 53 nan +32 53 nan +1 31 +0 53 nan +inf 53 nan +inf -63 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf -2 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf +2 +0 53 -inf -11 53 -inf -7 -4 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -3 53 -inf -7 4 +0 53 -inf -8 53 -inf -0 -8 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf +8 53 -inf -0 8 +0 53 -inf -8 53 -inf +8 -16 +0 53 -inf +8 53 -inf +8 0 +0 53 -inf +24 53 -inf +8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf +32 +0 53 -inf nan 53 -inf nan -64 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan +64 +0 53 -1 -1 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 +1 +1 53 +0 -0 1 +0 53 -3 +5 53 +0 +8 -3 +0 53 +0 +8 53 +0 +8 0 +0 53 +3 +11 53 +0 +8 3 +0 53 -7 +inf 53 +0 +inf -7 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +7 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf -1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan -1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -64 -49 53 -32 -17 -32 +0 53 +0 +15 53 -32 -17 32 +0 53 -15 -0 53 -32 -17 17 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf 3 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf 3 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 256 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf -3 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf -3 +2 53 -0x1ff -0xfedcba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 -256 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 -0x1001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add_ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/add_ui.dat new file mode 100644 index 00000000000..e812c38cd12 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add_ui.dat @@ -0,0 +1,61 @@ +# data file for mpfi_add_ui +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -7 53 nan -7 0 +0 53 nan -0 53 nan -7 7 +0 53 nan -0 53 nan -0 0 +0 53 nan +15 53 nan -0 15 +0 53 nan +1 53 nan +1 0 +0 53 nan +32 53 nan +1 31 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 1 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -6 53 -inf -7 1 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf +2 53 -inf -0 2 +0 53 -inf +8 53 -inf +8 0 +0 53 -inf +12 53 -inf +8 4 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 4 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 8 +0 53 +0 -0 53 +0 -0 0 +0 53 +1 +1 53 +0 -0 1 +0 53 +0 +8 53 +0 +8 0 +0 53 +3 +11 53 +0 +8 3 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +7 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 +0 +15 53 -32 -17 32 +0 53 -15 -0 53 -32 -17 17 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf 3 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf 3 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 256 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/add_z.dat b/Build/source/libs/mpfi/mpfi-src/tests/add_z.dat new file mode 100644 index 00000000000..0218f3073ea --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/add_z.dat @@ -0,0 +1,88 @@ +# data file for mpfi_add_z +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf -3 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -14 53 nan -7 -7 +0 53 nan -7 53 nan -7 0 +0 53 nan -0 53 nan -7 7 +0 53 nan -15 53 nan -0 -15 +0 53 nan -0 53 nan -0 0 +0 53 nan +15 53 nan -0 15 +0 53 nan -30 53 nan +1 -31 +0 53 nan +1 53 nan +1 0 +0 53 nan +32 53 nan +1 31 +0 53 nan +inf 53 nan +inf -63 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf -2 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 -inf -11 53 -inf -7 -4 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -3 53 -inf -7 4 +0 53 -inf -8 53 -inf -0 -8 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf +8 53 -inf -0 8 +0 53 -inf -8 53 -inf +8 -16 +0 53 -inf +8 53 -inf +8 0 +0 53 -inf +24 53 -inf +8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 -inf nan 53 -inf nan -64 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64 +0 53 -1 -1 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 +1 +1 53 +0 -0 1 +0 53 -3 +5 53 +0 +8 -3 +0 53 +0 +8 53 +0 +8 0 +0 53 +3 +11 53 +0 +8 3 +0 53 -7 +inf 53 +0 +inf -7 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +7 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf -1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan -1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -64 -49 53 -32 -17 -32 +0 53 +0 +15 53 -32 -17 32 +0 53 -15 -0 53 -32 -17 17 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf 3 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf 3 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 256 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf -3 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf -3 +2 53 -0x1ff -0xfedcba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 -256 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 -0x1001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/asin.dat b/Build/source/libs/mpfi/mpfi-src/tests/asin.dat new file mode 100644 index 00000000000..ce29ae2eacc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/asin.dat @@ -0,0 +1,43 @@ +# data file for mpfi_asin +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan 0x1921fb54442d19p-52 53 nan +1 +0 53 nan nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -0 53 -inf -0 +0 53 nan nan 53 -inf +8 +0 53 nan nan 53 -inf +inf +1 53 -0x1921fb54442d19p-52 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x1921fb54442d19p-52 53 +0 +1 +0 53 +0 nan 53 +0 +8 +0 53 +0 nan 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 nan nan 53 -6 -4 +0 53 nan -0x10c152382d7365p-53 53 -2 -0.5 +3 53 -0x1921fb54442d19p-52 -0x10c152382d7365p-53 53 -1 -0.5 +3 53 -0x1b235315c680ddp-53 -0x102be9ce0b87cdp-54 53 -0.75 -0.25 +3 53 -0x860a91c16b9b3p-52 0x860a91c16b9b3p-52 53 -0.5 0.5 +3 53 0x102be9ce0b87cdp-54 0x159aad71ced00fp-53 53 0.25 0.625 +3 53 -0x1921fb54442d19p-52 0x1921fb54442d19p-52 53 -1 1 +0 53 0x8055f06094f0fp-54 nan 53 0.125 17 +0 53 nan nan 53 17 42 +0 53 nan nan 53 -42 17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/asinh.dat b/Build/source/libs/mpfi/mpfi-src/tests/asinh.dat new file mode 100644 index 00000000000..8e269763b31 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/asinh.dat @@ -0,0 +1,43 @@ +# data file for mpfi_asinh +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -inf 53 nan -inf +0 53 -0xa9394648daf8fp-50 nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan 0x1c34366179d427p-53 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 -inf -inf 53 -inf -inf +2 53 -inf -0x152728c91b5f1dp-51 53 -inf -7 +0 53 -inf -0 53 -inf -0 +2 53 -inf 0x58d8dc657eaf5p-49 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +1 53 -0x1c34366179d427p-53 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x1c34366179d427p-53 53 +0 +1 +2 53 +0 0x58d8dc657eaf5p-49 53 +0 +8 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +3 53 -0x4fbca919fe219p-49 -0x10c1f8a6e80eebp-51 53 -6 -4 +3 53 -0x2e32430627a11p-49 -0x1ecc2caec51609p-54 53 -2 -0.5 +3 53 -0x1c34366179d427p-53 -0x1ecc2caec51609p-54 53 -1 -0.5 +3 53 -0x162e42fefa39fp-49 -0xfd67d91ccf31bp-54 53 -0.75 -0.25 +3 53 -0xf661657628b05p-53 0xf661657628b05p-53 53 -0.5 0.5 +3 53 0xfd67d91ccf31bp-54 0x4b89d40b2fecdp-51 53 0.25 0.625 +3 53 -0x1c34366179d427p-53 0x1c34366179d427p-53 53 -1 1 +3 53 0xff5685b4cb4b9p-55 0xe1be0ba541ef7p-50 53 0.125 17 +3 53 0x1c37c174a83dedp-51 0x8dca6976ad6bdp-49 53 17 42 +3 53 -0x8dca6976ad6bdp-49 0xe1be0ba541ef7p-50 53 -42 17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/atan.dat b/Build/source/libs/mpfi/mpfi-src/tests/atan.dat new file mode 100644 index 00000000000..48360c934e1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/atan.dat @@ -0,0 +1,43 @@ +# data file for mpfi_atan +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -0x3243f6a8885a3p-49 53 nan -inf +0 53 -0x16dcc57bb565fdp-52 nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan 0x1921fb54442d19p-53 53 nan +1 +0 53 0x3243f6a8885a3p-49 nan 53 +inf nan +3 53 -0x1921fb54442d19p-52 -0x3243f6a8885a3p-49 53 -inf -inf +3 53 -0x1921fb54442d19p-52 -0x5b7315eed597fp-50 53 -inf -7 +1 53 -0x1921fb54442d19p-52 -0 53 -inf -0 +3 53 -0x1921fb54442d19p-52 0xb924fd54cb511p-51 53 -inf +8 +3 53 -0x1921fb54442d19p-52 0x1921fb54442d19p-52 53 -inf +inf +1 53 -0x1921fb54442d19p-53 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x1921fb54442d19p-53 53 +0 +1 +2 53 +0 0xb924fd54cb511p-51 53 +0 +8 +2 53 +0 0x1921fb54442d19p-52 53 +0 +inf +3 53 0x3243f6a8885a3p-49 0x1921fb54442d19p-52 53 +inf +inf + +# regular values +3 53 -0x167d8863bc99bdp-52 -0x54da32547a73fp-50 53 -6 -4 +3 53 -0x11b6e192ebbe45p-52 -0x1dac670561bb4fp-54 53 -2 -0.5 +3 53 -0x1921fb54442d19p-53 -0x1dac670561bb4fp-54 53 -1 -0.5 +3 53 -0xa4bc7d1934f71p-52 -0x1f5b75f92c80ddp-55 53 -0.75 -0.25 +3 53 -0x1dac670561bb5p-50 0x1dac670561bb5p-50 53 -0.5 0.5 +3 53 0x1f5b75f92c80ddp-55 0x47802eaf7bfadp-51 53 0.25 0.625 +3 53 -0x1921fb54442d19p-53 0x1921fb54442d19p-53 53 -1 1 +3 53 0x1fd5ba9aac2f6dp-56 0x1831516233f561p-52 53 0.125 17 +3 53 0xc18a8b119fabp-47 0x18c079f3350d27p-52 53 17 42 +3 53 -0x18c079f3350d27p-52 0x1831516233f561p-52 53 -42 17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/atan2.dat b/Build/source/libs/mpfi/mpfi-src/tests/atan2.dat new file mode 100644 index 00000000000..cc2247d3f5f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/atan2.dat @@ -0,0 +1,54 @@ +# data file for mpfi_atan2 +# +# for a description of the fields: see add.dat + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan -0 53 -8 +1 +0 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan nan 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan +1 53 nan -0 +3 53 -0x12d97c7f3321d3p-51 -0x96cbe3f9990e9p-50 53 -inf -inf 53 -inf -inf +3 53 -0x6d9cc4b34bd0dp-50 -0x1700a7c5784633p-53 53 -inf -7 53 -1 +8 +1 53 -0x1921fb54442d19p-52 -0 53 -inf -0 53 +8 +inf +1 53 -0x1921fb54442d19p-53 -0 53 -inf -0 53 +inf +inf +3 53 -0x1921fb54442d19p-52 0x1921fb54442d19p-52 53 -inf +8 53 +0 +8 +3 53 -0x1921fb54442d19p-52 0x1921fb54442d19p-52 53 -inf +inf 53 +0 +8 +3 53 -0x1921fb54442d19p-51 0x1921fb54442d19p-51 53 +0 -0 53 -inf -7 +3 53 0x3243f6a8885a3p-49 0x1921fb54442d19p-51 53 +0 +8 53 -7 -0 +0 53 +0 -0 53 +0 -0 53 +0 +8 +2 53 +0 0x1921fb54442d19p-52 53 +0 +inf 53 +0 +8 +0 53 +0 -0 53 +0 -0 53 +8 +inf +0 53 nan nan 53 +0 +8 53 +inf nan +3 53 -0x1921fb54442d19p-51 0x1921fb54442d19p-51 53 +0 -0 53 -inf +inf +2 53 +0 0x1921fb54442d19p-51 53 +0 +8 53 -7 +8 +3 53 -0x1921fb54442d19p-51 0x1921fb54442d19p-51 53 +0 -0 53 +0 -0 +2 53 +0 0x1921fb54442d19p-52 53 +0 +inf 53 +0 +8 +0 53 nan nan 53 +0 nan 53 +8 +inf +0 53 +0 -0 53 +0 +8 53 +inf +inf +3 53 0x3243f6a8885a3p-49 0x12d97c7f3321d3p-51 53 +inf +inf 53 -inf +3 +3 53 0x3243f6a8885a3p-50 0x1921fb54442d19p-52 53 +inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf 53 +3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 nan nan 53 +inf nan 53 +inf +inf +0 53 nan nan 53 +inf nan 53 -3 +7 + +# regular values +3 53 -0x191f6c4c09a81bp-51 -0x1a12a5465464cfp-52 53 -17 -5 53 -4002 -1 +3 12 -0xc9p-6 -0x2bfp-9 53 -17 -5 53 -4002 1 +3 53 -0x1831516233f561p-52 -0xa3c20ea13f5e5p-61 12 -17 -5 53 1 4002 +3 12 -0xc19p-11 0xafdp-11 12 -17 5 53 1 4002 +3 53 0xa3c20ea13f5e5p-61 0x1831516233f561p-52 53 5 17 12 1 4002 +3 12 0x2bfp-9 0xc9p-6 53 5 17 12 -4002 1 +3 53 0x1a12a5465464cfp-52 0x191f6c4c09a81bp-51 12 5 17 12 -4002 -1 +3 12 -0xc91p-10 0xc91p-10 12 -17 5 12 -4002 -1 +3 53 -0x1921fb54442d19p-51 0x1921fb54442d19p-51 53 -17 5 53 -4002 1 \ No newline at end of file diff --git a/Build/source/libs/mpfi/mpfi-src/tests/atanh.dat b/Build/source/libs/mpfi/mpfi-src/tests/atanh.dat new file mode 100644 index 00000000000..6ec0f04f311 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/atanh.dat @@ -0,0 +1,46 @@ +# data file for mpfi_atanh +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 -inf nan 53 -1 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan +inf 53 nan +1 +0 53 nan nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -0x8c9f53d568185p-52 53 -inf -0.5 +0 53 nan -0 53 -inf -0 +0 53 nan +inf 53 -inf +1 +0 53 nan nan 53 -inf +8 +0 53 nan nan 53 -inf +inf +0 53 -inf -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +0 53 +0 +inf 53 +0 +1 +0 53 +0 nan 53 +0 +8 +0 53 +0 nan 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 nan nan 53 -6 -4 +0 53 nan -0x8c9f53d568185p-52 53 -2 -0.5 +2 53 -inf -0x8c9f53d568185p-52 53 -1 -0.5 +3 53 -0x3e44e55c64b4bp-50 -0x1058aefa811451p-54 53 -0.75 -0.25 +3 53 -0x1193ea7aad030bp-53 0x1193ea7aad030bp-53 53 -0.5 0.5 +3 53 0x1058aefa811451p-54 0x2eec3bb76c2b3p-50 53 0.25 0.625 +0 53 -inf +inf 53 -1 1 +1 53 0x1015891c9eaef7p-55 +inf 53 0.125 1 +0 53 0x1015891c9eaef7p-55 nan 53 0.125 17 +0 53 nan nan 53 17 42 +0 53 nan nan 53 -42 17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/bisect.dat b/Build/source/libs/mpfi/mpfi-src/tests/bisect.dat new file mode 100644 index 00000000000..b75e18c6e14 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/bisect.dat @@ -0,0 +1,60 @@ +# data file for mpfi_bisect +# +# column fields: +# 1: return value +# 2: precision of left half +# 3: left endpoint value of left half +# 4: right endpoint value of left half +# 5: precision of right half +# 6: left endpoint value of right half +# 7: right endpoint value of right half +# +# 8: precision of input argument +# 9: left endpoint value of input argument +# 10: right endpoint value of input argument +# + +# special values +0 53 nan nan 53 nan nan 53 nan -inf +0 53 nan nan 53 nan nan 53 nan -8 +0 53 nan nan 53 nan nan 53 -8 nan +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 nan 5 +0 53 nan nan 53 nan nan 53 5 nan +0 53 nan nan 53 nan nan 53 nan +inf +0 53 nan nan 53 nan nan 53 nan nan +0 53 -inf -inf 53 nan nan 53 -inf -inf +0 53 -inf -8 53 nan nan 53 -inf -8 +0 53 -inf -0 53 nan nan 53 -inf -0 +0 53 -inf 5 53 nan nan 53 -inf 5 +0 53 -inf +inf 53 nan nan 53 -inf +inf +0 53 nan nan 53 nan nan 53 -inf nan +0 53 -8 -4 53 -4 -0 53 -8 -0 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 +0 2.5 53 2.5 5 53 +0 5 +0 53 +0 +inf 53 nan nan 53 +0 +inf +0 53 5 +inf 53 nan nan 53 5 +inf +0 53 +inf +inf 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 +inf nan + +# regular values +# same precision: [2, 2^53] -> [2, 2^52+1] u [2^52+1, 2^53] +0 53 2 0x10000000000001 + 53 0x10000000000001 0x1p+53 + 53 2 0x1p+53 + +# double rounding error: it should be [1, 2^53+2] u [2^53, 2^54] +- 52 1 0x1p+53 + 52 0x1p+53 0x1p+54 + 53 1 0x1p+54 + +# double rounding error: it should be [1, 2^52+1] u [2^52, 2^53] +- 53 1 0x1p+52 + 2 0x1p+52 0x1p+53 + 2 1 0x1p+53 + +# double rounding error: it should be [-1, 8] u [7, 16] ++ 2 -1 8 + 3 8 16 + 2 -1 16 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/blow.dat b/Build/source/libs/mpfi/mpfi-src/tests/blow.dat new file mode 100644 index 00000000000..a60222552f5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/blow.dat @@ -0,0 +1,106 @@ +# data file for mpfi_blow +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of second parameter +# 8: second parameter value + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan 53 nan nan -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 0.0 +0 53 nan nan 53 nan nan 0x170ef54646d497p-109 +0 53 nan nan 53 nan -inf -0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -inf 0.0 +0 53 nan nan 53 nan -inf 0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -7 -0xfc339ab0a6b53p-99 +0 53 nan nan 53 nan -7 0.0 +0 53 nan nan 53 nan -7 7.0 +0 53 nan nan 53 nan -0 -15.0 +0 53 nan nan 53 nan -0 0.0 +0 53 nan nan 53 nan -0 15.0 +0 53 nan nan 53 nan +1 -0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +1 0.0 +0 53 nan nan 53 nan +1 0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +inf -0x5acae5c4b6e51p-101 +0 53 nan nan 53 nan +inf 0.0 +0 53 nan nan 53 nan +inf 0x5acae5c4b6e51p-101 + +#no definite center in infinite intervals +0 53 nan nan 53 -inf -inf -0x170ef54646d497p-108 +0 53 nan nan 53 -inf -inf 0.0 +0 53 nan nan 53 -inf -inf 0x170ef54646d497p-108 +0 53 -inf nan 53 -inf -7 -0x170ef54646d497p-107 +0 53 -inf nan 53 -inf -7 0.0 +0 53 -inf nan 53 -inf -7 0x170ef54646d497p-107 +0 53 -inf nan 53 -inf -0 -0x170ef54646d497p-106 +0 53 -inf nan 53 -inf -0 0.0 +0 53 -inf nan 53 -inf -0 0x170ef54646d497p-106 +0 53 -inf nan 53 -inf 8 -0x16345785d8a00000 +0 53 -inf nan 53 -inf 8 0.0 +0 53 -inf nan 53 -inf 8 0x16345785d8a00000 +0 53 nan nan 53 -inf +inf -0x170ef54646d497p-105 +0 53 nan nan 53 -inf +inf 0.0e-17 +0 53 nan nan 53 -inf +inf +0x170ef54646d497p-105 +0 53 nan nan 53 -inf nan -0x170ef54646d497p-104 +0 53 nan nan 53 -inf nan 0.0e-17 +0 53 nan nan 53 -inf nan +0x170ef54646d497p-104 + +0 53 +0 -0 + 53 +0 -0 -0x170ef54646d497p-109 +0 53 +0 -0 + 53 +0 -0 0.0 +0 53 +0 -0 + 53 +0 -0 0x170ef54646d497p-109 +3 53 -0x1p-49 0x10000000000001p-49 + 53 +0 8 -0x3p-53 +3 53 -0x1p-50 0x10000000000001p-49 + 53 +0 8 -0x1p-53 +3 53 -0x1p-50 0x10000000000001p-49 + 53 +0 8 -0x114b37f4b51f71p-107 +0 53 +0 8 + 53 +0 8 0.0 +0 53 -1 9 + 53 +0 8 0.25 +3 53 -0x1p-50 0x10000000000001p-49 + 53 +0 8 0x114b37f4b51f7p-103 + +#no definite center in infinite intervals +0 53 nan +inf 53 +0 +inf -0x50b45a75f7e81p-104 +0 53 nan +inf 53 +0 +inf 0.0 +0 53 nan +inf 53 +0 +inf 0x142d169d7dfa03p-106 +0 53 nan nan 53 +inf +inf -0x170ef54646d497p-109 +0 53 nan nan 53 +inf +inf 0.0 +0 53 nan nan 53 +inf +inf 0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan -0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 0.0 +0 53 nan nan 53 +inf nan 0x170ef54646d497p-109 + +# regular values +0 53 -48 -0 + 53 -32 -16 -2.0 +3 53 -0x10000000000002p-51 0x10000000000001p-51 + 53 -0x10000000000001p-52 1 1.0 + +0 04 -8 8 + 53 -1 1 7.0 +1 04 -18 3 + 53 -15 1 0.25 + +0 53 0 4 + 53 0x3p-1 0x5p-1 3.0 +2 53 0x1p-1 0x10000000000002 + 53 0x1 0x10000000000001 0x1p-52 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/bounded_p.dat b/Build/source/libs/mpfi/mpfi-src/tests/bounded_p.dat new file mode 100644 index 00000000000..5fdea7728f5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/bounded_p.dat @@ -0,0 +1,41 @@ +# data file for mpfi_bounded_p +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan +0 53 -inf -inf +0 53 -inf -8 +0 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan ++ 53 -8 -0 ++ 53 +0 -0 ++ 53 +0 5 +0 53 +0 +inf +0 53 5 +inf +0 53 +inf +inf +0 53 +inf nan + +# regular values ++ 8 -34 -17 ++ 8 -8 -1 ++ 8 -34 17 ++ 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 +8 +0x7fffffffffffbp+51 ++ 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/cbrt.dat b/Build/source/libs/mpfi/mpfi-src/tests/cbrt.dat new file mode 100644 index 00000000000..5317ff9e93d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/cbrt.dat @@ -0,0 +1,31 @@ +# data file for mpfi_cbrt +# +# column fields: see neg.dat + +# special values +0 53 nan nan 53 nan nan +0 53 nan -inf 53 nan -inf +0 53 -4 nan 53 -64 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan +1 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 -inf -inf 53 -inf -inf +0 53 -inf -5 53 -inf -125 +0 53 -inf -0 53 -inf -0 +0 53 -inf +4 53 -inf +64 +0 53 -inf +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +0 53 +0 +3 53 +0 +27 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 4 5 + 53 0x40 0x7d +1 53 -0x2e5e58c0083b7bp-154 6 + 53 -0x1856e4be527197p-354 0xd8 +2 53 -3 0x23f19d36b0a0bbp-459 + 53 -0x1b 0x16acbb5e3f08a3p-1270 +3 53 0x2b8172e535d44dp-385 0x24cbd1c55aaa1p-258 + 53 0x141a9019a2184dp-1047 0xc29c78c66ac0fp-678 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/check_data.c b/Build/source/libs/mpfi/mpfi-src/tests/check_data.c new file mode 100644 index 00000000000..37617ed315e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/check_data.c @@ -0,0 +1,47 @@ +/* check_data.c -- Tests from data file. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +/* public main function */ + +void +check_data (mpfi_function_ptr function, const char *file_name) +{ + FILE *fp; + + fp = open_file (file_name); + init_reading (fp); + + while (nextchar != EOF) { + function->read_line (function, fp); + function->check_line (function); + } + + close_file (fp); +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/const_catalan.dat b/Build/source/libs/mpfi/mpfi-src/tests/const_catalan.dat new file mode 100644 index 00000000000..51ad54d088a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/const_catalan.dat @@ -0,0 +1,5 @@ +# data file for mpfi_const_catalan +# +3 1021 + 0x1d4f9713e8135d08a42b045c6fa65a18c7d887c270385ff012944c7cb4799aedf29b80b148ddd8b0b1f249acc7ee73885d92bf1b425e2d7f8b176418fe40c74d8dedbca019729e6b19fbd908570a3eef7b44aa5059c124142ffe9fe8ce71f1cb4f8dcd131eb40305a86eb34ead01a038d186f000a276751baeccd35f2335d9dp-1017 + 0x1d4f9713e8135d08a42b045c6fa65a18c7d887c270385ff012944c7cb4799aedf29b80b148ddd8b0b1f249acc7ee73885d92bf1b425e2d7f8b176418fe40c74d8dedbca019729e6b19fbd908570a3eef7b44aa5059c124142ffe9fe8ce71f1cb4f8dcd131eb40305a86eb34ead01a038d186f000a276751baeccd35f2335d9d1p-1021 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/const_euler.dat b/Build/source/libs/mpfi/mpfi-src/tests/const_euler.dat new file mode 100644 index 00000000000..5977673ef6f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/const_euler.dat @@ -0,0 +1,5 @@ +# data file for mpfi_const_euler +# +3 1021 + 0x12788cfc6fb618f49a37c7f0202a596ad439d9875ecb980321807be68e135ff7b1c96b3f40753e1dda0c93996c420afa220ad5d226426b411c8768ce7ae975fd4b1bd70f1990dae67b7cf7e702a966d9f152da2acf133555c1813a9916d6f70dfa543d43bcc5ff0c87d8f84e304f2ee44bcd585e17ac38e8d2c2a85479c77d4bp-1021 + 0x49e233f1bed863d268df1fc080a965ab50e7661d7b2e600c8601ef9a384d7fdec725acfd01d4f87768324e65b1082be8882b57489909ad04721da339eba5d7f52c6f5c3c66436b99edf3df9c0aa59b67c54b68ab3c4cd5570604ea645b5bdc37e950f50ef317fc321f63e138c13cbb912f3561785eb0e3a34b0aa151e71df53p-1019 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/const_log2.dat b/Build/source/libs/mpfi/mpfi-src/tests/const_log2.dat new file mode 100644 index 00000000000..764f2014f82 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/const_log2.dat @@ -0,0 +1,5 @@ +# data file for mpfi_const_log2 +# +3 1021 + 0x2c5c85fdf473de6af278ece600fcbdabd03cd0c99ca62d8b628345d6e2eabe8af9ee1d881b7aeb26156554bed2be86c43b4bab8d704e085109d5ceca445a6e094fa5b2858892ba3146b2f6844c5f0e1fae7aa6f0ec4d980ec95be83b1d95fdd2dcb3a1ec67595232bd77e9af4e0c0c921957e861cbc838e8b68b65f143cff57p-1018 + 0x162e42fefa39ef35793c7673007e5ed5e81e6864ce5316c5b141a2eb71755f457cf70ec40dbd75930ab2aa5f695f43621da5d5c6b827042884eae765222d3704a7d2d942c4495d18a3597b42262f870fd73d53787626cc0764adf41d8ecafee96e59d0f633aca9195ebbf4d7a70606490cabf430e5e41c745b45b2f8a1e7fab9p-1021 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/const_pi.dat b/Build/source/libs/mpfi/mpfi-src/tests/const_pi.dat new file mode 100644 index 00000000000..4cb47992703 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/const_pi.dat @@ -0,0 +1,5 @@ +# data file for mpfi_const_pi +# +3 1021 + 0x1921fb54442d18469898cc51701b839a252049c1114cf98e804177d4c76273644a29410f31c6809bbdf2a33679a748636605614dbe4be286e9fc26adadaa3848bc90b6aecc4bcfd8de89885d34c6fdad617feb96de80d6fdbdc70d7f6b5133f4b5d3e4822f8963fcc9250cca3d9c8b67b8400f97142c77e0b31b4906c38aba73p-1019 + 0x6487ed5110b4611a62633145c06e0e68948127044533e63a0105df531d89cd9128a5043cc71a026ef7ca8cd9e69d218d98158536f92f8a1ba7f09ab6b6a8e122f242dabb312f3f637a262174d31bf6b585ffae5b7a035bf6f71c35fdad44cfd2d74f9208be258ff324943328f6722d9ee1003e5c50b1df82cc6d241b0e2ae9dp-1017 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/cos.dat b/Build/source/libs/mpfi/mpfi-src/tests/cos.dat new file mode 100644 index 00000000000..477f20b2acc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/cos.dat @@ -0,0 +1,73 @@ +# data file for mpfi_cos +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 nan nan 53 -inf -inf +0 53 -1 1 53 -inf -7 +0 53 -1 1 53 -inf -0 +0 53 -1 1 53 -inf +8 +0 53 -1 1 53 -inf +inf +1 53 0x114a280fb5068bp-53 1 53 -1 -0 +0 53 1 1 53 +0 -0 +1 53 0x114a280fb5068bp-53 1 53 +0 +1 +0 53 -1 1 53 +0 +8 +0 53 -1 1 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +3 53 -0x1aa22657537205p-54 0x1c1528065b7d5p-49 53 -2 -0.5 +3 53 0x114a280fb5068bp-53 0xf80aa4fbef751p-52 53 -1 -0.25 +1 53 0x1c1528065b7d4fp-53 1 53 -0.5 0.5 +0 53 -1 1 53 -4.5 0.625 +3 53 -1 0x4528a03ed41a3p-51 53 1 0x3243f6a8885a3p-48 +0 53 -1 1 53 0.125 17 +0 53 -1 1 53 17 42 + +0 53 -1 1 53 -7 1 +0 53 -1 1 53 -7 -0 +0 53 -1 1 53 -7 -1 +0 53 -1 1 53 -7 -2 +0 53 -1 1 53 -7 -3 +1 53 -0x14eaa606db24c1p-53 1 53 -7 -4 +1 53 0x122785706b4ad9p-54 1 53 -7 -5 +1 53 0x181ff79ed92017p-53 1 53 -7 -6 +3 53 0x181ff79ed92017p-53 0x181ff79ed92018p-53 53 -7 -7 + +0 53 -1 1 53 -6 1 +0 53 -1 1 53 -6 -0 +2 53 -1 0x1eb9b7097822f6p-53 53 -6 -1 +2 53 -1 0x1eb9b7097822f6p-53 53 -6 -2 +2 53 -1 0x1eb9b7097822f6p-53 53 -6 -3 +3 53 -0x14eaa606db24c1p-53 0x1eb9b7097822f6p-53 53 -6 -4 +3 53 0x122785706b4ad9p-54 0x1eb9b7097822f6p-53 53 -6 -5 +3 53 0x1eb9b7097822f5p-53 0x1eb9b7097822f6p-53 53 -6 -6 + +0 53 -1 1 53 -5 1 +0 53 -1 1 53 -5 -0 +2 53 -1 0x114a280fb5068cp-53 53 -5 -1 +2 53 -1 0x122785706b4adap-54 53 -5 -2 +2 53 -1 0x122785706b4adap-54 53 -5 -3 +3 53 -0x14eaa606db24c1p-53 0x122785706b4adap-54 53 -5 -4 +3 53 0x122785706b4ad9p-54 0x122785706b4adap-54 53 -5 -5 + +0 53 -1 1 53 -4 1 +0 53 -1 1 53 -4 -0 +2 53 -1 0x114a280fb5068cp-53 53 -4 -1 +2 53 -1 -0x1aa22657537204p-54 53 -4 -2 +2 53 -1 -0x14eaa606db24c0p-53 53 -4 -3 +3 53 -0x14eaa606db24c1p-53 -0x14eaa606db24c0p-53 53 -4 -4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/cosh.dat b/Build/source/libs/mpfi/mpfi-src/tests/cosh.dat new file mode 100644 index 00000000000..4eb48962b68 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/cosh.dat @@ -0,0 +1,37 @@ +# data file for mpfi_cosh +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 +inf +inf 53 -inf -inf +1 53 0x11228949ba3a8bp-43 +inf 53 -inf -7 +0 53 1 +inf 53 -inf -0 +0 53 1 +inf 53 -inf +8 +0 53 1 +inf 53 -inf +inf +2 53 1 0x18b07551d9f551p-52 53 -1 -0 +0 53 1 1 53 +0 -0 +2 53 1 0x18b07551d9f551p-52 53 +0 +1 +2 53 1 0x1749eaa93f4e77p-42 53 +0 +8 +0 53 1 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +2 53 1 0x10200aac16db6fp-52 53 -0.125 -0 +2 53 1 0x120ac1862ae8d1p-52 53 0 0x10000000000001p-53 +3 53 0x99d310a496b6dp-51 0x1681ceb0641359p-47 53 -4.5 -0.625 +3 53 0x18b07551d9f55p-48 0x1422a497d6185fp-49 53 1 3 +3 53 0x1709348c0ea503p-29 0x3ffffffffffa34p+968 53 17 0xb145bb71d3dbp-38 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/cot.dat b/Build/source/libs/mpfi/mpfi-src/tests/cot.dat new file mode 100644 index 00000000000..cf1a15d3cd2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/cot.dat @@ -0,0 +1,50 @@ +# data file for mpfi_cot +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 nan nan 53 -inf -inf +0 53 -inf +inf 53 -inf -7 +0 53 -inf +inf 53 -inf -0 +0 53 -inf +inf 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +0 53 -inf +inf 53 -8 -0 +2 53 -inf 0xe07cf2eb32f0bp-49 53 -3 -0 +2 53 -inf -0x148c05d04e1cfdp-53 53 -1 -0 +0 53 nan nan 53 +0 -0 +1 53 0x148c05d04e1cfdp-53 +inf 53 +0 +1 +1 53 -0xe07cf2eb32f0bp-49 +inf 53 +0 +3 +0 53 -inf +inf 53 +0 +8 +0 53 -inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values + +3 53 0x1d4a42e92faa4dp-54 0xe07cf2eb32f0bp-49 53 -3 -2 +3 53 0x5cb3b399d747fp-103 0xe07cf2eb32f0bp-49 + 53 -3 -0x1921fb54442d19p-52 +0 53 -inf +inf + 53 -2 0x1921fb54442d19p-52 +3 53 0xea4d6bf23e051p-51 0x1fd549f047f2bbp-50 53 0.125 0.5 +3 53 -0x172cece675d1fdp-105 0x1fd549f047f2bbp-50 + 53 0.125 0x1921fb54442d19p-52 +0 53 -inf +inf + 53 0x1921fb54442d19p-52 4 +3 53 -0x1d02967c31cdb5p-1 0x1ba35ba1c6b75dp-53 + 53 4 0x3243f6a8885a3p-47 +3 53 0x148c05d04e1fb7p-53 0x1cefdde7c84c27p-4 + 53 0x13a28c59d5433bp-44 0x9d9462ceaa19dp-43 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/coth.dat b/Build/source/libs/mpfi/mpfi-src/tests/coth.dat new file mode 100644 index 00000000000..336ad71f6ba --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/coth.dat @@ -0,0 +1,41 @@ +# data file for mpfi_coth +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 -1 -1 53 -inf -inf +1 53 -0x100001be6c882fp-52 -1 53 -inf -7 +# Note: mpfr_coth(+/- 0) returned a wrong value up to mpfr-2.4.2 +0 53 -inf -1 53 -inf -0 +0 53 -inf +inf 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +2 53 -inf -0x1000003c6ab7e7p-52 53 -8 -0 +2 53 -inf -0x10145b3cc9964bp-52 53 -3 -0 +2 53 -inf -0x150231499b6b1dp-52 53 -1 -0 +0 53 -inf +inf 53 +0 -0 +1 53 0x150231499b6b1dp-52 +inf 53 +0 +1 +1 53 0x10145b3cc9964bp-52 +inf 53 +0 +3 +1 53 0x1000003c6ab7e7p-52 +inf 53 +0 +8 +0 53 1 +inf 53 +0 +inf +0 53 1 1 53 +inf +inf + +# regular values +0 53 -inf +inf 53 -3 2 +3 53 -0x1000003c6ab7e8p-52 -0x100000011b4865p-52 53 -10 -8 +3 53 0x1000000000000fp-52 0x100001be6c882fp-52 53 7 17 +3 53 0x114fc6ceb099bdp-51 0x10005554fa502fp-46 + 53 0x10000000000001p-58 0x10000000000001p-53 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/csc.dat b/Build/source/libs/mpfi/mpfi-src/tests/csc.dat new file mode 100644 index 00000000000..6bcbc9c74e1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/csc.dat @@ -0,0 +1,149 @@ +# data file for mpfi_csc +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 nan nan 53 -inf -inf +0 53 -inf +inf 53 -inf -7 +0 53 -inf +inf 53 -inf -0 +0 53 -inf +inf 53 -inf 8 +0 53 -inf +inf 53 -inf +inf +0 53 -inf +inf 53 -8 -0 +0 53 -inf -1 53 -3 -0 + +2 53 -inf -0x1303aa9620b223p-52 53 -1 -0 + +0 53 -inf +inf 53 +0 -0 + +1 53 0x1303aa9620b223p-52 +inf 53 +0 +1 + +0 53 1 +inf 53 +0 3 +0 53 -inf +inf 53 +0 8 +0 53 -inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 -inf +inf 53 -6 7 +0 53 -inf +inf 53 -6 6 +0 53 -inf +inf 53 -6 5 +0 53 -inf +inf 53 -6 4 +0 53 -inf +inf 53 -6 3 +0 53 -inf +inf 53 -6 2 +0 53 -inf +inf 53 -6 1 +0 53 -inf +inf 53 -6 -0 +0 53 -inf +inf 53 -6 -1 +0 53 -inf +inf 53 -6 -2 +0 53 -inf +inf 53 -6 -3 +2 53 1 0x1ca19615f903dap-51 53 -6 -4 +3 53 0x10af73f9df86b7p-52 0x1ca19615f903dap-51 53 -6 -5 +3 53 0x1ca19615f903d9p-51 0x1ca19615f903dap-51 53 -6 -6 + +0 53 -inf +inf 53 -5 7 +0 53 -inf +inf 53 -5 6 +0 53 -inf +inf 53 -5 5 +0 53 -inf +inf 53 -5 4 +0 53 -inf +inf 53 -5 3 +0 53 -inf +inf 53 -5 2 +0 53 -inf +inf 53 -5 1 +0 53 -inf +inf 53 -5 -0 +0 53 -inf +inf 53 -5 -1 +0 53 -inf +inf 53 -5 -2 +0 53 -inf +inf 53 -5 -3 +2 53 1 0x15243e8b2f4642p-52 53 -5 -4 +3 53 0x10af73f9df86b7p-52 0x10af73f9df86b8p-52 53 -5 -5 + +0 53 -inf +inf 53 -4 7 +0 53 -inf +inf 53 -4 6 +0 53 -inf +inf 53 -4 5 +0 53 -inf +inf 53 -4 4 +0 53 -inf +inf 53 -4 3 +0 53 -inf +inf 53 -4 2 +0 53 -inf +inf 53 -4 1 +0 53 -inf +inf 53 -4 -0 +0 53 -inf +inf 53 -4 -1 +0 53 -inf +inf 53 -4 -2 +0 53 -inf +inf 53 -4 -3 +3 53 0x15243e8b2f4641p-52 0x15243e8b2f4642p-52 53 -4 -4 + +0 53 -inf +inf 53 -3 7 +0 53 -inf +inf 53 -3 6 +0 53 -inf +inf 53 -3 5 +0 53 -inf +inf 53 -3 4 +0 53 -inf +inf 53 -3 3 +0 53 -inf +inf 53 -3 2 +0 53 -inf +inf 53 -3 1 +0 53 -inf -1 53 -3 -0 +1 53 -0x1c583c440ab0dap-50 -1 53 -3 -1 +3 53 -0x1c583c440ab0dap-50 -0x119893a272f912p-52 53 -3 -2 +3 53 -0x1c583c440ab0dap-50 -0x1c583c440ab0d9p-50 53 -3 -3 + +0 53 -inf +inf 53 -2 7 +0 53 -inf +inf 53 -2 6 +0 53 -inf +inf 53 -2 5 +0 53 -inf +inf 53 -2 4 +0 53 -inf +inf 53 -2 3 +0 53 -inf +inf 53 -2 2 +0 53 -inf +inf 53 -2 1 +0 53 -inf -1 53 -2 -0 +1 53 -0x1303aa9620b224p-52 -1 53 -2 -1 +3 53 -0x119893a272f913p-52 -0x119893a272f912p-52 53 -2 -2 + +0 53 -inf +inf 53 -1 7 +0 53 -inf +inf 53 -1 6 +0 53 -inf +inf 53 -1 5 +0 53 -inf +inf 53 -1 4 +0 53 -inf +inf 53 -1 3 +0 53 -inf +inf 53 -1 2 +0 53 -inf +inf 53 -1 1 +2 53 -inf -0x1303aa9620b223p-52 53 -1 -0 +3 53 -0x1303aa9620b224p-52 -0x1303aa9620b223p-52 53 -1 -1 + +0 53 -inf +inf 53 1 7 +0 53 -inf +inf 53 1 6 +0 53 -inf +inf 53 1 5 +0 53 -inf +inf 53 1 4 +2 53 1 0x1c583c440ab0dap-50 53 1 3 +2 53 1 0x1303aa9620b224p-52 53 1 2 +3 53 0x1303aa9620b223p-52 0x1303aa9620b224p-52 53 1 1 + +0 53 -inf +inf 53 2 7 +0 53 -inf +inf 53 2 6 +0 53 -inf +inf 53 2 5 +0 53 -inf +inf 53 2 4 +3 53 0x119893a272f912p-52 0x1c583c440ab0dap-50 53 2 3 +3 53 0x119893a272f912p-52 0x119893a272f913p-52 53 2 2 + +0 53 -inf +inf 53 3 7 +0 53 -inf +inf 53 3 6 +0 53 -inf +inf 53 3 5 +0 53 -inf +inf 53 3 4 +3 53 0x1c583c440ab0d9p-50 0x1c583c440ab0dap-50 53 3 3 + +0 53 -inf +inf 53 4 7 +1 53 -0x1ca19615f903dap-51 -1 53 4 6 +1 53 -0x15243e8b2f4642p-52 -1 53 4 5 +3 53 -0x15243e8b2f4642p-52 -0x15243e8b2f4641p-52 53 4 4 + +0 53 -inf +inf 53 5 7 +3 53 -0x1ca19615f903dap-51 -0x10af73f9df86b7p-52 53 5 6 +3 53 -0x10af73f9df86b8p-52 -0x10af73f9df86b7p-52 53 5 5 + +0 53 -inf +inf 53 6 7 +3 53 -0x1ca19615f903dap-51 -0x1ca19615f903d9p-51 53 6 6 + +3 53 +0x185a86a4ceb06cp-52 +0x185a86a4ceb06dp-52 53 7 7 + diff --git a/Build/source/libs/mpfi/mpfi-src/tests/csch.dat b/Build/source/libs/mpfi/mpfi-src/tests/csch.dat new file mode 100644 index 00000000000..b65313b8504 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/csch.dat @@ -0,0 +1,40 @@ +# data file for mpfi_csch +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 +0 -0 53 -inf -inf +1 53 -0x1de16d3cffcd54p-62 -0 53 -inf -7 +0 53 -inf -0 53 -inf -0 +0 53 -inf +inf 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +2 53 -inf -0x15fc212d92371ap-63 53 -8 -0 +2 53 -inf -0x198de80929b901p-56 53 -3 -0 +2 53 -inf -0x1b3ab8a78b90c0p-53 53 -1 -0 +0 53 -inf +inf 53 +0 -0 +1 53 0x1b3ab8a78b90c0p-53 +inf 53 +0 +1 +1 53 0x198de80929b901p-56 +inf 53 +0 +3 +1 53 0x15fc212d92371ap-63 +inf 53 +0 +8 +0 53 +0 +inf 53 +0 +inf +0 53 +0 -0 53 +inf +inf + +# regular values +0 53 -inf +inf 53 -3 2 +3 53 -0x15fc212d92371bp-63 -0x17cd79b63733a0p-66 53 -10 -8 +3 53 0x1639e3175a68a7p-76 0x1de16d3cffcd54p-62 53 7 17 +3 53 0x1eb45dc88defeap-52 0x3fff555693e722p-48 + 53 0x10000000000001p-58 0x10000000000001p-53 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/d_div.dat b/Build/source/libs/mpfi/mpfi-src/tests/d_div.dat new file mode 100644 index 00000000000..7c2af260dc1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/d_div.dat @@ -0,0 +1,86 @@ +# data file for mpfi_d_div +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan -0x170ef54646d497p-109 53 nan nan +0 53 nan nan 0.0 53 nan nan +0 53 nan nan 0x170ef54646d497p-109 53 nan nan +0 53 nan nan -0x114b37f4b51f71p-107 53 nan -inf +0 53 nan nan 0.0 53 nan -inf +0 53 nan nan 0x114b37f4b51f71p-107 53 nan -inf +0 53 nan nan -0xfc339ab0a6b53p-99 53 nan -7 +0 53 nan nan 0.0 53 nan -7 +0 53 nan nan 7.0 53 nan -7 +0 53 nan nan -15.0 53 nan -0 +0 53 nan nan 0.0 53 nan -0 +0 53 nan nan 15.0 53 nan -0 +0 53 nan nan -0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 nan nan 0.0 53 nan 1 +0 53 nan nan 0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 nan nan -0x5acae5c4b6e51p-101 53 nan +inf +0 53 nan nan 0.0 53 nan +inf +0 53 nan nan 0x5acae5c4b6e51p-101 53 nan +inf +0 53 +0 -0 -0x170ef54646d497p-108 53 -inf -inf +0 53 +0 -0 0.0 53 -inf -inf +0 53 +0 -0 0x170ef54646d497p-108 53 -inf -inf +2 53 +0 0x1a5a3ce29a1787p-110 -0x170ef54646d496p-107 53 -inf -7 +0 53 +0 -0 0.0 53 -inf -7 +1 53 -0x1a5a3ce29a1787p-110 -0 0x170ef54646d496p-107 53 -inf -7 +0 53 +0 +inf -0x170ef54646d497p-106 53 -inf -0 +0 53 +0 -0 0.0 53 -inf -0 +0 53 -inf -0 0x170ef54646d497p-106 53 -inf -0 +0 53 -inf +inf -0x16345785d8a00000 53 -inf 8 +0 53 -inf +inf 0.0 53 -inf 8 +0 53 -inf +inf 0x16345785d8a00000 53 -inf 8 +0 53 -inf +inf -0x170ef54646d497p-105 53 -inf +inf +0 53 -inf +inf 0.0e-17 53 -inf +inf +0 53 -inf +inf +0x170ef54646d497p-105 53 -inf +inf +0 53 nan nan -0x170ef54646d497p-104 53 -inf nan +0 53 nan nan 0.0e-17 53 -inf nan +0 53 nan nan +0x170ef54646d497p-104 53 -inf nan +0 53 -inf +inf -0x170ef54646d497p-109 53 +0 -0 +0 53 +0 -0 0.0 53 +0 -0 +0 53 -inf +inf 0x170ef54646d497p-109 53 +0 -0 +2 53 -inf -0x13c3ada9f391a5p-110 -0x114b37f4b51f71p-107 53 +0 7 +0 53 +0 -0 0.0 53 +0 7 +1 53 0x13c3ada9f391a5p-110 +inf 0x114b37f4b51f71p-107 53 +0 7 +0 53 -inf -0 -0x50b45a75f7e81p-104 53 +0 +inf +0 53 +0 -0 0.0 53 +0 +inf +0 53 +0 +inf 0x142d169d7dfa03p-106 53 +0 +inf +0 53 +0 -0 -0x170ef54646d497p-109 53 +inf +inf +0 53 +0 -0 0.0 53 +inf +inf +0 53 +0 -0 0x170ef54646d497p-109 53 +inf +inf +0 53 nan nan -0x170ef54646d497p-109 53 +inf nan +0 53 nan nan 0.0 53 +inf nan +0 53 nan nan 0x170ef54646d497p-109 53 +inf nan + +# regular values +0 53 -inf +inf -2.5 53 -8 8 + +0 53 0x5p-4 0.5 -2.5 53 -8 -5 +1 53 -0x1999999999999ap-56 -0x1p-4 -2.5 53 25 40 +2 53 0x5p-5 0x16db6db6db6db7p-54 -2.5 53 -16 -7 +3 53 -0x1d1745d1745d18p-55 -0x11e6efe35b4cfap-58 -2.5 53 11 143 + +0 53 0x1p-4 4 33.125 53 8.28125 530 +1 53 -0x11111111111112p-56 -0x1p-4 33.125 53 -530 -496.875 +2 53 0.125 0x13a12f684bda13p-53 33.125 53 54 265 +3 53 0x13a12f684bda12p-53 0x14627627627628p-53 33.125 53 52 54 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/d_sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/d_sub.dat new file mode 100644 index 00000000000..4785876d5b8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/d_sub.dat @@ -0,0 +1,122 @@ +# data file for mpfi_d_sub +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan -0x170ef54646d497p-109 53 nan nan +0 53 nan nan 0.0 53 nan nan +0 53 nan nan 0x170ef54646d497p-109 53 nan nan +0 53 +inf nan -0x114b37f4b51f71p-107 53 nan -inf +0 53 +inf nan 0.0 53 nan -inf +0 53 +inf nan 0x114b37f4b51f71p-107 53 nan -inf +0 53 0x1bfffffffffff8p-50 nan -0xfc339ab0a6b53p-99 53 nan -7 +0 53 7 nan 0.0 53 nan -7 +0 53 0x1c000000000007p-50 nan 0xfc339ab0a6b53p-99 53 nan -7 +0 53 -15 nan -15.0 53 nan -0 +0 53 +0 nan 0.0 53 nan -0 +0 53 15 nan 15.0 53 nan -0 +0 53 -0x8000000000001p-51 nan -0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 -1 nan 0.0 53 nan 1 +0 53 -0xfffffffffffffp-52 nan 0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 -inf nan -0x5acae5c4b6e51p-101 53 nan +inf +0 53 -inf nan 0.0 53 nan +inf +0 53 -inf nan 0x5acae5c4b6e51p-101 53 nan +inf +0 53 +inf +inf -0x170ef54646d497p-108 53 -inf -inf +0 53 +inf +inf 0.0 53 -inf -inf +0 53 +inf +inf 0x170ef54646d497p-108 53 -inf -inf +1 53 0x1bffffffffffffp-50 +inf -0x170ef54646d497p-107 53 -inf -7 +0 53 7 +inf 0.0 53 -inf -7 +1 53 7 +inf 0x170ef54646d497p-107 53 -inf -7 +0 53 -0x170ef54646d497p-96 +inf -0x170ef54646d497p-96 53 -inf -0 +0 53 +0 +inf 0.0 53 -inf -0 +0 53 0x170ef54646d497p-96 +inf 0x170ef54646d497p-96 53 -inf -0 +1 53 -0x16345785d8a00100 +inf -0x16345785d8a00000 53 -inf 8 +0 53 -8 +inf 0.0 53 -inf 8 +1 53 0x16345785d89fff00 +inf 0x16345785d8a00000 53 -inf 8 +0 53 -inf +inf -0x170ef54646d497p-105 53 -inf +inf +0 53 -inf +inf 0.0e-17 53 -inf +inf +0 53 -inf +inf 0x170ef54646d497p-105 53 -inf +inf +0 53 nan +inf -0x170ef54646d497p-104 53 -inf nan +0 53 nan +inf 0.0e-17 53 -inf nan +0 53 nan +inf 0x170ef54646d497p-104 53 -inf nan +0 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 + -0x170ef54646d497p-109 + 53 +0 -0 +0 53 +0 -0 0.0 53 +0 -0 +0 53 0x170ef54646d497p-109 0x170ef54646d497p-109 + 0x170ef54646d497p-109 + 53 +0 -0 +1 53 -0x10000000000001p-49 -0x114b37f4b51f71p-107 + -0x114b37f4b51f71p-107 + 53 +0 8 +0 53 -8 -0 0.0 53 +0 8 +1 53 -8 0x114b37f4b51f71p-107 + 0x114b37f4b51f71p-107 + 53 +0 8 +0 53 -inf -0x50b45a75f7e81p-104 + -0x50b45a75f7e81p-104 + 53 +0 +inf +0 53 -inf -0 0.0 53 +0 +inf +0 53 -inf -0x142d169d7dfa03p-106 + -0x142d169d7dfa03p-106 + 53 +0 +inf +0 53 -inf -inf 0x142d169d7dfa03p-106 53 +inf +inf +0 53 -inf -inf -0x170ef54646d497p-109 53 +inf +inf +0 53 -inf -inf 0.0 53 +inf +inf +0 53 nan -inf 0x170ef54646d497p-109 53 +inf nan +0 53 nan -inf -0x170ef54646d497p-109 53 +inf nan +0 53 nan -inf 0.0 53 +inf nan + +# regular values +0 53 -0x1fb53d14aa9c2fp-47 -0x18353d14aa9c2fp-47 + -0xfb53d14aa9c2fp-47 + 53 17 32 +0 53 +0 0x7353d14aa9c2fp-47 + 0xfb53d14aa9c2fp-47 + 53 17 0xfb53d14aa9c2fp-47 +0 53 -0x104ac2eb5563d1p-48 -0 + 0xfb53d14aa9c2fp-48 + 53 0xfb53d14aa9c2fp-48 32 + +0 53 0x15b456789abcdfp-48 0x123456789abd17p-4 + 3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-48 +1 53 0x3923456789abcdp-52 0x123456789abd17p-4 + 3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-56 +2 53 0x18p-4 0x101a3456789abdp-44 + 256.5 + 53 -0x123456789abcdfp-52 0xff +3 53 0xfff8p-4 0x10018p-4 + 4097.5 + 53 0x1p-550 0x1fffffffffffffp-52 + +0 53 0xeb456789abcdfp-48 0x123456789abca7p-4 + -3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-48 +1 53 -0x36dcba98765434p-52 0x123456789abca7p-4 + -3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-56 +2 53 -0x1ff8p-4 -0xff5cba9876543p-44 + -256.5 + 53 -0x123456789abcdfp-52 0xff +3 53 -0x10038p-4 -0x10018p-4 + -4097.5 + 53 0x1p-550 0x1fffffffffffffp-52 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/diam.dat b/Build/source/libs/mpfi/mpfi-src/tests/diam.dat new file mode 100644 index 00000000000..2e61bf0be19 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/diam.dat @@ -0,0 +1,55 @@ +# data file for mpfi_diam +# +# column fields: +# 1: error direction (0: result is exact, +: result is overestimated) +# 2: precision of result +# 3: value of result +# +# 5: precision of argument +# 6: left endpoint value of argument +# 7: right endpoint value of argument +# + +# special values +0 53 nan 53 nan -inf +0 53 nan 53 nan -8 +0 53 nan 53 -8 nan +0 53 nan 53 nan -0 +0 53 nan 53 +0 nan +0 53 nan 53 nan 5 +0 53 nan 53 +5 nan +0 53 nan 53 nan +inf +0 53 nan 53 nan nan +0 53 nan 53 -inf -inf +0 53 nan 53 -inf -8 +0 53 +inf 53 -inf -0 +0 53 +inf 53 -inf 5 +0 53 +inf 53 -inf +inf +0 53 nan 53 -inf nan +0 53 +inf 53 -inf -0 +0 53 +8 53 -8 -0 +0 53 -0 53 +0 -0 # should it be +0? +0 53 +5 53 +0 5 +0 53 +inf 53 +0 +inf +0 53 nan 53 +0 nan +0 53 nan 53 +inf +inf +0 53 nan 53 +inf nan + +# regular values ++ 53 0x15555555555556p-53 + 53 -34 -17 + ++ 4 0xcp-4 53 -34 -17 +0 53 51 53 -34 17 ++ 4 52 53 -34 17 + +0 53 +0x123456789abcdp-2 + 53 +0 +0x123456789abcdp-2 ++ 53 0x145f306dc9c883p-105 + 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 0x145f306dc9c883p-105 + 53 -0x1921fb54442d19p-51 -0x1921fb54442d18p-51 ++ 53 0x13333333333338p-52 + 53 -4 -0x7fffffffffffdp-51 ++ 53 0x18e38e38e38e3fp-52 + 53 -8 -0x7fffffffffffbp-51 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/diam_abs.dat b/Build/source/libs/mpfi/mpfi-src/tests/diam_abs.dat new file mode 100644 index 00000000000..e1e7424bfa6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/diam_abs.dat @@ -0,0 +1,40 @@ +# data file for mpfi_diam_abs +# +# column fields: +# 1: error direction (0: result is exact, +: result is overestimated) +# 2: precision of result +# 3: value of result +# +# 5: precision of argument +# 6: left endpoint value of argument +# 7: right endpoint value of argument +# + +# special values +0 53 nan 53 nan -inf +0 53 nan 53 nan -8 +0 53 nan 53 -8 nan +0 53 nan 53 nan -0 +0 53 nan 53 +0 nan +0 53 nan 53 nan 5 +0 53 nan 53 +5 nan +0 53 nan 53 nan +inf +0 53 nan 53 nan nan +0 53 nan 53 -inf -inf +0 53 +inf 53 -inf -8 +0 53 +inf 53 -inf -0 +0 53 +inf 53 -inf 5 +0 53 +inf 53 -inf +inf +0 53 nan 53 -inf nan +0 53 +inf 53 -inf -0 +0 53 +8 53 -8 -0 +0 53 -0 53 +0 -0 # should it be +0? +0 53 +5 53 +0 5 +0 53 +inf 53 +0 +inf +0 53 nan 53 +0 nan +0 53 nan 53 +inf +inf +0 53 nan 53 +inf nan + +# regular values +0 53 17 53 -34 -17 ++ 4 18 53 -34 -17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/diam_rel.dat b/Build/source/libs/mpfi/mpfi-src/tests/diam_rel.dat new file mode 100644 index 00000000000..fa46066d94f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/diam_rel.dat @@ -0,0 +1,51 @@ +# data file for mpfi_diam_rel +# +# column fields: +# 1: error direction (0: result is exact, +: result is overestimated) +# 2: precision of result +# 3: value of result +# +# 5: precision of argument +# 6: left endpoint value of argument +# 7: right endpoint value of argument +# + +# special values +0 53 nan 53 nan -inf +0 53 nan 53 nan -8 +0 53 nan 53 -8 nan +0 53 nan 53 nan -0 +0 53 nan 53 +0 nan +0 53 nan 53 nan 5 +0 53 nan 53 +5 nan +0 53 nan 53 nan +inf +0 53 nan 53 nan nan +0 53 nan 53 -inf -inf +0 53 nan 53 -inf -8 +0 53 nan 53 -inf -0 +0 53 nan 53 -inf 5 +0 53 nan 53 -inf +inf +0 53 nan 53 -inf nan +0 53 nan 53 -inf -0 +0 53 +2 53 -8 -0 +0 53 nan 53 +0 -0 +0 53 +2 53 +0 5 +0 53 nan 53 +0 +inf +0 53 nan 53 +0 nan +0 53 nan 53 +inf +inf +0 53 nan 53 +inf nan + +# regular values +0 53 2 53 +0 +0x123456789abcdp-2 ++ 53 0x145f306dc9c883p-105 + 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 0x145f306dc9c883p-105 + 53 -0x1921fb54442d19p-51 -0x1921fb54442d18p-51 ++ 53 0x13333333333338p-52 + 53 -4 -0x7fffffffffffdp-51 ++ 53 0x18e38e38e38e3fp-52 + 53 -8 -0x7fffffffffffbp-51 ++ 53 6 + 53 -0x1fffffffffffffp-53 2 ++ 53 0x1ffffffffffffep-51 + 53 -0x1ffffffffffffap-53 3 \ No newline at end of file diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div.dat b/Build/source/libs/mpfi/mpfi-src/tests/div.dat new file mode 100644 index 00000000000..d8d1bad7e8b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div.dat @@ -0,0 +1,199 @@ +# data file for mpfi_div +# +# for a description of the fields: see add.dat + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan -0 53 -8 +1 +0 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan nan 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan +1 53 nan -0 +0 53 nan nan 53 -inf -inf 53 -inf -inf +0 53 -inf +inf 53 -inf -7 53 -1 +8 +0 53 -inf -0 53 -inf -0 53 +8 +inf +0 53 nan -0 53 -inf -0 53 +inf +inf +0 53 -inf +inf 53 -inf +8 53 +0 +8 +0 53 -inf +inf 53 -inf +inf 53 +0 +8 +0 53 +0 -0 53 +0 -0 53 -inf -7 +0 53 -inf -0 53 +0 +8 53 -7 -0 +0 53 +0 +inf 53 +0 -0 53 +0 +8 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 +0 -0 53 +0 -0 53 +8 +inf +0 53 nan nan 53 +0 +8 53 +inf nan +0 53 -inf +inf 53 +0 -0 53 -inf +inf +0 53 -inf +inf 53 +0 +8 53 -7 +8 +0 53 nan +inf 53 +0 -0 53 +0 -0 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 nan nan 53 +0 nan 53 +8 +inf +0 53 +0 -0 53 +0 +8 53 +inf +inf +0 53 -inf +inf 53 +inf +inf 53 -inf +3 +0 53 nan +inf 53 +inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf 53 +3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 nan nan 53 +inf nan 53 +inf +inf +0 53 nan nan 53 +inf nan 53 -3 +7 + +# regular value +0 53 0x69 0xd14fad + 53 -0x75bcd15 -0x754e + 53 -0x11e -0x9 +1 53 0x7.0ef61537b1704p-12 0xd14fad + 53 -0x75bcd15 -0x1.489c07caba163p-4 + 53 -0x2.e8e36e560704ap+4 -0x9 +2 53 0x69p-16 0x2.30ee5eef9c36cp+4 + 53 -0x1.02f0415f9f596p+0 -0x754ep-16 + 53 -0x11e -0x7.62ce64fbacd2cp-8 +3 53 0x7.0ef61537b1704p-8 0x2.30ee5eef9c36cp+4 + 53 -0x1.02f0415f9f596p+0 -0x1.489c07caba163p-4 + 53 -0x2.e8e36e560704ap+0 -0x7.62ce64fbacd2cp-8 +0 53 0xff +inf + 53 -0xacbp+256 -0x6f9 + 53 -0x7 -0 +1 53 0x9.e9f24790445fp-4 +inf + 53 -0x100 -0xe.bb80d0a0824ep-4 + 53 -0x1.7c6d760a831fap+0 -0 +0 53 -inf +inf + 53 -0x1.25f2d73472753p+0 -0x9.9a19fd3c1fc18p-4 + 53 -0x9.3b0c8074ccc18p-4 +0x4.788df5d72af78p-4 +0 53 -inf -5 + 53 -100 -15 + 53 +0 +3 +2 53 -inf -0x1.fd8457415f917p+0 + 53 -2 -0x1.25f2d73472753p+0 + 53 +0 +0x9.3b0c8074ccc18p-4 +0 53 -0x480b3b -0x69 + 53 -0x123456789 -0x754ep+4 + 53 0x40b 0x11ep+4 +1 53 -0x2.f5008d2df94ccp-4 -0x69p-254 + 53 -0xd.67775e4b8588p-4 -0x754ep-53 + 53 0x4.887091874ffc8p+0 0x11ep+201 +2 53 -0x480b3bp+17 -0xa.fc5e7338f3e4p+0 + 53 -0x123456789 -0x1.b0a62934c76e9p+0 + 53 0x40bp-17 0x2.761ec797697a4p-4 +3 53 -0x2.f5008d2df94ccp+4 -0xa.fc5e7338f3e4p-8 + 53 -0xd.67775e4b8588p+0 -0x1.b0a62934c76e9p+0 + 53 0x4.887091874ffc8p-4 0x2.761ec797697a4p+4 + +0 53 +0 0xd14fad + 53 -0x75bcd15 -0 + 53 -0x90 -0x9 +2 53 +0 0x1.4fdb41a33d6cep+4 + 53 -0x1.4298b2138f2a7p-4 -0 + 53 -0x1p-8 -0xf.5e4900c9c19fp-12 +0 53 +0 +inf + 53 -0xeeeeeeeee -0 + 53 -0xaaaaaaaaa -0 +0 53 -inf +inf + 53 -0x1.25f2d73472753p+0 -0 + 53 -0x9.3b0c8074ccc18p-4 +0x4.788df5d72af78p-4 +0 53 -inf -0 + 53 -0xeeeeeeeee -0 + 53 +0 +0x3 +0 53 -0xd14fad -0 + 53 -0x75bcd15 -0 + 53 0x9 0x90 +1 53 -0x1.4fdb41a33d6cep+4 -0 + 53 -0x1.4298b2138f2a7p-4 -0 + 53 0xf.5e4900c9c19fp-12 0x9 + +0 53 -0x1280 0xd14fad + 53 -0x75bcd15 0xa680 + 53 -0xaf6 -0x9 +1 53 -0x1.c71c71c71c71d 2 + 53 -0x12 0x10 + 53 -0xbbbbbbbbbb -0x9 +2 53 -0x69p-16 0xe.525982af70c9p-12 + 53 -0x1 0x754ep-16 + 53 -0xcccccccccc -0x11e +3 53 -0x8.85e40b3c3f63p+0 0xe.071cbfa1de788p-4 + 53 -0xb.5b90b4d32136p-4 0x6.e694ac6767394p+0 + 53 -0xddddddddddd -0xc.f459be9e80108p-4 +0 53 -inf +inf + 53 -0xacbp+256 0x6f9 + 53 -0x7 -0 +0 53 -inf +inf + 53 -0x1.25f2d73472753p+0 +0x9.9a19fd3c1fc18p-4 + 53 -0x9.3b0c8074ccc18p-4 +0x4.788df5d72af78p-4 +0 53 -inf +inf + 53 +0 +15 + 53 -3 +3 +0 53 -0x69 0xbaffep+12 + 53 -0x754e 0xd0e9dc4p+12 + 53 0x11e 0xbbb +1 53 -0xe.525982af70c9p-8 0xbaffep+12 + 53 -0x10 0xd0e9dc4p+12 + 53 0x11e 0xbbb +2 53 -0x69 0xe.525982af70c9p-2 + 53 -0x754e 0x1p+10 + 53 0x11e 0xbbb +3 53 -0xf.3d2f5db8ec728p-4 0x1.cf8fa732de129p+0 + 53 -0x1.18333622af827p+0 0x2.14b836907297p+0 + 53 0x1.263147d1f4bcbp+0 0x111 + +0 53 -0xd14fad -0 + 53 +0 0x75bcd15 + 53 -0xa -0x9 +1 53 -0x1.e1bb896bfda07p+0 -0 + 53 +0 0x1.acbf1702af6edp+0 + 53 -0x0.f -0xe.3d7a59e2bdacp-4 +0 53 -inf -0 + 53 +0 0xa + 53 -0x9 -0 +0 53 -inf +inf + 53 +0 0xa + 53 -1 +1 +0 53 +0 0xd14fad + 53 +0 0x75bcd15 + 53 +0x9 +0xa +2 53 +0 0x9.deb65b02baep-4 + 53 +0 0x1.5f6b03dc8c66fp+0 + 53 +0x2.39ad24e812dcep+0 0xa + +0 53 -0xd14fad -0x69 + 53 0x754e 0x75bcd15 + 53 -0x11e -0x9 +1 53 -0x7.02d3edfbc8b6p+0 -0x69p-16 + 53 0x754ep-16 0x1.008a3accc766dp+4 + 53 -0x11e -0x2.497403b31d32ap+0 +2 53 -0xd14fad -0x7.52680a49e5d68p-8 + 53 0x9.ac412ff1f1478p-4 0x75bcd15 + 53 -0x1.5232c83a0e726p+4 -0x9 +3 53 -0x5.c1d97d57d81ccp+0 -0x2.c9a600c455f5ap+0 + 53 0xe.1552a314d629p-4 0x1.064c5adfd0042p+0 + 53 -0x5.0d4d319a50b04p-4 -0x2.d8f51df1e322ep-4 +0 53 -inf -0x69 + 53 0x754e 0xeeee + 53 -0x11e -0 +2 53 -inf -0x1.df1cc82e6a583p-4 + 53 0x1.a9016514490e6p-4 0xeeee + 53 -0xe.316e87be0b24p-4 -0 +0 53 -inf +inf + 53 5 6 + 53 -0x5.0d4d319a50b04p-4 0x2.d8f51df1e322ep-4 +0 53 0x69 +inf + 53 0x754e +0xeeeee + 53 +0 +0x11e +1 53 0x1.2a4fcda56843p+0 +inf + 53 0x1.7f03f2a978865p+0 0xeeeee + 53 +0 0x1.48b08624606b9p+0 +0 53 0xb2 0x93d + 53 0x5efc1492 0x1ba2dc763 + 53 0x2fdd1f 0x889b71 +1 53 0x2.120d75be74b54p-12 0x93dp+20 + 53 0x1.d7c06f9ff0706p-8 0x1ba2dc763 + 53 0x2fdd1fp-20 0xe.3d7a59e2bdacp+0 +2 53 0xb.2p-8 0x7.02d3edfbc8b6p-4 + 53 0x5.efc1492p-4 0x1.008a3accc766dp+0 + 53 0x2.497403b31d32ap+0 0x8.89b71p+0 +3 53 0xa.f3518768b206p-8 0x7.0e2acad54859cp+0 + 53 0x8.440e7d65be6bp-8 0x3.99982e9eae09ep+0 + 53 0x8.29fa8d0659e48p-4 0xc.13d2fd762e4a8p-4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_2si.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_2si.dat new file mode 100644 index 00000000000..09e559d6497 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_2si.dat @@ -0,0 +1,71 @@ +# data file for mpfi_div_2si +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf -3 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -28 53 nan -7 -2 +0 53 nan -7 53 nan -7 0 +0 53 nan -1.75 53 nan -7 2 +0 53 nan -0 53 nan -0 -15 +0 53 nan -0 53 nan -0 0 +0 53 nan -0 53 nan -0 15 +0 53 nan 8 53 nan 1 -3 +0 53 nan 1 53 nan 1 0 +0 53 nan .125 53 nan 1 3 +0 53 nan +inf 53 nan +inf -63 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf -2 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 -inf -16 53 -inf -1 -4 +0 53 -inf -1 53 -inf -1 0 +0 53 -inf -.125 53 -inf -1 3 +0 53 -inf -0 53 -inf -0 -8 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -inf 128 53 -inf 8 -4 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf 0.5 53 -inf 8 4 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 -inf nan 53 -inf nan -64 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64 +0 53 +0 -0 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 +0 128 53 +0 8 -4 +0 53 +0 8 53 +0 8 0 +0 53 +0 0.5 53 +0 8 4 +0 53 +0 +inf 53 +0 +inf -7 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf -1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan -1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -0x20p+32 -0x11p+32 + 53 -32 -17 -32 +0 53 0x11p-32 0x20p-32 + 53 17 32 32 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_2ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_2ui.dat new file mode 100644 index 00000000000..213728414d4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_2ui.dat @@ -0,0 +1,54 @@ +# data file for mpfi_div_2ui +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -7 53 nan -7 0 +0 53 nan -1.75 53 nan -7 2 +0 53 nan -0 53 nan -0 0 +0 53 nan -0 53 nan -0 15 +0 53 nan 1 53 nan 1 0 +0 53 nan .125 53 nan 1 3 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 -inf -1 53 -inf -1 0 +0 53 -inf -.25 53 -inf -1 2 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf 0.5 53 -inf 8 4 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 +0 8 53 +0 8 0 +0 53 +0 .5 53 +0 8 4 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -0x20p-32 -0x11p-32 + 53 -32 -17 32 +0 53 0x123456789abcdfp-78 0x123456789abcdfp-25 + 53 0x123456789abcdfp-53 0x123456789abcdf 25 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_d.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_d.dat new file mode 100644 index 00000000000..2ad1bd5511e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_d.dat @@ -0,0 +1,92 @@ +# data file for mpfi_div_d +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan 53 nan nan -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 0.0 +0 53 nan nan 53 nan nan 0x170ef54646d497p-109 +0 53 nan nan 53 nan -inf -0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -inf 0.0 +0 53 nan nan 53 nan -inf 0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -7 -0xfc339ab0a6b53p-99 +0 53 nan nan 53 nan -7 0.0 +0 53 nan nan 53 nan -7 7.0 +0 53 nan nan 53 nan -0 -15.0 +0 53 nan nan 53 nan -0 0.0 +0 53 nan nan 53 nan -0 15.0 +0 53 nan nan 53 nan +1 -0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +1 0.0 +0 53 nan nan 53 nan +1 0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +inf -0x5acae5c4b6e51p-101 +0 53 nan nan 53 nan +inf 0.0 +0 53 nan nan 53 nan +inf 0x5acae5c4b6e51p-101 +0 53 +inf +inf 53 -inf -inf -0x170ef54646d497p-108 +0 53 -inf +inf 53 -inf -inf 0.0 +0 53 -inf -inf 53 -inf -inf 0x170ef54646d497p-108 +0 53 1 +inf 53 -inf -7 -7.0 +0 53 -inf +inf 53 -inf -7 0.0 +0 53 -inf -1 53 -inf -7 7.0 +0 53 +0 +inf 53 -inf -0 -0x170ef54646d497p-106 +0 53 -inf nan 53 -inf -0 0.0 +0 53 -inf -0 53 -inf -0 0x170ef54646d497p-106 +1 53 -0x15555555555556p-51 +inf 53 -inf 8 -3.0 +0 53 -inf +inf 53 -inf 8 0.0 +2 53 -inf 0x15555555555556p-51 53 -inf 8 3.0 +0 53 -inf +inf 53 -inf +inf -0x170ef54646d497p-105 +0 53 -inf +inf 53 -inf +inf 0.0e-17 +0 53 -inf +inf 53 -inf +inf +0x170ef54646d497p-105 +0 53 nan nan 53 -inf nan -0x170ef54646d497p-104 +0 53 nan nan 53 -inf nan 0.0e-17 +0 53 nan nan 53 -inf nan +0x170ef54646d497p-104 +0 53 +0 -0 53 +0 -0 -0x170ef54646d497p-109 +0 53 nan nan 53 +0 -0 0.0 +0 53 +0 -0 53 +0 -0 0x170ef54646d497p-109 +1 53 -0x1d9b1f5d20d556p+5 -0 53 +0 8 -0x114b37f4b51f71p-107 +0 53 nan +inf 53 +0 8 0.0 +2 53 +0 0x1d9b1f5d20d556p+5 53 +0 8 0x114b37f4b51f71p-107 +0 53 -inf -0 53 +0 +inf -0x50b45a75f7e81p-104 +0 53 nan +inf 53 +0 +inf 0.0 +0 53 +0 +inf 53 +0 +inf 0x142d169d7dfa03p-106 +0 53 -inf -inf 53 +inf +inf -0x170ef54646d497p-109 +0 53 -inf +inf 53 +inf +inf 0.0 +0 53 +inf +inf 53 +inf +inf 0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan -0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 0.0 +0 53 nan nan 53 +inf nan 0x170ef54646d497p-109 + +# regular values +0 53 0x10000000000001p-53 0x10000000000001p-20 + 53 -0x10000000000001p-20 -0x10000000000001p-53 -1 +1 53 -0x10000000000001p-19 -1 + 53 -0x10000000000002p-20 -0x10000000000001p-53 0x10000000000001p-53 +2 53 -0x1p+33 -0x1000001fffffffp-52 + 53 -0x10000000000001p-20 -0x10000020000001p-53 0x10000000000001p-53 +3 53 -0x10000000000001p-19 -0x1000001fffffffp-52 + 53 -0x10000000000002p-20 -0x10000020000001p-53 0x10000000000001p-53 + +0 53 -0x1p-7 0x1p-53 + 53 -0x123456789abcdfp-53 0x123456789abcdfp-7 -0x123456789abcdf +1 53 -0x1c200000000002p-106 0x1p-53 + 53 -0x123456789abcdfp-53 0x10000000000001p-53 -0x123456789abcdf +2 53 -0x1p-7 0x1c200000000001p-105 + 53 -1 0x123456789abcdfp-7 -0x123456789abcdf +3 53 -0x1c200000000002p-106 0x1c200000000001p-105 + 53 -1 0x10000000000001p-53 -0x123456789abcdf diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_ext.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_ext.dat new file mode 100644 index 00000000000..d8323905832 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_ext.dat @@ -0,0 +1,285 @@ +# data file for mpfi_div +# +# column fields: +# 1: inexact flag (returned value): returns the number of results (0, 1 or 2) +# 2: precision of first result +# 3: left endpoint value of first result +# 4: right endpoint value of first result +# 5: precision of second result +# 6: left endpoint value of second result +# 7: right endpoint value of second result +# +# 8: precision of first parameter +# 9: left endpoint value of first parameter +# 10: right endpoint value of first parameter +# 11: precision of second parameter +# 12: left endpoint value of second parameter +# 13: right endpoint value of second parameter +# + +# special values +0 53 nan nan 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan nan 53 nan -0 53 -8 +1 +0 53 nan nan 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan nan 53 nan nan 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan +1 53 nan -0 + +2 53 -inf -2 53 +0 +inf 53 -inf -6 53 -inf +3 +2 53 -inf -2 53 +3 +inf 53 -inf -6 53 -2 +3 +2 53 -inf -0 53 +3 +inf 53 -inf -6 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 -inf -6 53 -inf +inf + +2 53 -inf -2 53 +0 +inf 53 -24 -6 53 -inf +3 +2 53 -inf -2 53 +3 +inf 53 -24 -6 53 -2 +3 +2 53 -inf -0 53 +3 +inf 53 -24 -6 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 -24 -6 53 -inf +inf + +1 53 -inf +inf 53 nan nan 53 -inf -0 53 -inf +3 +1 53 -inf +inf 53 nan nan 53 -inf -0 53 -2 +3 +1 53 -inf +inf 53 nan nan 53 -inf -0 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 -inf -0 53 -inf +inf + +1 53 -inf +inf 53 nan nan 53 -24 -0 53 -inf +3 +1 53 -inf +inf 53 nan nan 53 -24 -0 53 -2 +3 +1 53 -inf +inf 53 nan nan 53 -24 -0 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 -24 -0 53 -inf +inf + +1 53 -inf +inf 53 nan nan 53 -24 +6 53 -inf +3 +1 53 -inf +inf 53 nan nan 53 -24 +6 53 -2 +3 +1 53 -inf +inf 53 nan nan 53 -24 +6 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 -24 +6 53 -inf +inf + +1 53 -inf +inf 53 nan nan 53 +0 +6 53 -inf +3 +1 53 -inf +inf 53 nan nan 53 +0 +6 53 -2 +3 +1 53 -inf +inf 53 nan nan 53 +0 +6 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 +0 +6 53 -inf +inf + +1 53 -inf +inf 53 nan nan 53 +0 +inf 53 -inf +3 +1 53 -inf +inf 53 nan nan 53 +0 +inf 53 -2 +3 +1 53 -inf +inf 53 nan nan 53 +0 +inf 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 +0 +inf 53 -inf +inf + +2 53 -inf -0 53 +2 +inf 53 +6 +24 53 -inf +3 +2 53 -inf -3 53 +2 +inf 53 +6 +24 53 -2 +3 +2 53 -inf -3 53 +0 +inf 53 +6 +24 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 +6 +24 53 -inf +inf + +2 53 -inf -0 53 +2 +inf 53 +6 +inf 53 -inf +3 +2 53 -inf -3 53 +2 +inf 53 +6 +inf 53 -2 +3 +2 53 -inf -3 53 +0 +inf 53 +6 +inf 53 -2 +inf +1 53 -inf +inf 53 nan nan 53 +6 +inf 53 -inf +inf + +# above values to be put at the proper place +# regular values +# 0 53 -0x1p-1 -0x187p-256 53 -0.375 -0x10187p-256 53 -0.125 0x1p-240 +# 1 53 -0x10000000000001p-93 0x123456789abcd 53 -0x1p-300 0x123456p+28 53 -0x10000000000000p-93 0x789abcd +# 2 53 -0x123456791abcdp-17 0x8f596b3002c1bp+947 53 -4 +7 53 -0x123456789abcdp-17 3e300 +# 3 53 +0x1010101010101p+8 0x8f596b3002c1bp+947 53 0x1000100010001p+8 0x1p+60 53 0x1000100010001 3e300 + +# signed zeros +# 0 53 +0 +6 53 +4 +8 53 -4 -2 +# 0 53 -5 -0 53 +4 +8 53 -9 -8 +# # special values +# 0 53 nan nan 53 nan nan 53 -inf -7 +# 0 53 nan nan 53 nan nan 53 -8 +1 +# 0 53 nan nan 53 nan nan 53 +0 +inf +# 0 53 nan nan 53 nan nan 53 +0 nan +# 0 53 nan nan 53 nan nan 53 +5 +inf +# 0 53 nan nan 53 nan nan 53 +inf +inf +# 0 53 nan nan 53 nan nan 53 nan -0 +# 0 53 nan nan 53 nan -0 53 -inf -7 +# 0 53 nan nan 53 nan -0 53 -8 +1 +# 0 53 nan nan 53 nan +inf 53 +0 +inf +# 0 53 nan nan 53 nan nan 53 +0 +7 +# 0 53 nan nan 53 nan -inf 53 +5 +inf +# 0 53 nan nan 53 nan -7 53 +inf +inf +# 0 53 nan nan 53 nan +1 53 nan -0 +# 0 53 nan nan 53 -inf -inf 53 -inf -inf +# 0 53 -inf +inf 53 -inf -7 53 -1 +8 +# 0 53 -inf -0 53 -inf -0 53 +8 +inf +# 0 53 nan -0 53 -inf -0 53 +inf +inf +# 0 53 -inf +inf 53 -inf +8 53 +0 +8 +# 0 53 -inf +inf 53 -inf +inf 53 +0 +8 +# 0 53 +0 -0 53 +0 -0 53 -inf -7 +# 0 53 -inf -0 53 +0 +8 53 -7 -0 +# 0 53 +0 +inf 53 +0 -0 53 +0 +8 +# 0 53 +0 +inf 53 +0 +inf 53 +0 +8 +# 0 53 +0 -0 53 +0 -0 53 +8 +inf +# 0 53 nan nan 53 +0 +8 53 +inf nan +# 0 53 -inf +inf 53 +0 -0 53 -inf +inf +# 0 53 -inf +inf 53 +0 +8 53 -7 +8 +# 0 53 nan +inf 53 +0 -0 53 +0 -0 +# 0 53 +0 +inf 53 +0 +inf 53 +0 +8 +# 0 53 nan nan 53 +0 nan 53 +8 +inf +# 0 53 +0 -0 53 +0 +8 53 +inf +inf +# 0 53 -inf +inf 53 +inf +inf 53 -inf +3 +# 0 53 nan +inf 53 +inf +inf 53 +0 +inf +# 0 53 nan nan 53 +inf +inf 53 +3 nan +# 0 53 nan nan 53 +inf nan 53 -inf -7 +# 0 53 nan nan 53 +inf nan 53 +inf +inf +# 0 53 nan nan 53 +inf nan 53 -3 +7 +# +# regular value +# 0 53 0x69 0xd14fad +# 53 -0x75bcd15 -0x754e +# 53 -0x11e -0x9 +# 1 53 0x7.0ef61537b1704p-12 0xd14fad +# 53 -0x75bcd15 -0x1.489c07caba163p-4 +# 53 -0x2.e8e36e560704ap+4 -0x9 +# 2 53 0x69p-16 0x2.30ee5eef9c36cp+4 +# 53 -0x1.02f0415f9f596p+0 -0x754ep-16 +# 53 -0x11e -0x7.62ce64fbacd2cp-8 +# 3 53 0x7.0ef61537b1704p-8 0x2.30ee5eef9c36cp+4 +# 53 -0x1.02f0415f9f596p+0 -0x1.489c07caba163p-4 +# 53 -0x2.e8e36e560704ap+0 -0x7.62ce64fbacd2cp-8 +# 0 53 0xff +inf +# 53 -0xacbp+256 -0x6f9 +# 53 -0x7 -0 +# 1 53 0x9.e9f24790445fp-4 +inf +# 53 -0x100 -0xe.bb80d0a0824ep-4 +# 53 -0x1.7c6d760a831fap+0 -0 +# 0 53 -inf +inf +# 53 -0x1.25f2d73472753p+0 -0x9.9a19fd3c1fc18p-4 +# 53 -0x9.3b0c8074ccc18p-4 +0x4.788df5d72af78p-4 +# 0 53 -inf -5 +# 53 -100 -15 +# 53 +0 +3 +# 2 53 -inf -0x1.fd8457415f917p+0 +# 53 -2 -0x1.25f2d73472753p+0 +# 53 +0 +0x9.3b0c8074ccc18p-4 +# 0 53 -0x480b3b -0x69 +# 53 -0x123456789 -0x754ep+4 +# 53 0x40b 0x11ep+4 +# 1 53 -0x2.f5008d2df94ccp-4 -0x69p-254 +# 53 -0xd.67775e4b8588p-4 -0x754ep-53 +# 53 0x4.887091874ffc8p+0 0x11ep+201 +# 2 53 -0x480b3bp+17 -0xa.fc5e7338f3e4p+0 +# 53 -0x123456789 -0x1.b0a62934c76e9p+0 +# 53 0x40bp-17 0x2.761ec797697a4p-4 +# 3 53 -0x2.f5008d2df94ccp+4 -0xa.fc5e7338f3e4p-8 +# 53 -0xd.67775e4b8588p+0 -0x1.b0a62934c76e9p+0 +# 53 0x4.887091874ffc8p-4 0x2.761ec797697a4p+4 +# +# 0 53 +0 0xd14fad +# 53 -0x75bcd15 -0 +# 53 -0x90 -0x9 +# 2 53 +0 0x1.4fdb41a33d6cep+4 +# 53 -0x1.4298b2138f2a7p-4 -0 +# 53 -0x1p-8 -0xf.5e4900c9c19fp-12 +# 0 53 +0 +inf +# 53 -0xeeeeeeeee -0 +# 53 -0xaaaaaaaaa -0 +# 0 53 -inf +inf +# 53 -0x1.25f2d73472753p+0 -0 +# 53 -0x9.3b0c8074ccc18p-4 +0x4.788df5d72af78p-4 +# 0 53 -inf -0 +# 53 -0xeeeeeeeee -0 +# 53 +0 +0x3 +# 0 53 -0xd14fad -0 +# 53 -0x75bcd15 -0 +# 53 0x9 0x90 +# 1 53 -0x1.4fdb41a33d6cep+4 -0 +# 53 -0x1.4298b2138f2a7p-4 -0 +# 53 0xf.5e4900c9c19fp-12 0x9 +# +# 0 53 -0x1280 0xd14fad +# 53 -0x75bcd15 0xa680 +# 53 -0xaf6 -0x9 +# 1 53 -0x1.c71c71c71c71d 2 +# 53 -0x12 0x10 +# 53 -0xbbbbbbbbbb -0x9 +# 2 53 -0x69p-16 0xe.525982af70c9p-12 +# 53 -0x1 0x754ep-16 +# 53 -0xcccccccccc -0x11e +# 3 53 -0x8.85e40b3c3f63p+0 0xe.071cbfa1de788p-4 +# 53 -0xb.5b90b4d32136p-4 0x6.e694ac6767394p+0 +# 53 -0xddddddddddd -0xc.f459be9e80108p-4 +# 0 53 -inf +inf +# 53 -0xacbp+256 0x6f9 +# 53 -0x7 -0 +# 0 53 -inf +inf +# 53 -0x1.25f2d73472753p+0 +0x9.9a19fd3c1fc18p-4 +# 53 -0x9.3b0c8074ccc18p-4 +0x4.788df5d72af78p-4 +# 0 53 -inf +inf +# 53 +0 +15 +# 53 -3 +3 +# 0 53 -0x69 0xbaffep+12 +# 53 -0x754e 0xd0e9dc4p+12 +# 53 0x11e 0xbbb +# 1 53 -0xe.525982af70c9p-8 0xbaffep+12 +# 53 -0x10 0xd0e9dc4p+12 +# 53 0x11e 0xbbb +# 2 53 -0x69 0xe.525982af70c9p-2 +# 53 -0x754e 0x1p+10 +# 53 0x11e 0xbbb +# 3 53 -0xf.3d2f5db8ec728p-4 0x1.cf8fa732de129p+0 +# 53 -0x1.18333622af827p+0 0x2.14b836907297p+0 +# 53 0x1.263147d1f4bcbp+0 0x111 + +#0 53 -0xd14fad -0 +# 53 +0 0x75bcd15 +# 53 -0xa -0x9 +#1 53 -0x1.e1bb896bfda07p+0 -0 +# 53 +0 0x1.acbf1702af6edp+0 +# 53 -0x0.f -0xe.3d7a59e2bdacp-4 +#0 53 -inf -0 +# 53 +0 0xa +# 53 -0x9 -0 +#0 53 -inf +inf +# 53 +0 0xa +# 53 -1 +1 +#0 53 +0 0xd14fad +# 53 +0 0x75bcd15 +# 53 +0x9 +0xa +#2 53 +0 0x9.deb65b02baep-4 +# 53 +0 0x1.5f6b03dc8c66fp+0 +# 53 +0x2.39ad24e812dcep+0 0xa +# +#0 53 -0xd14fad -0x69 +# 53 0x754e 0x75bcd15 +# 53 -0x11e -0x9 +#1 53 -0x7.02d3edfbc8b6p+0 -0x69p-16 +# 53 0x754ep-16 0x1.008a3accc766dp+4 +# 53 -0x11e -0x2.497403b31d32ap+0 +#2 53 -0xd14fad -0x7.52680a49e5d68p-8 +# 53 0x9.ac412ff1f1478p-4 0x75bcd15 +# 53 -0x1.5232c83a0e726p+4 -0x9 +#3 53 -0x5.c1d97d57d81ccp+0 -0x2.c9a600c455f5ap+0 +# 53 0xe.1552a314d629p-4 0x1.064c5adfd0042p+0 +# 53 -0x5.0d4d319a50b04p-4 -0x2.d8f51df1e322ep-4 +#0 53 -inf -0x69 +# 53 0x754e 0xeeee +# 53 -0x11e -0 +#2 53 -inf -0x1.df1cc82e6a583p-4 +# 53 0x1.a9016514490e6p-4 0xeeee +# 53 -0xe.316e87be0b24p-4 -0 +#0 53 -inf +inf +# 53 5 6 +# 53 -0x5.0d4d319a50b04p-4 0x2.d8f51df1e322ep-4 +#0 53 0x69 +inf +# 53 0x754e +0xeeeee +# 53 +0 +0x11e +#1 53 0x1.2a4fcda56843p+0 +inf +# 53 0x1.7f03f2a978865p+0 0xeeeee +# 53 +0 0x1.48b08624606b9p+0 +#0 53 0xb2 0x93d +# 53 0x5efc1492 0x1ba2dc763 +# 53 0x2fdd1f 0x889b71 +#1 53 0x2.120d75be74b54p-12 0x93dp+20 +# 53 0x1.d7c06f9ff0706p-8 0x1ba2dc763 +# 53 0x2fdd1fp-20 0xe.3d7a59e2bdacp+0 +#2 53 0xb.2p-8 0x7.02d3edfbc8b6p-4 +# 53 0x5.efc1492p-4 0x1.008a3accc766dp+0 +# 53 0x2.497403b31d32ap+0 0x8.89b71p+0 +#3 53 0xa.f3518768b206p-8 0x7.0e2acad54859cp+0 +# 53 0x8.440e7d65be6bp-8 0x3.99982e9eae09ep+0 +# 53 0x8.29fa8d0659e48p-4 0xc.13d2fd762e4a8p-4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_fr.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_fr.dat new file mode 100644 index 00000000000..ba8be7d45ba --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_fr.dat @@ -0,0 +1,84 @@ +# data file for mpfi_div_fr +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 53 -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 53 -0 +0 53 nan nan 53 nan nan 53 0x170ef54646d497p-109 +0 53 nan nan 53 nan -inf 53 -0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -inf 53 +0 +0 53 nan nan 53 nan -inf 53 0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -7 53 -0xfc339ab0a6b53p-99 +0 53 nan nan 53 nan -7 53 -0 +0 53 nan nan 53 nan -7 53 7.0 +0 53 nan nan 53 nan -0 53 -15.0 +0 53 nan nan 53 nan -0 53 +0 +0 53 nan nan 53 nan -0 53 15.0 +0 53 nan nan 53 nan +1 53 -0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +1 53 -0 +0 53 nan nan 53 nan +1 53 0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +inf 53 -0x5acae5c4b6e51p-101 +0 53 nan nan 53 nan +inf 53 +0 +0 53 nan nan 53 nan +inf 53 0x5acae5c4b6e51p-101 +0 53 +inf +inf 53 -inf -inf 53 -0x170ef54646d497p-108 +0 53 -inf +inf 53 -inf -inf 53 +0 +0 53 -inf -inf 53 -inf -inf 53 0x170ef54646d497p-108 +1 53 0x136dcc951d8bffp+5 +inf 53 -inf -7 53 -0x170ef54646d497p-107 +0 53 -inf +inf 53 -inf -7 53 -0 +2 53 -inf -0x136dcc951d8bffp+5 53 -inf -7 53 0x170ef54646d497p-107 +0 53 +0 +inf 53 -inf -0 53 -0x170ef54646d497p-106 +0 53 -inf nan 53 -inf -0 53 +0 +0 53 -inf -0 53 -inf -0 53 0x170ef54646d497p-106 +1 53 -0x170ef54646d497p-110 +inf 53 -inf 8 53 -0x16345785d8a00000 +0 53 -inf +inf 53 -inf 8 53 -0 +2 53 -inf 0x170ef54646d497p-110 53 -inf 8 53 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf 53 -0x170ef54646d497p-105 +0 53 -inf +inf 53 -inf +inf 53 +0 +0 53 -inf +inf 53 -inf +inf 53 +0x170ef54646d497p-105 +0 53 nan nan 53 -inf nan 53 -0x170ef54646d497p-104 +0 53 nan nan 53 -inf nan 53 -0 +0 53 nan nan 53 -inf nan 53 +0x170ef54646d497p-104 +0 53 +0 -0 53 +0 -0 53 -0x170ef54646d497p-109 +0 53 nan +inf 53 +0 -0 53 +0 +0 53 +0 -0 53 +0 -0 53 0x170ef54646d497p-109 +1 53 -0x1d9b1f5d20d556p+1 -0 53 +0 8 53 -0x114b37f4b51f71p-103 +0 53 nan +inf 53 +0 8 53 -0 +2 53 +0 +0x1d9b1f5d20d556p+1 53 +0 8 53 0x114b37f4b51f71p-103 +0 53 -inf -0 53 +0 +inf 53 -0x50b45a75f7e81p-104 +0 53 nan +inf 53 +0 +inf 53 +0 +0 53 +0 +inf 53 +0 +inf 53 0x142d169d7dfa03p-106 +0 53 -inf -inf 53 +inf +inf 53 -0x170ef54646d497p-109 +0 53 -inf +inf 53 +inf +inf 53 -0 +0 53 +inf +inf 53 +inf +inf 53 0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 53 -0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 53 +0 +0 53 nan nan 53 +inf nan 53 0x170ef54646d497p-109 + +# regular values +0 53 0x10000000000001p-53 0x10000000000001p-20 + 53 -0x10000000000001p-20 -0x10000000000001p-53 53 -1 +1 53 -0x10000000000001p-19 -1 + 53 -0x10000000000002p-20 -0x10000000000001p-53 53 0x10000000000001p-53 +2 53 -0x1p+33 -0x1000001fffffffp-52 + 53 -0x10000000000001p-20 -0x10000020000001p-53 53 0x10000000000001p-53 +3 53 -0x10000000000001p-19 -0x1000001fffffffp-52 + 53 -0x10000000000002p-20 -0x10000020000001p-53 53 0x10000000000001p-53 + +0 53 -0x1p-7 0x1p-53 + 53 -0x123456789abcdfp-53 0x123456789abcdfp-7 53 -0x123456789abcdf +1 53 -0x1c200000000002p-106 0x1p-53 + 53 -0x123456789abcdfp-53 0x10000000000001p-53 53 -0x123456789abcdf +2 53 -0x1p-7 0x1c200000000001p-105 + 53 -1 0x123456789abcdfp-7 53 -0x123456789abcdf +3 53 -0x1c200000000002p-106 0x1c200000000001p-105 + 53 -1 0x10000000000001p-53 53 -0x123456789abcdf diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_q.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_q.dat new file mode 100644 index 00000000000..23c14a84581 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_q.dat @@ -0,0 +1,99 @@ +# data file for mpfi_div_q +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1/1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1/1 +0 53 nan nan 53 nan -inf -3/1 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3/1 +0 53 nan nan 53 nan -7 -7/1 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7/1 +0 53 nan nan 53 nan -0 -15/1 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15/1 +0 53 nan nan 53 nan 1 -31/1 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31/1 +0 53 nan nan 53 nan +inf -63/1 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63/1 +0 53 +inf +inf 53 -inf -inf -2/1 +0 53 -inf +inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2/1 + +1 53 0x12492492492492p-53 +inf + 53 -inf -4 -7/1 +0 53 -inf +inf 53 -inf -7 0 +2 53 -inf -0x12492492492492p-53 + 53 -inf -4 7/1 + +0 53 +0 +inf 53 -inf -0 -8/1 +0 53 -inf nan 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8/1 +0 53 -0.5 +inf 53 -inf 8 -16/1 +0 53 -inf +inf 53 -inf 8 0 +0 53 -inf 0.5 53 -inf 8 16/1 +0 53 -inf +inf 53 -inf +inf -32/1 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32/1 +0 53 nan nan 53 -inf nan -64/1 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan 64/1 +0 53 +0 -0 53 +0 -0 -1/1 +0 53 nan nan 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1/1 + +1 53 -0x1aaaaaaaaaaaabp-49 -0 + 53 +0 8 -3/5 +0 53 nan +inf 53 +0 8 0 +2 53 +0 +0x1aaaaaaaaaaaabp-49 + 53 +0 8 3/5 + +0 53 -inf -0 53 +0 +inf -7/1 +0 53 nan +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7/1 +0 53 -inf -inf 53 +inf +inf -1/1 +0 53 -inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1/1 +0 53 nan nan 53 +inf nan -1/1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1/1 + +# regular values +0 53 0x55p-5 5 + 53 -32 -17 -32/5 +0 53 -5 -0x55p-5 + 53 -32 -17 32/5 +1 53 -0x12d2d2d2d2d2d3p-49 -5 + 53 -32 -17 17/5 + +0 53 0x123456789abcdfp-61 0x123456789abcdfp-8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256/1 +1 53 0x15555555555555p-54 1 + 53 1 3 3/1 +2 53 -3 0x15555555555556p-54 + 53 -9 1 3/1 +3 53 -0x1aaaaaaaaaaaabp-49 0x1aaaaaaaaaaaabp-49 + 53 -8 8 3/5 + +0 53 -0x45600 -0x12300 + 53 0x123 0x456 -1/256 +1 53 -0x15555555555556p-54 8 + 53 -24 1 -3/1 +2 53 -8 0x15555555555556p-54 + 53 -1 24 -3/1 +3 53 -0x1aaaaaaaaaaaabp-49 0x1aaaaaaaaaaaabp-49 + 53 -8 8 -3/5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_si.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_si.dat new file mode 100644 index 00000000000..de17ed289e8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_si.dat @@ -0,0 +1,91 @@ +# data file for mpfi_div_si +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan nan 53 nan -inf -3 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3 +0 53 nan nan 53 nan -7 -7 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7 +0 53 nan nan 53 nan -0 -15 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15 +0 53 nan nan 53 nan 1 -31 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31 +0 53 nan nan 53 nan +inf -63 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63 +0 53 +inf +inf 53 -inf -inf -2 +0 53 -inf +inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf +2 +0 53 .25 +inf 53 -inf -1 -4 +0 53 -inf +inf 53 -inf -1 0 +0 53 -inf -.25 53 -inf -1 4 +0 53 +0 +inf 53 -inf -0 -8 +0 53 -inf nan 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -0.5 +inf 53 -inf +8 -16 +0 53 -inf +inf 53 -inf +8 0 +0 53 -inf 0.5 53 -inf +8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf +32 +0 53 nan nan 53 -inf nan -64 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan +64 +0 53 +0 -0 53 +0 -0 -1 +0 53 nan nan 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 -2 -0 53 +0 +8 -4 +0 53 nan +inf 53 +0 +8 0 +0 53 +0 2 53 +0 +8 4 +0 53 -inf -0 53 +0 +inf -7 +0 53 nan +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 -inf -inf 53 +inf +inf -1 +0 53 -inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 nan nan 53 +inf nan -1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1 + +# regular values +0 53 0x11p-5 1 + 53 -32 -17 -32 +0 53 -1 -0x11p-5 + 53 -32 -17 32 +1 53 -0x1e1e1e1e1e1e1fp-52 -1 + 53 -32 -17 17 + +0 53 0x123456789abcdfp-61 0x123456789abcdfp-8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256 +1 53 0x15555555555555p-54 1 + 53 1 3 3 +2 53 -3 0x15555555555556p-54 + 53 -9 1 3 +3 53 -0x1ccccccccccccdp-52 0x1ccccccccccccdp-52 + 53 -9 9 5 + +0 53 -0x456p-8 -0x123p-8 + 53 0x123 0x456 -256 +1 53 -0x15555555555556p-54 8 + 53 -24 1 -3 +2 53 -8 0x15555555555556p-54 + 53 -1 24 -3 +3 53 -0x12344444567889p-50 -0x12344444567888p-69 + 53 -0x123456789abcdfp-34 -0x123456789abcdfp-53 0x10001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_ui.dat new file mode 100644 index 00000000000..fda3cd357fa --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_ui.dat @@ -0,0 +1,63 @@ +# data file for mpfi_div_ui +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63 +0 53 -inf +inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf +2 +0 53 -inf +inf 53 -inf -1 0 +0 53 -inf -.25 53 -inf -1 4 +0 53 -inf nan 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -inf +inf 53 -inf +8 0 +0 53 -inf 0.5 53 -inf +8 16 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf +32 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan +64 +0 53 nan nan 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 nan +inf 53 +0 +8 0 +0 53 +0 2 53 +0 +8 4 +0 53 nan +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 -inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1 + +# regular values +0 53 -1 -0x11p-5 + 53 -32 -17 32 +1 53 -0x1e1e1e1e1e1e1fp-52 -1 + 53 -32 -17 17 + +0 53 0x123456789abcdfp-61 0x123456789abcdfp-8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256 +1 53 0x15555555555555p-54 1 + 53 1 3 3 +2 53 -3 0x15555555555556p-54 + 53 -9 1 3 +3 53 -0x1ccccccccccccdp-52 0x1ccccccccccccdp-52 + 53 -9 9 5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/div_z.dat b/Build/source/libs/mpfi/mpfi-src/tests/div_z.dat new file mode 100644 index 00000000000..f978f0fad2a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/div_z.dat @@ -0,0 +1,100 @@ +# data file for mpfi_div_z +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan nan 53 nan -inf -3 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3 +0 53 nan nan 53 nan -7 -7 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7 +0 53 nan nan 53 nan -0 -15 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15 +0 53 nan nan 53 nan 1 -31 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31 +0 53 nan nan 53 nan +inf -63 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63 +0 53 +inf +inf 53 -inf -inf -2 +0 53 -inf +inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 + +1 53 0x12492492492492p-53 +inf + 53 -inf -4 -7 +0 53 -inf +inf 53 -inf -7 0 +2 53 -inf -0x12492492492492p-53 + 53 -inf -4 7 + +0 53 +0 +inf 53 -inf -0 -8 +0 53 -inf nan 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -0.5 +inf 53 -inf +8 -16 +0 53 -inf +inf 53 -inf +8 0 +0 53 -inf 0.5 53 -inf +8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 nan nan 53 -inf nan -64 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan 64 +0 53 +0 -0 53 +0 -0 -1 +0 53 nan nan 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 + +# the precision of the result is to small for the mpz value +1 4 -0x10p-11 -0 + 53 +0 8 -1025 +0 53 nan +inf 53 +0 8 0 +2 4 +0 0x10p-11 + 53 +0 8 1025 + +0 53 -inf -0 53 +0 +inf -7 +0 53 nan +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 -inf -inf 53 +inf +inf -1 +0 53 -inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 nan nan 53 +inf nan -1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1 + +# regular values +0 53 0x11p-5 1 + 53 -32 -17 -32 +0 53 -1 -0x11p-5 + 53 -32 -17 32 +1 53 -0x1e1e1e1e1e1e1fp-52 -1 + 53 -32 -17 17 + +0 53 0x123456789abcdfp-61 0x123456789abcdfp-8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256 +1 53 0x15555555555555p-54 1 + 53 1 3 3 +2 53 -3 0x15555555555556p-54 + 53 -9 1 3 +3 53 -0x1ccccccccccccdp-52 0x1ccccccccccccdp-52 + 53 -9 9 5 + +0 53 -0x456p-8 -0x123p-8 + 53 0x123 0x456 -256 +1 53 -0x15555555555556p-54 8 + 53 -24 1 -3 +2 53 -8 0x15555555555556p-54 + 53 -1 24 -3 +3 53 -0x12344444567889p-50 -0x12344444567888p-69 + 53 -0x123456789abcdfp-34 -0x123456789abcdfp-53 0x10001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/exp.dat b/Build/source/libs/mpfi/mpfi-src/tests/exp.dat new file mode 100644 index 00000000000..f780ac4a284 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/exp.dat @@ -0,0 +1,36 @@ +# data file for mpfi_exp +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -0 53 nan -inf +0 53 0x1de16b9c24a98ep-63 nan 53 -7 nan +0 53 nan 1 53 nan -0 +0 53 1 nan 53 +0 nan +0 53 nan 0x15bf0a8b14576ap-51 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 +0 -0 53 -inf -inf +2 53 +0 0x1de16b9c24a98fp-63 53 -inf -7 +0 53 +0 1 53 -inf -0 +2 53 +0 0x15bf0a8b14576ap-51 53 -inf +1 +0 53 +0 +inf 53 -inf +inf +0 53 1 1 53 +0 -0 +2 53 1 0x15bf0a8b14576ap-51 53 +0 +1 +0 53 1 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +3 53 0x1766b45dd84f17p-230 0x1639e3175a689dp-77 53 -123 -17 +3 53 0x1c3d6a24ed8221p-53 0x148b5e3c3e8187p-52 53 -0.125 0.25 +1 53 0x1c3d6a24ed8221p-53 1 53 -0.125 -0 +2 53 1 0x148b5e3c3e8187p-52 53 +0 0.25 +3 53 0x10000000000140p-52 0x10000000000161p-52 53 0xap-47 0xbp-47 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/exp10m1.dat b/Build/source/libs/mpfi/mpfi-src/tests/exp10m1.dat new file mode 100644 index 00000000000..55a9053d689 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/exp10m1.dat @@ -0,0 +1,47 @@ +# data file for mpfi_exp10m1 +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -1 53 nan -inf +0 53 9 nan 53 1 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan 99 53 nan 2 +0 53 +inf nan 53 +inf nan +0 53 -1 -1 53 -inf -inf +0 53 -1 999 53 -inf 3 +0 53 -1 -0 53 -inf -0 +0 53 -1 9 53 -inf 1 +0 53 -1 +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +2 53 +0 0xc.73d51c54470e8p-4 53 +0 0.25 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +3 53 -0xf.ff972474538fp-4 0xc.73d51c54470e8p-4 53 -0x4p+0 0x4p-4 +3 53 -0xf.ff972474538fp-4 0xc.73d51c54470e8p-4 53 -4 0.25 +1 53 0xc.73d51c54470ep-4 0x1.869fp+16 53 0x4p-4 0x5p+0 +1 53 0xc.73d51c54470ep-4 0x1.869fp+16 53 0.25 5 +1 53 -0xf.ff972474538fp-4 -0 53 -4 -0 +2 53 +0 0xc.73d51c54470e8p-4 53 +0 0.25 +1 53 0xc.73d51c54470ep-4 0x1.869fp+16 53 0.25 5 +1 53 -0xf.ff972474538fp-4 0x1.869fp+16 53 -4 5 +3 335 0x2.298b075b4b6a5240945790619b37fd4ab4e0abaf86001c5757f5084b17271500da279bd14e9aaf95937p+0 0x2.298b075b4b6a5240945790619b37fd4ab4e0abaf86001c5757f5084b17271500da279bd14e9aaf959378p+0 53 0.5 0.5 +3 335 -0xa.f0bb276dedbc493245da4c30a140045544feed4d8fffd2a77344bf87daf4ab31d62706b11bd54d77142p-4 -0xa.f0bb276dedbc493245da4c30a140045544feed4d8fffd2a77344bf87daf4ab31d62706b11bd54d7714p-4 53 -0.5 -0.5 +0 12 0x6.3p+4 0x6.3p+4 53 2 2 +3 12 0x5.f58p+24 0x5.f6p+24 53 8 8 +3 12 0x3.b98p+28 0x3.b9cp+28 53 9 9 +3 12 -0xf.d8p-4 -0xf.d7p-4 12 -2 -2 +3 12 -0x1p+0 -0xf.ffp-4 12 -8 -8 +3 12 -0x1p+0 -0xf.ffp-4 12 -9 -9 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/exp2.dat b/Build/source/libs/mpfi/mpfi-src/tests/exp2.dat new file mode 100644 index 00000000000..2d663c39a2f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/exp2.dat @@ -0,0 +1,37 @@ +# data file for mpfi_exp2 +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -0 53 nan -inf +0 53 0.5 nan 53 -1 nan +0 53 nan 1 53 nan -0 +0 53 1 nan 53 +0 nan +0 53 nan 2 53 nan 1 +0 53 +inf nan 53 +inf nan +0 53 +0 -0 53 -inf -inf +0 53 +0 0.5 53 -inf -1 +0 53 +0 1 53 -inf -0 +0 53 +0 2 53 -inf 1 +0 53 +0 +inf 53 -inf +inf +0 53 1 1 53 +0 -0 +0 53 1 2 53 +0 +1 +0 53 1 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 0x1p-123 0x1p-17 53 -123 -17 +0 53 0x1p-7 0x1p+7 53 -7 7 +3 53 0x1d5818dcfba487p-53 0x1306fe0a31b716p-52 53 -0.125 0.25 +1 53 0x1d5818dcfba487p-53 1 53 -0.125 -0 +2 53 1 0x1306fe0a31b716p-52 53 +0 0.25 +3 53 0x100000000000ddp-52 0x100000000000f4p-52 53 0xap-47 0xbp-47 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/exp2m1.dat b/Build/source/libs/mpfi/mpfi-src/tests/exp2m1.dat new file mode 100644 index 00000000000..c0a8e3dc479 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/exp2m1.dat @@ -0,0 +1,39 @@ +# data file for mpfi_exp2m1 +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -1 53 nan -inf +0 53 1 nan 53 1 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan -0.5 53 nan -1 +0 53 +inf nan 53 +inf nan +0 53 -1 -1 53 -inf -inf +0 53 -1 -0.5 53 -inf -1 +0 53 -1 -0 53 -inf -0 +0 53 -1 1 53 -inf 1 +0 53 -1 +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +2 53 +0 0x3.06fe0a31b7154p-4 53 +0 0.25 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +2 53 -0xfp-4 0x3.06fe0a31b7154p-4 53 -0x4p+0 0x4p-4 +2 53 -0xfp-4 0x3.06fe0a31b7154p-4 53 -4 0.25 +1 52 0x3.06fe0a31b715p-4 0x1.fp+4 53 0x4p-4 0x5p+0 +1 52 0x3.06fe0a31b715p-4 0x1.fp+4 53 0.25 5 +0 53 -0xfp-4 0x1.fp+4 53 -4 5 +2 53 +0 0x3.06fe0a31b7154p-4 53 +0 0.25 +3 336 0x6.a09e667f3bcc908b2fb1366ea957d3e3adec17512775099da2f590b0667322a95f906087571458751638p-4 0x6.a09e667f3bcc908b2fb1366ea957d3e3adec17512775099da2f590b0667322a95f90608757145875164p-4 53 0.5 0.5 +3 336 -0x4.afb0ccc06219b7ba682764c8ab54160e2909f4576c457b312e8537a7ccc66eab5037cfbc5475d3c574e8p-4 -0x4.afb0ccc06219b7ba682764c8ab54160e2909f4576c457b312e8537a7ccc66eab5037cfbc5475d3c574ep-4 53 -0.5 -0.5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/expm1.dat b/Build/source/libs/mpfi/mpfi-src/tests/expm1.dat new file mode 100644 index 00000000000..09a03366b19 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/expm1.dat @@ -0,0 +1,36 @@ +# data file for mpfi_expm1 +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -1 53 nan -inf +0 53 -0x1ff887a518f6d6p-53 nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan 0x1b7e151628aed3p-52 53 nan 1 +0 53 +inf nan 53 +inf nan +0 53 -1 -1 53 -inf -inf +2 53 -1 -0x1ff887a518f6d5p-53 53 -inf -7 +0 53 -1 -0 53 -inf -0 +2 53 -1 0x1b7e151628aed3p-52 53 -inf 1 +0 53 -1 +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +2 53 +0 0x1b7e151628aed3p-52 53 +0 1 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +3 53 -0x1ffffffffffffep-53 -0x1ffffffffffffdp-53 53 -36 -36 +3 53 -0x1e14aed893eef4p-56 0x122d78f0fa061ap-54 53 -0.125 0.25 +1 53 -0x1e14aed893eef4p-56 -0 53 -0.125 -0 +2 53 +0 0x122d78f0fa061ap-54 53 +0 0.25 +3 53 0x140000000000c8p-96 0x160000000000f3p-96 53 0xap-47 0xbp-47 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/fr_div.dat b/Build/source/libs/mpfi/mpfi-src/tests/fr_div.dat new file mode 100644 index 00000000000..4fffdfb097a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/fr_div.dat @@ -0,0 +1,79 @@ +# data file for mpfi_fr_div +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: value of first parameter +# 7: precision of second parameter +# 8: left endpoint value of second parameter +# 9: right endpoint value of second parameter + +# special values +0 53 nan nan 53 -0x170ef54646d497p-109 53 nan nan +0 53 nan nan 53 0.0 53 nan nan +0 53 nan nan 53 0x170ef54646d497p-109 53 nan nan +0 53 nan nan 53 -0x114b37f4b51f71p-107 53 nan -inf +0 53 nan nan 53 0.0 53 nan -inf +0 53 nan nan 53 0x114b37f4b51f71p-107 53 nan -inf +0 53 nan nan 53 -0xfc339ab0a6b53p-99 53 nan -7 +0 53 nan nan 53 0.0 53 nan -7 +0 53 nan nan 53 7.0 53 nan -7 +0 53 nan nan 53 -15.0 53 nan -0 +0 53 nan nan 53 0.0 53 nan -0 +0 53 nan nan 53 15.0 53 nan -0 +0 53 nan nan 53 -0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 nan nan 53 0.0 53 nan 1 +0 53 nan nan 53 0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 nan nan 53 -0x5acae5c4b6e51p-101 53 nan +inf +0 53 nan nan 53 0.0 53 nan +inf +0 53 nan nan 53 0x5acae5c4b6e51p-101 53 nan +inf +0 53 +0 -0 53 -0x170ef54646d497p-108 53 -inf -inf +0 53 +0 -0 53 0.0 53 -inf -inf +0 53 +0 -0 53 0x170ef54646d497p-108 53 -inf -inf +2 53 +0 0x1a5a3ce29a1787p-110 53 -0x170ef54646d496p-107 53 -inf -7 +0 53 +0 -0 53 0.0 53 -inf -7 +1 53 -0x1a5a3ce29a1787p-110 -0 53 0x170ef54646d496p-107 53 -inf -7 +0 53 +0 +inf 53 -0x170ef54646d497p-106 53 -inf -0 +0 53 +0 -0 53 0.0 53 -inf -0 +0 53 -inf -0 53 0x170ef54646d497p-106 53 -inf -0 +0 53 -inf +inf 53 -0x16345785d8a00000 53 -inf 8 +0 53 -inf +inf 53 0.0 53 -inf 8 +0 53 -inf +inf 53 0x16345785d8a00000 53 -inf 8 +0 53 -inf +inf 53 -0x170ef54646d497p-105 53 -inf +inf +0 53 -inf +inf 53 0.0e-17 53 -inf +inf +0 53 -inf +inf 53 +0x170ef54646d497p-105 53 -inf +inf +0 53 nan nan 53 -0x170ef54646d497p-104 53 -inf nan +0 53 nan nan 53 0.0e-17 53 -inf nan +0 53 nan nan 53 +0x170ef54646d497p-104 53 -inf nan +0 53 -inf +inf 53 -0x170ef54646d497p-109 53 +0 -0 +0 53 +0 -0 53 0.0 53 +0 -0 +0 53 -inf +inf 53 0x170ef54646d497p-109 53 +0 -0 +2 53 -inf -0x13c3ada9f391a5p-110 53 -0x114b37f4b51f71p-107 53 +0 7 +0 53 +0 -0 53 0.0 53 +0 7 +1 53 0x13c3ada9f391a5p-110 +inf 53 0x114b37f4b51f71p-107 53 +0 7 +0 53 -inf -0 53 -0x50b45a75f7e81p-104 53 +0 +inf +0 53 +0 -0 53 0.0 53 +0 +inf +0 53 +0 +inf 53 0x142d169d7dfa03p-106 53 +0 +inf +0 53 +0 -0 53 -0x170ef54646d497p-109 53 +inf +inf +0 53 +0 -0 53 0.0 53 +inf +inf +0 53 +0 -0 53 0x170ef54646d497p-109 53 +inf +inf +0 53 nan nan 53 -0x170ef54646d497p-109 53 +inf nan +0 53 nan nan 53 0.0 53 +inf nan +0 53 nan nan 53 0x170ef54646d497p-109 53 +inf nan + +# regular values +0 53 -inf +inf 53 -2.5 53 -8 8 + +0 53 0x5p-4 0.5 53 -2.5 53 -8 -5 +1 53 -0x1999999999999ap-56 -0x1p-4 53 -2.5 53 25 40 +2 53 0x5p-5 0x16db6db6db6db7p-54 53 -2.5 53 -16 -7 +3 53 -0x1d1745d1745d18p-55 -0x11e6efe35b4cfap-58 53 -2.5 53 11 143 + +0 53 0x1p-4 4 53 33.125 53 8.28125 530 +1 53 -0x11111111111112p-56 -0x1p-4 53 33.125 53 -530 -496.875 +2 53 0.125 0x13a12f684bda13p-53 53 33.125 53 54 265 +3 53 0x13a12f684bda12p-53 0x14627627627628p-53 53 33.125 53 52 54 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/fr_sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/fr_sub.dat new file mode 100644 index 00000000000..02904d86ac9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/fr_sub.dat @@ -0,0 +1,115 @@ +# data file for mpfi_fr_sub +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: value of first parameter +# 7: precision of second parameter +# 8: left endpoint value of second parameter +# 9: right endpoint value of second parameter + +# special values +0 53 nan nan 53 -0x170ef54646d497p-109 53 nan nan +0 53 nan nan 53 0.0 53 nan nan +0 53 nan nan 53 0x170ef54646d497p-109 53 nan nan +0 53 +inf nan 53 -0x114b37f4b51f71p-107 53 nan -inf +0 53 +inf nan 53 0.0 53 nan -inf +0 53 +inf nan 53 0x114b37f4b51f71p-107 53 nan -inf +0 53 0x1bfffffffffff8p-50 nan 53 -0xfc339ab0a6b53p-99 53 nan -7 +0 53 7 nan 53 0.0 53 nan -7 +0 53 0x1c000000000007p-50 nan 53 0xfc339ab0a6b53p-99 53 nan -7 +0 53 -15 nan 53 -15.0 53 nan -0 +0 53 +0 nan 53 0.0 53 nan -0 +0 53 15 nan 53 15.0 53 nan -0 +0 53 -0x8000000000001p-51 nan 53 -0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 -1 nan 53 0.0 53 nan 1 +0 53 -0xfffffffffffffp-52 nan 53 0xb2b3ece0a4ef9p-103 53 nan 1 +0 53 -inf nan 53 -0x5acae5c4b6e51p-101 53 nan +inf +0 53 -inf nan 53 0.0 53 nan +inf +0 53 -inf nan 53 0x5acae5c4b6e51p-101 53 nan +inf +0 53 +inf +inf 53 -0x170ef54646d497p-108 53 -inf -inf +0 53 +inf +inf 53 0.0 53 -inf -inf +0 53 +inf +inf 53 0x170ef54646d497p-108 53 -inf -inf +1 53 0x1bffffffffffffp-50 +inf 53 -0x170ef54646d497p-107 53 -inf -7 +0 53 7 +inf 53 0.0 53 -inf -7 +1 53 7 +inf 53 0x170ef54646d497p-107 53 -inf -7 +0 53 -0x170ef54646d497p-96 +inf 53 -0x170ef54646d497p-96 53 -inf -0 +0 53 +0 +inf 53 0.0 53 -inf -0 +0 53 0x170ef54646d497p-96 +inf 53 0x170ef54646d497p-96 53 -inf -0 +1 53 -0x16345785d8a00100 +inf 53 -0x16345785d8a00000 53 -inf 8 +0 53 -8 +inf 53 0.0 53 -inf 8 +1 53 0x16345785d89fff00 +inf 53 0x16345785d8a00000 53 -inf 8 +0 53 -inf +inf 53 -0x170ef54646d497p-105 53 -inf +inf +0 53 -inf +inf 53 0.0e-17 53 -inf +inf +0 53 -inf +inf 53 0x170ef54646d497p-105 53 -inf +inf +0 53 nan +inf 53 -0x170ef54646d497p-104 53 -inf nan +0 53 nan +inf 53 0.0e-17 53 -inf nan +0 53 nan +inf 53 0x170ef54646d497p-104 53 -inf nan +0 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 + 53 -0x170ef54646d497p-109 + 53 +0 -0 +0 53 +0 -0 53 0.0 53 +0 -0 +0 53 0x170ef54646d497p-109 0x170ef54646d497p-109 + 53 0x170ef54646d497p-109 + 53 +0 -0 +1 53 -0x10000000000001p-49 -0x114b37f4b51f71p-107 + 53 -0x114b37f4b51f71p-107 + 53 +0 8 +0 53 -8 -0 53 0.0 53 +0 8 +1 53 -8 0x114b37f4b51f71p-107 + 53 0x114b37f4b51f71p-107 + 53 +0 8 +0 53 -inf -0x50b45a75f7e81p-104 + 53 -0x50b45a75f7e81p-104 + 53 +0 +inf +0 53 -inf -0 53 0.0 53 +0 +inf +0 53 -inf -0x142d169d7dfa03p-106 + 53 -0x142d169d7dfa03p-106 + 53 +0 +inf +0 53 -inf -inf 53 0x142d169d7dfa03p-106 53 +inf +inf +0 53 -inf -inf 53 -0x170ef54646d497p-109 53 +inf +inf +0 53 -inf -inf 53 0.0 53 +inf +inf +0 53 nan -inf 53 0x170ef54646d497p-109 53 +inf nan +0 53 nan -inf 53 -0x170ef54646d497p-109 53 +inf nan +0 53 nan -inf 53 0.0 53 +inf nan + +# regular values +0 53 -0x1fb53d14aa9c2fp-47 -0x18353d14aa9c2fp-47 + 53 -0xfb53d14aa9c2fp-47 + 53 17 32 +0 53 +0 0x7353d14aa9c2fp-47 + 53 0xfb53d14aa9c2fp-47 + 53 17 0xfb53d14aa9c2fp-47 +0 53 -0x104ac2eb5563d1p-48 -0 + 53 0xfb53d14aa9c2fp-48 + 53 0xfb53d14aa9c2fp-48 32 + +0 53 0x15b456789abcdfp-48 0x123456789abd17p-4 + 53 3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-48 +1 53 0x3923456789abcdp-52 0x123456789abd17p-4 + 53 3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-56 +2 53 0x18p-4 0x101a3456789abdp-44 + 53 256.5 + 53 -0x123456789abcdfp-52 0xff +3 53 0xfff8p-4 0x10018p-4 + 53 4097.5 + 53 0x1p-550 0x1fffffffffffffp-52 + +0 53 0xeb456789abcdfp-48 0x123456789abca7p-4 + 53 -3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-48 +1 53 -0x36dcba98765434p-52 0x123456789abca7p-4 + 53 -3.5 + 53 -0x123456789abcdfp-4 -0x123456789abcdfp-56 +2 53 -0x1ff8p-4 -0xff5cba9876543p-44 + 53 -256.5 + 53 -0x123456789abcdfp-52 0xff +3 53 -0x10038p-4 -0x10018p-4 + 53 -4097.5 + 53 0x1p-550 0x1fffffffffffffp-52 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/has_zero.dat b/Build/source/libs/mpfi/mpfi-src/tests/has_zero.dat new file mode 100644 index 00000000000..2e17c5419f7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/has_zero.dat @@ -0,0 +1,42 @@ +# data file for mpfi_has_zero +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan +0 53 -inf -inf +0 53 -inf -8 ++ 53 -inf -0 ++ 53 -inf 5 ++ 53 -inf +inf +0 53 -inf nan ++ 53 -8 -0 ++ 53 +0 -0 ++ 53 +0 5 ++ 53 +0 +inf +0 53 5 +inf +0 53 +inf +inf +0 53 +inf nan + +# regular values +0 8 -34 -17 +0 8 -8 -8 ++ 8 -34 17 ++ 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 64 +8 +8 +0 53 +8 +0x7fffffffffffbp+51 +0 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/hypot.dat b/Build/source/libs/mpfi/mpfi-src/tests/hypot.dat new file mode 100644 index 00000000000..e47f990f672 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/hypot.dat @@ -0,0 +1,73 @@ +# data file for mpfi_hypot +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of second parameter +# 8: precision of second parameter +# 9: left endpoint value of second parameter +# 10: right endpoint value of second parameter + +# special values +0 53 +inf +inf 53 nan nan 53 -inf -inf +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 5 +inf +0 53 +inf +inf 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 +inf +inf 53 nan -0 53 -inf -inf +0 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan -0 53 -8 1 +0 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 7 +0 53 nan nan 53 nan -inf 53 5 +inf +0 53 +inf +inf 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan 1 53 nan -0 +0 53 +inf +inf 53 -inf -inf 53 -inf -inf +0 53 7 +inf 53 -inf -7 53 -1 8 +0 53 8 +inf 53 -inf -0 53 8 +inf +0 53 +inf +inf 53 -inf -0 53 +inf +inf +0 53 +0 +inf 53 -inf 8 53 +0 8 +0 53 +0 +inf 53 -inf +inf 53 +0 8 +0 53 7 +inf 53 +0 -0 53 -inf -7 +0 53 +0 5 53 +0 3 53 -4 -0 +0 53 +0 8 53 +0 -0 53 +0 8 +0 53 +0 +inf 53 +0 +inf 53 +0 8 +0 53 8 +inf 53 +0 -0 53 8 +inf +0 53 nan nan 53 +0 8 53 +inf nan +0 53 +0 +inf 53 +0 -0 53 -inf +inf +0 53 +0 13 53 +0 5 53 +0 12 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 +0 +inf 53 +0 +inf 53 -7 8 +0 53 nan nan 53 +0 nan 53 8 +inf +0 53 +inf +inf 53 +0 8 53 +inf +inf +0 53 +inf +inf 53 +inf +inf 53 -inf 3 +0 53 +inf +inf 53 +inf +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf 53 3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 +inf +inf 53 +inf nan 53 +inf +inf +0 53 nan nan 53 +inf nan 53 -3 7 + +# regular values +0 53 13 37 + 53 -12 -5 + 53 -35 -12 + +1 53 0x1854bfb363dc39p-50 25 + 53 6 7 + 53 1 24 + +2 53 0 0x19f625847a5899p-48 + 53 -4 +7 + 53 -25 3 + +3 53 0x113463fa37014dp-49 0x125b89092b8fc0p-47 + 53 0x1854bfb363dc39p-50 0x19f625847a5899p-48 + 53 0x1854bfb363dc39p-50 0x19f625847a5899p-48 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/increase.dat b/Build/source/libs/mpfi/mpfi-src/tests/increase.dat new file mode 100644 index 00000000000..c4b482a6f64 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/increase.dat @@ -0,0 +1,104 @@ +# data file for mpfi_increase +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 nan nan 53 -0x170ef54646d497p-109 +53 nan nan 0 53 nan nan 53 -0 +53 nan nan 0 53 nan nan 53 0x170ef54646d497p-109 +53 nan -inf 0 53 nan -inf 53 -0x114b37f4b51f71p-107 +53 nan -inf 0 53 nan -inf 53 +0 +53 nan -inf 0 53 nan -inf 53 0x114b37f4b51f71p-107 +53 nan -7 0 53 nan -7 53 -0 +53 nan -0 0 53 nan -0 53 7 +53 nan 1 0 53 nan 1 53 3 +53 nan +inf 0 53 nan +inf 53 -0x5acae5c4b6e51p-101 +53 nan +inf 0 53 nan +inf 53 +0 +53 nan +inf 0 53 nan +inf 53 0x5acae5c4b6e51p-101 + +53 -inf -inf 0 53 -inf -inf 53 -0x170ef54646d497p-108 +53 -inf -inf 0 53 -inf -inf 53 +0 +53 -inf -inf 0 53 -inf -inf 53 0x170ef54646d497p-108 +53 -inf -inf 0 53 nan nan 53 nan +53 -inf -7 0 53 -inf -8 53 -1 +53 -inf -7 0 53 -inf -6 53 1 +53 -inf -0x1bffffffffffffp-50 2 53 -inf -7 53 -0x170ef54646d497p-102 +53 -inf -0x170ef54646d497p-106 0 53 -inf -0 53 0x170ef54646d497p-106 +53 -inf -0 0 53 -inf -0 53 +0 +53 -inf 0x170ef54646d497p-106 0 53 -inf -0 53 -0x170ef54646d497p-106 +53 -inf -0x16345785d89ff8 0 53 -inf 8 53 0x16345785d8a000 +53 -inf 8 0 53 -inf 8 53 -0 +53 -inf 0x16345785d89ff0p-52 0 53 -inf 8 53 0x69cba87a276010p-52 +53 -inf +inf 0 53 -inf +inf 53 -0x170ef54646d497p-105 +53 -inf +inf 0 53 -inf +inf 53 +0 +53 -inf +inf 0 53 -inf +inf 53 +0x170ef54646d497p-105 +53 -inf nan 0 53 -inf nan 53 -0x170ef54646d497p-104 +53 -inf nan 0 53 -inf nan 53 -0 +53 -inf nan 0 53 -inf nan 53 +0x170ef54646d497p-104 + + 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 +0 53 -0x2e1dea8c8da92ep-109 -0 53 0x170ef54646d497p-109 + 53 +0 -0 +0 53 +0 -0 53 +0 + 53 0x170ef54646d497p-109 0x170ef54646d497p-109 +0 53 +0 0x2e1dea8c8da92ep-109 53 0x170ef54646d497p-109 + 53 +0 8 +0 53 +0 8 53 -0 + 53 -0x10000000000001p-49 -0x114b37f4b51f7p-103 +1 53 -0x10000000000002p-49 -0 53 0x114b37f4b51f7p-103 + 53 +0 -0 +0 53 nan nan 53 nan + + 53 -0x50b45a75f7e81p-104 +inf +0 53 +0 +inf 53 -0x50b45a75f7e81p-104 + 53 +0 +inf +0 53 +0 +inf 53 +0 + 53 0x142d169d7dfa03p-106 +inf +0 53 +0 +inf 53 0x142d169d7dfa03p-106 + +53 +inf +inf 0 53 +inf +inf 53 -0x170ef54646d497p-109 +53 +inf +inf 0 53 +inf +inf 53 -0 +53 +inf +inf 0 53 +inf +inf 53 0x170ef54646d497p-109 +53 +inf +inf 0 53 nan nan 53 nan +53 +inf nan 0 53 +inf nan 53 -0x170ef54646d497p-109 +53 +inf nan 0 53 +inf nan 53 +0 +53 +inf nan 0 53 +inf nan 53 0x170ef54646d497p-109 + +# regular values + 53 -0x10000000000001p-12 -0x10000000000001p-52 +0 53 -0x10000000001001p-12 -0x00000000000001p-52 53 1 + 53 -0x10000000000001 -0x10000000000001p-52 +1 53 -0x10000000000003 -0 53 0x10000000000001p-52 + 53 -0x10000000000001p-12 -0x10000000000001p-52 +2 53 -0x1000000000f001p-12 0xe 53 0xf + 53 -0x10000000000001p-12 -0x10000000000001p-52 +3 53 -0x10000000100003p-12 0xff001001000000p-48 53 0x100001001p-24 + + 53 -0x10000000000001p-52 0x10000000000001p-52 +0 53 -0x10000000000001p-51 0x10000000000001p-51 53 0x10000000000001p-52 + 53 -0x10000000000001p-12 0x10000000000001p-52 +1 53 -0x10000000001002p-12 0x10000000000001p-51 53 0x10000000000001p-52 + 53 -0x114b37f4b51f71p-107 8 +2 53 +0 8 53 -0x114b37f4b51f71p-107 + 53 -1 1 +3 53 -3 3 54 0x3fffffffffffffp-53 + + 53 0x10000000000001p-48 0x10000000000001 +0 53 0x0f000000000001p-48 0x10000000000002 53 1 + 53 0x10000000000001p-48 0x10000000000001 +1 53 -0xf0 0x10000000000101 53 0x100 + 53 0x10000000000001p-48 0x10000000000001 +2 53 -0x000fffffffffffp-48 0x10000000000012 53 0x101p-4 + 53 0x10000000000001p-48 0x10000000000001 +3 53 -0xf01p-4 0x10000000000102 53 0x1001p-4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/inf_p.dat b/Build/source/libs/mpfi/mpfi-src/tests/inf_p.dat new file mode 100644 index 00000000000..5c7a2f0852c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/inf_p.dat @@ -0,0 +1,41 @@ +# data file for mpfi_inf_p +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan ++ 53 -inf -inf ++ 53 -inf -8 ++ 53 -inf -0 ++ 53 -inf 5 ++ 53 -inf +inf +0 53 -inf nan +0 53 -8 -0 +0 53 +0 -0 +0 53 +0 5 ++ 53 +0 +inf ++ 53 5 +inf ++ 53 +inf +inf +0 53 +inf nan + +# regular values +0 8 -34 -17 +0 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 +8 +0x7fffffffffffbp+51 +0 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/inp_str.dat b/Build/source/libs/mpfi/mpfi-src/tests/inp_str.dat new file mode 100644 index 00000000000..35f48cd1807 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/inp_str.dat @@ -0,0 +1,5 @@ +101011101011101001110110111110100000000000111100000000011111010001110001111011010000111111011001101111101100111101000000000000000000000000000100000000000000000000000000000000000000000000000000000000000000000000000011101100110101010011110111111111111111111111111111111111 + 12 + 9999901 +1.0001e-54 +1.999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/intersect.dat b/Build/source/libs/mpfi/mpfi-src/tests/intersect.dat new file mode 100644 index 00000000000..30aa620895c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/intersect.dat @@ -0,0 +1,49 @@ +# data file for mpfi_intersect +# +# for a description of the fields: see add.dat + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan -0 53 -8 +1 +0 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan nan 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan +1 53 nan -0 +0 53 -inf -inf 53 -inf -inf 53 -inf -inf +3 53 -1 -7 53 -inf -7 53 -1 +8 # empty interval +3 53 +8 -0 53 -inf -0 53 +8 +inf # empty interval +3 53 +inf -0 53 -inf -0 53 +inf +inf # empty interval +0 53 +0 +8 53 -inf +8 53 +0 +8 +0 53 +0 +8 53 -inf +inf 53 +0 +8 +3 53 +0 -7 53 +0 -0 53 -inf -7 # empty interval +0 53 +0 -0 53 +0 +8 53 -7 -0 +0 53 +0 -0 53 +0 -0 53 +0 +8 +0 53 +0 +8 53 +0 +inf 53 +0 +8 +3 53 +8 -0 53 +0 -0 53 +8 +inf # empty interval +0 53 nan nan 53 +0 +8 53 +inf nan +0 53 +0 -0 53 +0 -0 53 -inf +inf +0 53 +0 +8 53 +0 +8 53 -7 +8 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 +0 +8 53 +0 +inf 53 +0 +8 +0 53 nan nan 53 +0 nan 53 +8 +inf +3 53 +inf +8 53 +0 +8 53 +inf +inf # empty interval +3 53 +inf +3 53 +inf +inf 53 -inf +3 # empty interval +0 53 +inf +inf 53 +inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf 53 +3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 nan nan 53 +inf nan 53 +inf +inf +0 53 nan nan 53 +inf nan 53 -3 +7 + +# regular values +0 53 0x12 0x34 53 0x12 0x90 53 -0x0d 0x34 +1 12 0x8.efp-8 0x34 53 -0x0d 0x34 53 0x8.ef7p-8 0xa0 +2 12 -0x12 0x1.f3p+24 53 -0x2fp+12 0x9p+32 53 -0x12 0x1.f2ffffffp+24 +3 12 0x1.a1p-4 0x4.e78p-4 53 -1 0x8.237 53 0x1.a100001p-4 0x4.e7249961p-4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/inv.dat b/Build/source/libs/mpfi/mpfi-src/tests/inv.dat new file mode 100644 index 00000000000..5c7d7189d60 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/inv.dat @@ -0,0 +1,31 @@ +# data file for mpfi_inv +# +# column fields: see neg.dat + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -64 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 nan +1 +0 53 nan nan 53 +inf nan +0 53 +0 -0 53 -inf -inf +0 53 -4 -0 53 -inf -.25 +0 53 -inf -0 53 -inf -0 +0 53 -inf +inf 53 -inf +4 +0 53 -inf +inf 53 -inf +inf +0 53 -inf +inf 53 +0 -0 +0 53 +.5 +inf 53 +0 +2 +0 53 +0 +inf 53 +0 +inf +0 53 +0 -0 53 +inf +inf + +# regular values +0 53 -.5 -0.125 + 53 -8 -2 +1 53 0x1947bfce1bc417p-52 0x10 + 53 0x1p-4 0x1440c131282cd9p-53 +2 53 0.015625 0x13bc205a76b3fdp-50 + 53 0x19f1a539c91fddp-55 +64 +3 53 -0x1480a9b5772a23p-50 -0x177887d65484c9p-52 + 53 -0xae83b95effd69p-52 -0x63e3cb4ed72a3p-53 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/is_neg.dat b/Build/source/libs/mpfi/mpfi-src/tests/is_neg.dat new file mode 100644 index 00000000000..5817b7afd7f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/is_neg.dat @@ -0,0 +1,41 @@ +# data file for mpfi_is_neg +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan ++ 53 -inf -inf ++ 53 -inf -8 ++ 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan ++ 53 -8 -0 +0 53 +0 -0 +0 53 +0 5 +0 53 +0 +inf +0 53 5 +inf +0 53 +inf +inf +0 53 +inf nan + +# regular values ++ 8 -34 -17 ++ 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 +8 +0x7fffffffffffbp+51 +0 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/is_nonneg.dat b/Build/source/libs/mpfi/mpfi-src/tests/is_nonneg.dat new file mode 100644 index 00000000000..1db947d2154 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/is_nonneg.dat @@ -0,0 +1,41 @@ +# data file for mpfi_is_nonneg +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan +0 53 -inf -inf +0 53 -inf -8 +0 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan +0 53 -8 -0 ++ 53 +0 -0 ++ 53 +0 5 ++ 53 +0 +inf ++ 53 5 +inf ++ 53 +inf +inf +0 53 +inf nan + +# regular values +0 8 -34 -17 +0 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 +8 +0x7fffffffffffbp+51 ++ 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/is_nonpos.dat b/Build/source/libs/mpfi/mpfi-src/tests/is_nonpos.dat new file mode 100644 index 00000000000..96f18352c7c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/is_nonpos.dat @@ -0,0 +1,41 @@ +# data file for mpfi_is_nonpos +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan ++ 53 -inf -inf ++ 53 -inf -8 ++ 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan ++ 53 -8 -0 ++ 53 +0 -0 +0 53 +0 5 +0 53 +0 +inf +0 53 5 +inf +0 53 +inf +inf +0 53 +inf nan + +# regular values ++ 8 -34 -17 ++ 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 8 0x7fffffffffffbp+51 +0 53 0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/is_pos.dat b/Build/source/libs/mpfi/mpfi-src/tests/is_pos.dat new file mode 100644 index 00000000000..cb9732aadd1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/is_pos.dat @@ -0,0 +1,43 @@ +# data file for mpfi_is_pos +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan +0 53 -inf -inf +0 53 -inf -8 +0 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan +0 53 -8 -0 + +0 53 +0 -0 #should it return true? + ++ 53 +0 5 ++ 53 +0 +inf ++ 53 5 +inf ++ 53 +inf +inf +0 53 +inf nan + +# regular values +0 8 -34 -17 +0 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 +8 +0x7fffffffffffbp+51 ++ 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/is_strictly_neg.dat b/Build/source/libs/mpfi/mpfi-src/tests/is_strictly_neg.dat new file mode 100644 index 00000000000..494c6741c3d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/is_strictly_neg.dat @@ -0,0 +1,41 @@ +# data file for mpfi_is_strictly_neg +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan ++ 53 -inf -inf ++ 53 -inf -8 +0 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan +0 53 -8 -0 +0 53 +0 -0 +0 53 +0 5 +0 53 +0 +inf +0 53 5 +inf +0 53 +inf +inf +0 53 +inf nan + +# regular values ++ 8 -34 -17 ++ 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 +8 +0x7fffffffffffbp+51 +0 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/is_strictly_pos.dat b/Build/source/libs/mpfi/mpfi-src/tests/is_strictly_pos.dat new file mode 100644 index 00000000000..33499593ddb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/is_strictly_pos.dat @@ -0,0 +1,41 @@ +# data file for mpfi_is_strictly_pos +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values +0 53 nan -inf +0 53 nan -8 +0 53 -8 nan +0 53 nan -0 +0 53 +0 nan +0 53 nan 5 +0 53 5 nan +0 53 nan +inf +0 53 nan nan +0 53 -inf -inf +0 53 -inf -8 +0 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf +0 53 -inf nan +0 53 -8 -0 +0 53 +0 -0 +0 53 +0 5 +0 53 +0 +inf ++ 53 5 +inf ++ 53 +inf +inf +0 53 +inf nan + +# regular values +0 8 -34 -17 +0 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 +8 +0x7fffffffffffbp+51 ++ 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/log.dat b/Build/source/libs/mpfi/mpfi-src/tests/log.dat new file mode 100644 index 00000000000..c9e08979909 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/log.dat @@ -0,0 +1,42 @@ +# data file for mpfi_log +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan -inf 53 nan -0 +0 53 -inf nan 53 +0 nan +0 53 nan -0 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -inf 53 -inf -0 +0 53 nan -0 53 -inf +1 +0 53 nan +inf 53 -inf +inf +0 53 nan -inf 53 -1 -0 +0 53 -inf -inf 53 +0 -0 +0 53 -inf -0 53 +0 +1 +0 53 -inf +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 +0 -0 + 53 +1 +1 +3 53 0xc6dc8a2928579p-47 0x1a9500bc7ffcc5p-48 + 53 0x3a2a08c23afe3p-14 0x1463ceb440d6bdp-14 +1 53 -0x2b9b8b1fb2fb9p-51 -0 + 53 0xb616ab8b683b5p-52 +1 +2 53 +0 0x5380455576989p-46 + 53 +1 0x8ac74d932fae3p-21 +3 53 0xbdee7228cfedfp-47 0x1b3913fc99f555p-48 + 53 0x4c322657ec89bp-16 0x4d68ba5f26bf1p-11 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/log10.dat b/Build/source/libs/mpfi/mpfi-src/tests/log10.dat new file mode 100644 index 00000000000..2609127882b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/log10.dat @@ -0,0 +1,42 @@ +# data file for mpfi_log10 +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan -inf 53 nan -0 +0 53 -inf nan 53 +0 nan +0 53 nan -0 53 nan 1 +0 53 +inf nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -inf 53 -inf -0 +0 53 nan -0 53 -inf 1 +0 53 nan +inf 53 -inf +inf +0 53 nan -inf 53 -1 -0 +0 53 -inf -inf 53 +0 -0 +0 53 -inf -0 53 +0 1 +0 53 -inf +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 +0 -0 + 53 1 1 +3 53 0x159753104a9401p-49 0x1716c01a04b570p-49 + 53 0x3a2a08c23afe3p-14 0x1463ceb440d6bdp-14 +1 53 -0x12f043ec00f8d6p-55 -0 + 53 0xb616ab8b683b5p-52 1 +2 53 2 0x1221cc590b9946p-49 + 53 100 0x8ac74d932fae3p-21 +3 53 0x149f1d70168f49p-49 0x17a543a94fb65ep-49 + 53 0x4c322657ec89bp-16 0x4d68ba5f26bf1p-11 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/log1p.dat b/Build/source/libs/mpfi/mpfi-src/tests/log1p.dat new file mode 100644 index 00000000000..009d790de6a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/log1p.dat @@ -0,0 +1,40 @@ +# data file for mpfi_log1p +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 -inf nan 53 -1 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan 0x162e42fefa39f0p-53 53 nan 1 +0 53 +inf nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -inf 53 -inf -1 +0 53 nan -0 53 -inf -0 +0 53 nan 0x162e42fefa39f0p-53 53 -inf 1 +0 53 nan +inf 53 -inf +inf +0 53 -inf -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x162e42fefa39f0p-53 53 +0 1 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +1 53 -0x13e080325bab7bp-52 -0 + 53 -0xb616ab8b683b5p-52 -0 +2 53 +0 0x14e0115561569cp-48 + 53 +0 0x8ac74d932fae3p-21 +3 53 0x17bdce451a337fp-48 0x1b3913fc99f6fcp-48 + 53 0x4c322657ec89bp-16 0x4d68ba5f26bf1p-11 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/log2.dat b/Build/source/libs/mpfi/mpfi-src/tests/log2.dat new file mode 100644 index 00000000000..e8fdc8d9f7d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/log2.dat @@ -0,0 +1,40 @@ +# data file for mpfi_log2 +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan -inf 53 nan -0 +0 53 -inf nan 53 +0 nan +0 53 nan -0 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -inf 53 -inf -0 +0 53 nan -0 53 -inf +1 +0 53 nan +inf 53 -inf +inf +0 53 nan -inf 53 -1 -0 +0 53 -inf -inf 53 +0 -0 +0 53 -inf -0 53 +0 +1 +0 53 -inf +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 +0 -0 + 53 1 1 +1 53 -0x1f74cb5d105b3ap-54 -0 + 53 0xb616ab8b683b5p-52 1 +2 53 +0 0x1e1ddc27c2c70fp-48 + 53 1 0x8ac74d932fae3p-21 +3 53 0x112035c9390c07p-47 0x13a3208f61f10cp-47 + 53 0x4c322657ec89bp-16 0x4d68ba5f26bf1p-11 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mag.dat b/Build/source/libs/mpfi/mpfi-src/tests/mag.dat new file mode 100644 index 00000000000..dac7b38d7ac --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mag.dat @@ -0,0 +1,40 @@ +# data file for mpfi_mag +# +# column fields: +# 1: error direction (0: result is exact, +: result is overestimated) +# 2: precision of result +# 3: value of result +# +# 5: precision of argument +# 6: left endpoint value of argument +# 7: right endpoint value of argument +# + +# special values +0 53 nan 53 nan -inf +0 53 nan 53 nan -8 +0 53 nan 53 -8 nan +0 53 nan 53 nan -0 +0 53 nan 53 +0 nan +0 53 nan 53 nan 5 +0 53 nan 53 +5 nan +0 53 nan 53 nan +inf +0 53 nan 53 nan nan +0 53 +inf 53 -inf -inf +0 53 +inf 53 -inf -8 +0 53 +inf 53 -inf -0 +0 53 +inf 53 -inf 5 +0 53 +inf 53 -inf +inf +0 53 nan 53 -inf nan +0 53 +inf 53 -inf -0 +0 53 +8 53 -8 -0 +0 53 +0 53 +0 -0 +0 53 +5 53 +0 5 +0 53 +inf 53 +0 +inf +0 53 nan 53 +0 nan +0 53 +inf 53 +inf +inf +0 53 nan 53 +inf nan + +# regular values +0 53 34 53 -34 -17 ++ 4 36 53 -34 -17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mid.dat b/Build/source/libs/mpfi/mpfi-src/tests/mid.dat new file mode 100644 index 00000000000..d34ff97ac2a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mid.dat @@ -0,0 +1,57 @@ +# data file for mpfi_mid +# +# column fields: +# 1: error direction (0: result is exact, +: result is overestimated) +# 2: precision of result +# 3: value of result +# +# 5: precision of argument +# 6: left endpoint value of argument +# 7: right endpoint value of argument +# + +# special values +0 53 nan 53 nan -inf +0 53 nan 53 nan -8 +0 53 nan 53 -8 nan +0 53 nan 53 nan -0 +0 53 nan 53 +0 nan +0 53 nan 53 nan 5 +0 53 nan 53 5 nan +0 53 nan 53 nan +inf +0 53 nan 53 nan nan +0 53 -inf 53 -inf -inf +0 53 -inf 53 -inf -8 +0 53 -inf 53 -inf -0 +0 53 -inf 53 -inf 5 +0 53 nan 53 -inf +inf +0 53 nan 53 -inf nan +0 53 -4 53 -8 -0 +0 53 +0 53 +0 -0 +0 53 +2.5 53 +0 5 +0 53 +inf 53 +0 +inf +0 53 nan 53 +0 nan +0 53 +inf 53 5 +inf +0 53 +inf 53 +inf +inf +0 53 nan 53 +inf nan + +# regular values +0 53 -0x33p-1 + 53 -34 -17 + +- 4 -26 53 -34 -17 +0 53 -8.5 53 -34 17 ++ 4 -8 53 -34 17 +0 53 +0x123456789abcdp-3 + 53 +0 +0x123456789abcdp-2 +- 53 0x1921fb54442d18p-51 + 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 ++ 53 -0x1921fb54442d18p-51 + 53 -0x1921fb54442d19p-51 -0x1921fb54442d18p-51 ++ 53 -0x27fffffffffffbp-52 + 53 -4 -0x7fffffffffffdp-51 +- 53 -0x47fffffffffffbp-52 + 53 -8 -0x7fffffffffffbp-51 + +- 53 0.5 + 53 -0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mig.dat b/Build/source/libs/mpfi/mpfi-src/tests/mig.dat new file mode 100644 index 00000000000..14512073e57 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mig.dat @@ -0,0 +1,40 @@ +# data file for mpfi_mig +# +# column fields: +# 1: error direction (0: result is exact, -: result is underestimated) +# 2: precision of result +# 3: value of result +# +# 5: precision of argument +# 6: left endpoint value of argument +# 7: right endpoint value of argument +# + +# special values +0 53 nan 53 nan -inf +0 53 nan 53 nan -8 +0 53 nan 53 -8 nan +0 53 nan 53 nan -0 +0 53 nan 53 +0 nan +0 53 nan 53 nan 5 +0 53 nan 53 +5 nan +0 53 nan 53 nan +inf +0 53 nan 53 nan nan +0 53 +inf 53 -inf -inf +0 53 8 53 -inf -8 +0 53 +0 53 -inf -0 +0 53 +0 53 -inf 5 +0 53 +0 53 -inf +inf +0 53 nan 53 -inf nan +0 53 +0 53 -inf -0 +0 53 +0 53 -8 -0 +0 53 +0 53 +0 -0 +0 53 +0 53 +0 5 +0 53 +0 53 +0 +inf +0 53 nan 53 +0 nan +0 53 +inf 53 +inf +inf +0 53 nan 53 +inf nan + +# regular values +0 53 17 53 -34 -17 +- 4 16 53 -34 -17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.c b/Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.c new file mode 100644 index 00000000000..b0b9b572d01 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.c @@ -0,0 +1,69 @@ +/* mpfi_tests.c -- Test constant functions + and test non-constant functions with random values. + +Copyright (C) 2001, 2002, 2009, 2010, + Spaces project, Inria Lorraine + Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library, based on the MPFR Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Library General Public License as published by +the Free Software Foundation; either version 2 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public +License for more details. + +You should have received a copy of the GNU Library General Public License +along with the MPFR Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +mpfi_restrict_random (mpfi_function_ptr func, I_fun restriction) +{ + func->random_domain = restriction; +} + +void +mpfi_fun_clear (mpfi_function_ptr func) +{ + func->clear (func); +} + +void +check_random (mpfi_function_ptr function, + mpfr_prec_t prec_min, mpfr_prec_t prec_max, int nb_tests) +{ + mpfr_prec_t prec; + int i; + + if (!rands_initialized) + { + printf ("Put test_start at the beginning of your test function.\n"); + printf ("There is a bug in the test suite itself, " + "please report to the MPFI mailing list.\n"); + exit (1); + } + + if (function->random == NULL) { + printf ("Error: no random function for this type.\n"); + printf ("There is a bug in the test suite itself, " + "please report to the MPFI mailing list.\n"); + exit (1); + } + + for (prec = prec_min; prec <= prec_max; ++prec) { + function->set_prec (function, prec); + for (i = 0; i < nb_tests; ++i) { + function->random (function); + } + } +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.h b/Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.h new file mode 100644 index 00000000000..908f5b1bdc4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mpfi-tests.h @@ -0,0 +1,320 @@ +/* mpfi-tests.h -- Include file for mpfi's tests. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#ifndef __MPFI_TESTS_H__ +#define __MPFI_TESTS_H__ + +#include + +#include "mpfi_io.h" +#include "mpfi-impl.h" + +#define STR(a) # a +#define QUOTE(a) STR(a) + + +/** GENERIC TESTS **/ + +/* When adding a new generic test, one must declare a mpfi_function_t + variable and initialize it with the MPFI_FUN_SET macro before calling one + of the check_* functions. */ + +typedef int (*I_fun) (mpfi_t); +typedef int (*II_fun) (mpfi_t, mpfi_srcptr); +typedef int (*IS_fun) (mpfi_t, long); +typedef int (*IU_fun) (mpfi_t, unsigned long); +/* +typedef int (*JS_fun) (mpfi_t, intmax_t); +typedef int (*JU_fun) (mpfi_t, uintmax_t); +*/ +typedef int (*ID_fun) (mpfi_t, double); +typedef int (*IF_fun) (mpfi_t, float); +typedef int (*IL_fun) (mpfi_t, long double); +typedef int (*IZ_fun) (mpfi_t, mpz_srcptr); +typedef int (*IQ_fun) (mpfi_t, mpq_srcptr); +typedef int (*IR_fun) (mpfi_t, mpfr_srcptr); +typedef int (*III_fun) (mpfi_t, mpfi_srcptr, mpfi_srcptr); +/*typedef int (*IIII_fun)(mpfi_t, mpfi_t, mpfi_srcptr, mpfi_srcptr);*/ +typedef int (*IIII_fun)(mpfi_t, mpfi_srcptr, mpfi_srcptr, mpfi_srcptr); +typedef int (*IIU_fun) (mpfi_t, mpfi_srcptr, unsigned long); +typedef int (*IIS_fun) (mpfi_t, mpfi_srcptr, long); +typedef int (*IID_fun) (mpfi_t, mpfi_srcptr, double); +typedef int (*IIZ_fun) (mpfi_t, mpfi_srcptr, mpz_srcptr); +typedef int (*IIQ_fun) (mpfi_t, mpfi_srcptr, mpq_srcptr); +typedef int (*IIR_fun) (mpfi_t, mpfi_srcptr, mpfr_srcptr); +typedef int (*IUI_fun) (mpfi_t, unsigned long, mpfi_srcptr); +typedef int (*ISI_fun) (mpfi_t, long, mpfi_srcptr); +typedef int (*IDI_fun) (mpfi_t, double, mpfi_srcptr); +typedef int (*IZI_fun) (mpfi_t, mpz_srcptr, mpfi_srcptr); +typedef int (*IQI_fun) (mpfi_t, mpq_srcptr, mpfi_srcptr); +typedef int (*IRI_fun) (mpfi_t, mpfr_srcptr, mpfi_srcptr); +typedef int (*RI_fun) (mpfr_t, mpfi_srcptr); + +typedef int (*R_fun) (mpfr_t, mpfr_rnd_t); +typedef int (*RR_fun) (mpfr_t, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RRU_fun) (mpfr_t, mpfr_srcptr, unsigned long, mpfr_rnd_t); +typedef int (*RRS_fun) (mpfr_t, mpfr_srcptr, long, mpfr_rnd_t); +typedef int (*RRD_fun) (mpfr_t, mpfr_srcptr, double, mpfr_rnd_t); +typedef int (*RRZ_fun) (mpfr_t, mpfr_srcptr, mpz_srcptr, mpfr_rnd_t); +typedef int (*RRQ_fun) (mpfr_t, mpfr_srcptr, mpq_srcptr, mpfr_rnd_t); +typedef int (*RRR_fun) (mpfr_t, mpfr_srcptr, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RRRR_fun) (mpfr_t, mpfr_srcptr, mpfr_srcptr, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RUR_fun) (mpfr_t, unsigned long, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RSR_fun) (mpfr_t, long, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RDR_fun) (mpfr_t, double, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RZR_fun) (mpfr_t, mpz_srcptr, mpfr_srcptr, mpfr_rnd_t); +typedef int (*RQR_fun) (mpfr_t, mpq_srcptr, mpfr_srcptr, mpfr_rnd_t); +typedef void *NULL_fun; + +typedef union +{ + I_fun I; /* output: mpfi_t, no input */ + II_fun II; /* output: mpfi_t, input: mpfi_t */ + IS_fun IS; /* output: mpfi_t, input: long */ + IU_fun IU; /* output: mpfi_t, input: unsigned long */ + /*JS_fun JS;*/ /* output: mpfi_t, input: intmax_t */ + /*JU_fun JU;*/ /* output: mpfi_t, input: uintmax_t */ + ID_fun ID; /* output: mpfi_t, input: double */ + IF_fun IF; /* output: mpfi_t, input: float */ + IL_fun IL; /* output: mpfi_t, input: long double */ + IZ_fun IZ; /* output: mpfi_t, input: mpz_t */ + IQ_fun IQ; /* output: mpfi_t, input: mpq_t */ + IR_fun IR; /* output: mpfi_t, input: mpfr_t */ + III_fun III; /* output: mpfi_t, inputs: mpfi_t, mpfi_t */ + IIII_fun IIII; /* output: mpfi_t, mpfi_t, inputs: mpfi_t, mpfi_t */ + IIU_fun IIU; /* output: mpfi_t, inputs: mpfi_t, unsigned long */ + IIS_fun IIS; /* output: mpfi_t, inputs: mpfi_t, signed long */ + IID_fun IID; /* output: mpfi_t, inputs: mpfi_t, double */ + IIZ_fun IIZ; /* output: mpfi_t, inputs: mpfi_t, mpz_t */ + IIQ_fun IIQ; /* output: mpfi_t, inputs: mpfi_t, mpq_t */ + IIR_fun IIR; /* output: mpfi_t, inputs: mpfi_t, mpfr_t */ + IUI_fun IUI; /* output: mpfi_t, inputs: unsigned long, mpfi_t */ + ISI_fun ISI; /* output: mpfi_t, inputs: signed long, mpfi_t */ + IDI_fun IDI; /* output: mpfi_t, inputs: double, mpfi_t */ + IZI_fun IZI; /* output: mpfi_t, inputs: mpz_t, mpfi_t */ + IQI_fun IQI; /* output: mpfi_t, inputs: mpq_t, mpfi_t */ + IRI_fun IRI; /* output: mpfi_t, inputs: mpfr_t, mpfi_t */ + RI_fun RI; /* output: mpfr_t, input: mpfi_t */ +} mpfi_fun_ptr; + +typedef union +{ + R_fun I; /* output: mpfr_t, no input */ + RR_fun II; /* output: mpfr_t, input: mpfr_t */ + RRR_fun III; /* output: mpfr_t, inputs: mpfr_t, mpfr_t */ + RRRR_fun IIII; /* output: mpfr_t, inputs: mpfr_t, mpfr_t, mpfr_t */ + NULL_fun IS; /* dummy, no corresponding mpfr function */ + NULL_fun IU; /* dummy, no corresponding mpfr function */ + /*NULL_fun JS;*/ /* dummy, no corresponding mpfr function */ + /*NULL_fun JU;*/ /* dummy, no corresponding mpfr function */ + NULL_fun ID; /* dummy, no corresponding mpfr function */ + NULL_fun IF; /* dummy, no corresponding mpfr function */ + NULL_fun IL; /* dummy, no corresponding mpfr function */ + NULL_fun IZ; /* dummy, no corresponding mpfr function */ + NULL_fun IQ; /* dummy, no corresponding mpfr function */ + NULL_fun IR; /* dummy, no corresponding mpfr function */ + RRU_fun IIU; /* output: mpfr_t, inputs: mpfr_t, unsigned long */ + RRS_fun IIS; /* output: mpfr_t, inputs: mpfr_t, signed long */ + RRD_fun IID; /* output: mpfr_t, inputs: mpfr_t, double */ + RRZ_fun IIZ; /* output: mpfr_t, inputs: mpfr_t, mpz_t */ + RRQ_fun IIQ; /* output: mpfr_t, inputs: mpfr_t, mpq_t */ + RRR_fun IIR; /* output: mpfr_t, inputs: mpfr_t, mpfr_t */ + RUR_fun IUI; /* output: mpfr_t, inputs: unsigned long, mpfr_t */ + RSR_fun ISI; /* output: mpfr_t, inputs: signed long, mpfr_t */ + RDR_fun IDI; /* output: mpfr_t, inputs: double, mpfr_t */ + RZR_fun IZI; /* output: mpfr_t, inputs: mpz_t, mpfr_t */ + RQR_fun IQI; /* output: mpfr_t, inputs: mpq_t, mpfr_t */ + RRR_fun IRI; /* output: mpfr_t, inputs: mpfr_t, mpfr_t */ + NULL_fun RI; /* dummy, no corresponding mpfr function */ +} mpfi_fun_mpfr_ptr; + +typedef enum + { + I, /* no input */ + II, /* one input: interval */ + IS, /* one input: long */ + IU, /* one input: unsigned long */ + /*JS,*/ /* one input: intmax_t */ + /*JU,*/ /* one input: uintmax_t */ + ID, /* one input: double */ + IF, /* one input: float */ + IL, /* one input: long double */ + IZ, /* one input: mpz_t */ + IQ, /* one input: mpq_t */ + IR, /* one input: mpfr_t */ + III, /* two inputs: intervals */ + IIII, /* three inputs: intervals */ /* may be modified into 2 inputs and 2 outputs */ + IIU, /* two inputs: interval, unsigned long */ + IIS, /* two inputs: interval, signed long */ + IID, /* two inputs: interval, double */ + IIZ, /* two inputs: interval, mpz_t */ + IIQ, /* two inputs: interval, mpq_t */ + IIR, /* two inputs: interval, mpfr_t */ + IUI, /* two inputs: unsigned long, interval */ + ISI, /* two inputs: signed long, interval */ + IDI, /* two inputs: double, interval */ + IZI, /* two inputs: mpz_t, interval */ + IQI, /* two inputs: mpq_t, interval */ + IRI, /* two inputs: mpfr_t, interval */ + RI, /* one input: interval */ + } mpfi_fun_type; + +typedef union { + int i; + unsigned long ui; + signed long si; +/* + uintmax_t uj; + intmax_t sj; +*/ + double d; + float f; + long double ld; + mpz_t mpz; + mpq_t mpq; + mpfr_t mpfr; + mpfi_t mpfi; +} mpfi_fun_operand_t; + +struct mpfi_function_t; +typedef struct mpfi_function_t* mpfi_function_ptr; + +struct mpfi_function_t +{ + mpfi_fun_type type; + mpfi_fun_ptr func; + mpfi_fun_mpfr_ptr mpfr_func; /* associated MPFR function */ + mpfi_fun_operand_t* operands; + I_fun random_domain; + + void (*set_prec) (mpfi_function_ptr, mpfr_prec_t); + void (*read_line) (mpfi_function_ptr, FILE *); + void (*check_line) (mpfi_function_ptr); + void (*random) (mpfi_function_ptr); + void (*clear) (mpfi_function_ptr); +}; + + +/* helper macro to abstract (to mask) mpfi_function_t type */ + +#define MPFI_FUN_TYPE(_mpfi_function) (_mpfi_function).type +#define MPFI_FUN_GET(_mpfi_function, _type) (_mpfi_function).func._type +#define MPFI_FUN_MPFR_FUNCTION(_mpfi_function, _type) \ + (_mpfi_function).mpfr_func._type +#define MPFI_FUN_ARGS(_mpfi_function) \ + ((_mpfi_function).operands) +#define MPFI_FUN_ARG(_mpfi_function, _arg_no, _arg_type) \ + ((_mpfi_function).operands[(_arg_no)]._arg_type) + + +/* Helper functions */ + +#ifdef __cplusplus +extern "C" { +#endif + +/* public functions. + when adding a generic test, use the following functions: */ +void test_start (void); +void test_end (void); +void check_data (mpfi_function_ptr, const char *); +void check_random (mpfi_function_ptr, mpfr_prec_t, mpfr_prec_t, int); + +void mpfi_fun_init_I (mpfi_function_ptr, I_fun, R_fun); +void mpfi_fun_init_II (mpfi_function_ptr, II_fun, RR_fun); +void mpfi_fun_init_IU (mpfi_function_ptr, IU_fun, NULL_fun); +void mpfi_fun_init_IS (mpfi_function_ptr, IS_fun, NULL_fun); +/* +void mpfi_fun_init_JU (mpfi_function_ptr, JU_fun, NULL_fun); +void mpfi_fun_init_JS (mpfi_function_ptr, JS_fun, NULL_fun); +*/ +void mpfi_fun_init_ID (mpfi_function_ptr, ID_fun, NULL_fun); +void mpfi_fun_init_IF (mpfi_function_ptr, IF_fun, NULL_fun); +void mpfi_fun_init_IL (mpfi_function_ptr, IL_fun, NULL_fun); +void mpfi_fun_init_IZ (mpfi_function_ptr, IZ_fun, NULL_fun); +void mpfi_fun_init_IQ (mpfi_function_ptr, IQ_fun, NULL_fun); +void mpfi_fun_init_IR (mpfi_function_ptr, IR_fun, NULL_fun); +void mpfi_fun_init_III (mpfi_function_ptr, III_fun, RRR_fun); +void mpfi_fun_init_IIII (mpfi_function_ptr, IIII_fun, RRRR_fun); +void mpfi_fun_init_IIU (mpfi_function_ptr, IIU_fun, RRU_fun); +void mpfi_fun_init_IIS (mpfi_function_ptr, IIS_fun, RRS_fun); +void mpfi_fun_init_IID (mpfi_function_ptr, IID_fun, RRD_fun); +void mpfi_fun_init_IIZ (mpfi_function_ptr, IIZ_fun, RRZ_fun); +void mpfi_fun_init_IIQ (mpfi_function_ptr, IIQ_fun, RRQ_fun); +void mpfi_fun_init_IIR (mpfi_function_ptr, IIR_fun, RRR_fun); +void mpfi_fun_init_IUI (mpfi_function_ptr, IUI_fun, RUR_fun); +void mpfi_fun_init_ISI (mpfi_function_ptr, ISI_fun, RSR_fun); +void mpfi_fun_init_IDI (mpfi_function_ptr, IDI_fun, RDR_fun); +void mpfi_fun_init_IZI (mpfi_function_ptr, IZI_fun, RZR_fun); +void mpfi_fun_init_IQI (mpfi_function_ptr, IQI_fun, RQR_fun); +void mpfi_fun_init_IRI (mpfi_function_ptr, IRI_fun, RRR_fun); +void mpfi_fun_init_RI (mpfi_function_ptr, RI_fun, NULL_fun); +void mpfi_fun_clear (mpfi_function_ptr); + +void mpfi_restrict_random (mpfi_function_ptr, I_fun); + +/* internal functions */ + +extern gmp_randstate_t rands; +extern char rands_initialized; +void random_interval (mpfi_ptr); +unsigned long random_ui (); +long random_si (); +double random_double (); +void random_mpz (mpz_ptr, unsigned long); +void random_mpq (mpq_ptr); +void random_mpfr (mpfr_ptr); + +int same_mpfr_value (mpfr_srcptr, mpfr_srcptr); +int same_value (mpfi_srcptr, mpfi_srcptr); + +FILE* open_file (const char *); +void init_reading (FILE*); +void close_file (FILE*); +void skip_whitespace_comments (FILE*); +void read_sign (FILE*, int*); +void read_exactness (FILE*, int*); +void read_ui (FILE*, unsigned long*); +void read_si (FILE*, long*); +/* +void read_uj (FILE*, uintmax_t*); +void read_sj (FILE*, intmax_t*); +*/ +int read_double (FILE*, double*); +int read_float (FILE*, float*); +int read_long_double (FILE*, long double*); +void read_mpz (FILE*, mpz_ptr); +void read_mpq (FILE*, mpq_ptr); +void read_mpfr (FILE*, mpfr_ptr); +void read_mpfi (FILE*, mpfi_ptr); + +void check_with_different_prec (mpfi_function_ptr, mpfr_prec_t); + +#ifdef __cplusplus +} +#endif + +#endif /* __MPFI_TESTS_H__ */ diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul.dat new file mode 100644 index 00000000000..35d22da3540 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul.dat @@ -0,0 +1,123 @@ +# data file for mpfi_mul +# +# fields: see add.dat + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan -0 53 -8 +1 +0 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan nan 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan +1 53 nan -0 +0 53 +inf +inf 53 -inf -inf 53 -inf -inf +0 53 +0 -0 53 -inf -inf 53 +0 -0 +0 53 -inf +inf 53 -inf -7 53 -1 +8 +0 53 -inf -0 53 -inf -0 53 +8 +inf +0 53 -inf nan 53 -inf -0 53 +inf +inf +0 53 -inf +64 53 -inf +8 53 +0 +8 +0 53 +0 -0 53 -inf +inf 53 +0 -0 +0 53 -inf +inf 53 -inf +inf 53 +0 +8 +0 53 +0 -0 53 +0 -0 53 -inf -7 +0 53 -56 -0 53 +0 +8 53 -7 -0 +0 53 +0 -0 53 +0 -0 53 +0 +8 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 +0 -0 53 +0 -0 53 +8 +inf +0 53 nan nan 53 +0 +8 53 +inf nan +0 53 +0 -0 53 +0 -0 53 -inf +inf +0 53 -56 +64 53 +0 +8 53 -7 +8 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 nan nan 53 +0 nan 53 +8 +inf +0 53 nan +inf 53 +0 +8 53 +inf +inf +0 53 +0 -0 53 +inf +inf 53 +0 -0 +0 53 -inf +inf 53 +inf +inf 53 -inf +3 +0 53 nan +inf 53 +inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf 53 +3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 nan nan 53 +inf nan 53 +inf +inf +0 53 nan nan 53 +inf nan 53 -3 +7 +0 53 +0 -0 53 -3 +7 53 +0 -0 + +# regular values +0 53 0x12 0x34 + 53 -0x0d -0x09 53 -0x04 -0x02 +1 53 0x8.ef3aa21dba748p-8 0x34 + 53 -0x0d -0xd.f0e7927d247cp-4 53 -0x04 -0xa.41084aff48f8p-8 +2 53 0x12 0x1.f1651669609aap+2044 + 53 -0x2.ff65224ae58c6p+1020 -0x09 53 -0xa.5edd2648b5608p+1020 -0x02 +3 53 0x1.a142a930de328p-4 0x4.e86c3434cd924p-4 + 53 -0xe.26c9e9eb67b48p-4 -0x8.237d2eb8b1178p-4 53 -0x5.8c899a0706d5p-4 -0x3.344e57a37b5e8p-4 +0 53 -0x74e 0x37 + 53 -0x37 -0x07 53 -0x01 0x22 +1 53 -0x1.491df346a9f15p+0 0xe.063f267ed51ap-4 + 53 -0xe.063f267ed51ap-4 -0x0.33 53 -0x01 0x1.777ab178b4a1ep+0 +2 53 -0x1.cb540b71699a8p+4 0x2.804cce4a3f42ep+4 + 53 -0x1.cb540b71699a8p+4 -0x0.33 53 -0x1.64dcaaa101f18p+0 0x01 +3 53 -0x3.71b422ce817f4p+8 0x2.804cce4a3f42ep+4 + 53 -0x1.cb540b71699a8p+4 -0x0.33 53 -0x1.64dcaaa101f18p+0 0x1.eb67a1a6ef725p+4 +0 53 -0x123456789a0 -0x01 + 53 -0x123456789a -0x01 53 0x01 0x10 +1 53 -0x1.7611a672948a5p+0 -0x01 + 53 -0xb.6c67d3a37d54p-4 -0x.8 53 0x02 0x2.0bee4e8bb3dfp+0 +2 53 -0x10 -0x7.99b990532d434p-8 + 53 -0x04 -0xa.497d533c3b2ep-8 53 0xb.d248df3373e68p-4 0x04 +3 53 -0x1.7611a672948a5p+0 -0x7.99b990532d434p-8 + 53 -0xb.6c67d3a37d54p-4 -0xa.497d533c3b2ep-8 53 0xb.d248df3373e68p-4 0x2.0bee4e8bb3dfp+0 + +0 53 -0x77 0x07 + 53 -0x01 0x11 53 -0x07 -0x04 +1 53 -0x2.101b41d3d48b8p+0 0x2.3b46226145234p+0 + 53 -0x01 0xe.ca7ddfdb8572p-4 53 -0x2.3b46226145234p+0 -0x0.1 +2 53 -0x2.3b46226145234p+0 0x2.7c0bd9877f404p+8 + 53 -0x1.1d069e75e8741p+8 0x01 53 -0x2.3b46226145234p+0 -0x0.1 +3 53 -0x2.7c0bd9877f404p+8 0x2.101b41d3d48b8p+0 + 53 -0xe.ca7ddfdb8572p-4 0x1.1d069e75e8741p+8 53 -0x2.3b46226145234p+0 -0x0.1 +0 53 -0x20 0x30 + 53 -0x01 0x10 53 -0x02 0x03 +1 53 -0x6.ea77a3ee43de8p-8 0x2.6bff2625fb71cp-4 + 53 -0x01 0x2.db091cea593fap-4 53 -0x2.6bff2625fb71cp-4 0x1p-8 +2 53 -0x1.8e3fe93a4ea52p+0 0xa.b52fe22d72788p-4 + 53 -0x01 0x6.e211fefc216ap-4 53 -0x1p-4 0x1.8e3fe93a4ea52p+0 +3 53 -0x8.ec5de73125be8p-4 0x2.adfe651d3b19ap+0 + 53 -0x1.15e079e49a0ddp+0 0x1p-8 53 -0x2.77fc84629a602p+0 0x8.3885932f13fp-4 +0 53 -0xfc 0xfc + 53 -0x07 0x07 53 0x13 0x24 +1 53 -0x1.71dc5b5607781p+0 0x2.3381083e7d3b4p+4 + 53 -0xa.8071f870126cp-4 0x10 53 0x02 0x2.3381083e7d3b4p+0 +2 53 -0x1.442e2695ac81ap+0 0x1.fb5fbebd0cbc6p+0 + 53 -0x01 0x1.90aa487ecf153p+0 53 0x01p-53 0x1.442e2695ac81ap+0 +3 53 -0x5.c61fcad908df4p+0 0x5.17b7c49130824p+0 + 53 -0x1.c40db77f2f6fcp+0 0x1.8eb70bbd94478p+0 53 0x02 0x3.45118635235c6p+0 + +0 53 -0x12345 -0xabc + 53 0xc 0x2d 53 -0x679 -0xe5 +1 53 -0x2.83a3712099234p+50 -0xabc + 53 0xc 0x1.1833fdcab4c4ap+10 53 -0x2.4c0afc50522ccp+40 -0xe5 +2 53 -0x12345 -0x7.35b3c8400ade4p+4 + 53 0xb.38f1fb0ef4308p+0 0x2d 53 -0x679 -0xa.4771d7d0c604p+0 +3 53 -0x3.e3ce52d4a139cp+4 -0x2.637164cf2f346p-8 + 53 0xf.08367984ca1cp-4 0xa.bcf6c6cbe341p+0 53 -0x5.cbc445e9952c4p+0 -0x2.8ad05a7b988fep-8 +0 53 -0xabc 0xc + 53 0x01 0xc 53 -0xe5 0x01 +1 53 -0x1.47f2dbe4ef916p+0 0x1.ec24910ac6aecp+32 + 53 0x123p-52 0x1.ec24910ac6aecp+0 53 -0xa.a97267f56a9b8p-4 0x1p+32 +2 53 -0x7.2bea531ef4098p+0 0x4.c765967f9468p+0 + 53 0x03 0x7.2bea531ef4098p+0 53 -0x01 0xa.a97267f56a9b8p-4 +3 53 -0x1.47f2dbe4ef916p+0 0x4.c765967f9468p+0 + 53 0x0.3 0xa.a97267f56a9b8p-4 53 -0x1.ec24910ac6aecp+0 0x7.2bea531ef4098p+0 +0 53 0xf 0x4d + 53 0x3 0x7 53 0x5 0xb +1 53 0x7.dc58fb323ad78p+0 0x4d + 53 0x2.48380232f6c16p+0 0x7 53 0x3.71cb6c53e68eep+0 0xb +2 53 0xfp-25 0x7.dc58fb323ad7cp+0 + 53 0x3 0x3.71cb6c53e68eep+0 53 0x5p-25 0x2.48380232f6c16p+0 +3 53 0x2.587a32d02bc04p-4 0x5.fa216b7c20c6cp+0 + 53 0x3.10e8a605572p-4 0x2.48380232f6c16p+0 53 0xc.3d8e305214ecp-4 0x2.9e7db05203c88p+0 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_2si.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_2si.dat new file mode 100644 index 00000000000..bf40318849c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_2si.dat @@ -0,0 +1,71 @@ +# data file for mpfi_mul_2si +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf -3 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -1.75 53 nan -7 -2 +0 53 nan -7 53 nan -7 0 +0 53 nan -28 53 nan -7 2 +0 53 nan -0 53 nan -0 -15 +0 53 nan -0 53 nan -0 0 +0 53 nan -0 53 nan -0 15 +0 53 nan .125 53 nan 1 -3 +0 53 nan 1 53 nan 1 0 +0 53 nan 8 53 nan 1 3 +0 53 nan +inf 53 nan +inf -63 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf -2 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 -inf -.125 53 -inf -1 -3 +0 53 -inf -1 53 -inf -1 0 +0 53 -inf -8 53 -inf -1 3 +0 53 -inf -0 53 -inf -0 -8 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -inf 0.5 53 -inf 8 -4 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf 128 53 -inf 8 4 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 -inf nan 53 -inf nan -64 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64 +0 53 +0 -0 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 +0 0.5 53 +0 8 -4 +0 53 +0 8 53 +0 8 0 +0 53 +0 128 53 +0 8 4 +0 53 +0 +inf 53 +0 +inf -7 +0 53 +0 +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf -1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan -1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -0x20p-32 -0x11p-32 + 53 -32 -17 -32 +0 53 0x11p+32 0x20p+32 + 53 17 32 32 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_2ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_2ui.dat new file mode 100644 index 00000000000..3f67e624b8e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_2ui.dat @@ -0,0 +1,66 @@ +# data file for mpfi_mul_2ui +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -7 53 nan -7 0 +0 53 nan -28 53 nan -7 2 +0 53 nan -0 53 nan -0 0 +0 53 nan -0 53 nan -0 15 +0 53 nan 1 53 nan 1 0 +0 53 nan 8 53 nan 1 3 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 -inf -1 53 -inf -1 0 +0 53 -inf -4 53 -inf -1 2 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf 128 53 -inf 8 4 +# semi-infinite result with rounding +2 16 -inf 0x10002000000000p-53 + 53 -inf 0x10000000000001p-53 0 +2 16 -inf 0x10002000000000p-49 + 53 -inf 0x10000000000001p-53 4 + +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 +0 8 53 +0 8 0 +0 53 +0 128 53 +0 8 4 +# result with endpoints 0 and a rounded number +2 16 +0 0x10002000000000p-53 + 53 +0 0x10000000000001p-53 0 +2 16 +0 0x10002000000000p-49 + 53 +0 0x10000000000001p-53 4 + +0 53 +0 +inf 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -0x20p+32 -0x11p+32 + 53 -32 -17 32 +0 53 0x123456789abcdfp-28 0x123456789abcdfp+25 + 53 0x123456789abcdfp-53 0x123456789abcdf 25 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_d.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_d.dat new file mode 100644 index 00000000000..e63776774e9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_d.dat @@ -0,0 +1,123 @@ +# data file for mpfi_add_d +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of second parameter +# 8: second parameter value + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan 53 nan nan -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 0.0 +0 53 nan nan 53 nan nan 0x170ef54646d497p-109 +0 53 nan nan 53 nan -inf -0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -inf 0.0 +0 53 nan nan 53 nan -inf 0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -7 -0xfc339ab0a6b53p-99 +0 53 nan nan 53 nan -7 0.0 +0 53 nan nan 53 nan -7 7.0 +0 53 nan nan 53 nan -0 -15.0 +0 53 nan nan 53 nan -0 0.0 +0 53 nan nan 53 nan -0 15.0 +0 53 nan nan 53 nan 1 -0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan 1 0.0 +0 53 nan nan 53 nan 1 0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +inf -0x5acae5c4b6e51p-101 +0 53 nan nan 53 nan +inf 0.0 +0 53 nan nan 53 nan +inf 0x5acae5c4b6e51p-101 +0 53 +inf +inf 53 -inf -inf -0x170ef54646d497p-108 +0 53 +0 -0 53 -inf -inf 0.0 +0 53 -inf -inf 53 -inf -inf 0x170ef54646d497p-108 +0 53 +0xa1 +inf 53 -inf -7 -0x17 +0 53 +0 -0 53 -inf -7 0.0 +2 53 -inf -0xa168b4ebefd020p-107 53 -inf -7 0x170ef54646d497p-107 +0 53 +0 +inf 53 -inf -0 -0x170ef54646d497p-106 +0 53 +0 -0 53 -inf -0 0.0 +0 53 -inf -0 53 -inf -0 0x170ef54646d497p-106 +0 53 -0xb1a2bc2ec5000000 +inf 53 -inf 8 -0x16345785d8a00000 +0 53 +0 -0 53 -inf 8 0.0 +0 53 -inf 0xb1a2bc2ec5000000 53 -inf 8 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf -0x170ef54646d497p-105 +0 53 +0 -0 53 -inf +inf 0.0e-17 +0 53 -inf +inf 53 -inf +inf +0x170ef54646d497p-105 +0 53 nan nan 53 -inf nan -0x170ef54646d497p-104 +0 53 nan nan 53 -inf nan 0.0e-17 +0 53 nan nan 53 -inf nan +0x170ef54646d497p-104 +0 53 +0 -0 53 +0 -0 -0x170ef54646d497p-109 +0 53 +0 -0 53 +0 -0 0.0 +0 53 +0 -0 53 +0 -0 0x170ef54646d497p-109 +1 53 -0x790e87b0f3dc18p-107 -0 53 +0 7 -0x114b37f4b51f71p-107 +0 53 +0 -0 53 +0 8 0.0 +2 53 +0 0x9ba4f79a5e1b00p-103 53 +0 9 0x114b37f4b51f71p-103 +0 53 -inf -0 53 +0 +inf -0x50b45a75f7e81p-104 +0 53 +0 -0 53 +0 +inf 0.0 +0 53 +0 +inf 53 +0 +inf 0x142d169d7dfa03p-106 +0 53 -inf -inf 53 +inf +inf -0x170ef54646d497p-109 +0 53 +0 -0 53 +inf +inf 0.0 +0 53 +inf +inf 53 +inf +inf 0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan -0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 0.0 +0 53 nan nan 53 +inf nan 0x170ef54646d497p-109 + +# regular values +0 53 0xfffffffffffffp-123 0x22a2a28 + 53 -0x1717170 -0xaaaaaaaaaaaaap-123 -1.5 +0 53 -0x22a2a28p+401 0xfffffffffffff + 53 -0xaaaaaaaaaaaaa 0x1717170p+401 -1.5 +0 53 -0x1222222222221p+654 -0x22000000000022 + 53 0x10000000000010 0x888888888888p+654 -2.125 +0 53 -0x22a2a28 -0xfffffffffffffp-123 + 53 -0x1717170 -0xaaaaaaaaaaaaap-123 1.5 +0 53 -0xfffffffffffff 0x22a2a28p+401 + 53 -0xaaaaaaaaaaaaa 0x1717170p+401 1.5 +0 53 0x22000000000022 0x1222222222221p+654 + 53 0x10000000000010 0x888888888888p+654 2.125 +1 53 0x18000000000001 0x22a2a28p+36 + 53 -0x1717170p+36 -0x10000000000001 -1.5 +1 53 -0x18000000000002 0xfffffffffffff + 53 -0xaaaaaaaaaaaaa 0x10000000000001 -1.5 +1 53 -0x12222222222223p+1 -0x22000000000022 + 53 0x10000000000010 0x11111111111111 -2.125 +1 53 -0x18000000000002 -0xfffffffffffffp-123 + 53 -0x10000000000001 -0xaaaaaaaaaaaaap-123 1.5 +1 53 -0x10000000000001 0x22a2a28p+401 + 53 -0xaaaaaaaaaaaab 0x1717170p+401 1.5 +1 53 0x22000000000002 0x1222222222221p+654 + 53 0x10000000000001 0x888888888888p+654 2.125 +2 53 0xfffffffffffffp-123 0x1a2a2a2a2a2a2a + 53 -0x11717171717171 -0xaaaaaaaaaaaaap-123 -1.5 +2 53 -0x22a2a28p+401 0x18000000000002 + 53 -0x10000000000001 0x1717170p+401 -1.5 +2 53 -0x1222222222221p+654 -0x22000000000002 + 53 0x10000000000001 0x888888888888p+654 -2.125 +2 53 -0x22a2a28 -0x27fffffffffffep-123 + 53 -0x1717170 -0x1aaaaaaaaaaaaap-123 1.5 +2 53 -0xfffffffffffff 0x1a2a2a2a2a2a2a + 53 -0xaaaaaaaaaaaaa 0x11717171717171 1.5 +2 53 0x22000000000022 0x34222222222224 + 53 0x10000000000010 0x18888888888889 2.125 +3 53 0x18000000000001 0x1a2a2a2a2a2a2a + 53 -0x11717171717171 -0x10000000000001 -1.5 +3 53 -0x18000000000002 0x18000000000002 + 53 -0x10000000000001 0x10000000000001 -1.5 +3 53 -0x12222222222223p+1 -0x22000000000002 + 53 0x10000000000001 0x11111111111111 -2.125 +3 53 -0x18000000000002 -0x27fffffffffffep-123 + 53 -0x10000000000001 -0x1aaaaaaaaaaaaap-123 1.5 +3 53 -0x10000000000001 0x1a2a2a2a2a2a2a + 53 -0xaaaaaaaaaaaab 0x11717171717171 1.5 +3 53 0x22000000000002 0x34222222222224 + 53 0x10000000000001 0x18888888888889 2.125 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_fr.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_fr.dat new file mode 100644 index 00000000000..0f02d8ea5e7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_fr.dat @@ -0,0 +1,90 @@ +# data file for mpfi_mul_fr +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 53 -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 53 -0 +0 53 nan nan 53 nan nan 53 0x170ef54646d497p-109 +0 53 nan nan 53 nan -inf 53 -0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -inf 53 +0 +0 53 nan nan 53 nan -inf 53 0x114b37f4b51f71p-107 +0 53 nan nan 53 nan -7 53 -0xfc339ab0a6b53p-99 +0 53 nan nan 53 nan -7 53 -0 +0 53 nan nan 53 nan -7 53 7.0 +0 53 nan nan 53 nan -0 53 -15.0 +0 53 nan nan 53 nan -0 53 +0 +0 53 nan nan 53 nan -0 53 15.0 +0 53 nan nan 53 nan +1 53 -0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +1 53 -0 +0 53 nan nan 53 nan +1 53 0xb2b3ece0a4ef9p-103 +0 53 nan nan 53 nan +inf 53 -0x5acae5c4b6e51p-101 +0 53 nan nan 53 nan +inf 53 +0 +0 53 nan nan 53 nan +inf 53 0x5acae5c4b6e51p-101 +0 53 +inf +inf 53 -inf -inf 53 -0x170ef54646d497p-108 +0 53 +0 -0 53 -inf -inf 53 +0 +0 53 -inf -inf 53 -inf -inf 53 0x170ef54646d497p-108 +1 53 0x142d169d7dfa04p-104 +inf 53 -inf -7 53 -0x170ef54646d497p-107 +0 53 +0 -0 53 -inf -7 53 -0 +2 53 -inf -0x142d169d7dfa04p-104 53 -inf -7 53 0x170ef54646d497p-107 +0 53 +0 +inf 53 -inf -0 53 -0x170ef54646d497p-106 +0 53 +0 -0 53 -inf -0 53 +0 +0 53 -inf -0 53 -inf -0 53 0x170ef54646d497p-106 +0 53 -0x16345785d8ap+23 +inf 53 -inf 8 53 -0x16345785d8a00000 +0 53 +0 -0 53 -inf 8 53 -0 +0 53 -inf 0x16345785d8ap+23 53 -inf 8 53 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf 53 -0x170ef54646d497p-105 +0 53 +0 -0 53 -inf +inf 53 +0 +0 53 -inf +inf 53 -inf +inf 53 +0x170ef54646d497p-105 +0 53 nan nan 53 -inf nan 53 -0x170ef54646d497p-104 +0 53 nan nan 53 -inf nan 53 -0 +0 53 nan nan 53 -inf nan 53 +0x170ef54646d497p-104 +0 53 +0 0x114b37f4b51f71p-104 53 -8 -0 53 -0x114b37f4b51f71p-107 +0 53 +0 -0 53 -8 -0 53 -0 +0 53 -0x114b37f4b51f71p-104 -0 53 -8 -0 53 0x114b37f4b51f71p-107 +0 53 +0 -0 53 +0 -0 53 -0x170ef54646d497p-109 +0 53 +0 -0 53 +0 -0 53 +0 +0 53 +0 -0 53 +0 -0 53 0x170ef54646d497p-109 +1 53 -0x115c832ca9d491p-99 -0 53 +0 257 53 -0x114b37f4b51f71p-107 +0 53 +0 -0 53 +0 257 53 -0 +2 53 +0 0x115c832ca9d491p-99 53 +0 257 53 0x114b37f4b51f71p-107 +0 53 -inf -0 53 +0 +inf 53 -0x50b45a75f7e81p-104 +0 53 +0 -0 53 +0 +inf 53 +0 +0 53 +0 +inf 53 +0 +inf 53 0x142d169d7dfa03p-106 +2 53 -inf -0x115c832ca9d490p-99 53 257 +inf 53 -0x114b37f4b51f71p-107 +0 53 +0 -0 53 257 +inf 53 +0 +1 53 0x115c832ca9d490p-99 +inf 53 257 +inf 53 0x114b37f4b51f71p-107 +0 53 -inf -inf 53 +inf +inf 53 -0x170ef54646d497p-109 +0 53 +0 -0 53 +inf +inf 53 -0 +0 53 +inf +inf 53 +inf +inf 53 0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 53 -0x170ef54646d497p-109 +0 53 nan nan 53 +inf nan 53 +0 +0 53 nan nan 53 +inf nan 53 0x170ef54646d497p-109 + +# regular values +0 53 0x1fdb97530eca6cp-51 0x1fdb97530eca6cp-7 + 53 0x123456789abcdp-48 0x123456789abcdp-4 53 3.5 +1 53 0x1fdb97530eca86p-55 0x1fdb97530eca6cp-7 + 53 0x123456789abcdfp-56 0x123456789abcdp-4 53 3.5 +2 53 -0x123d70a3d6fd58p-52 0x123d70a3d70a3ep-44 + 53 -0x123456789abp-48 0x123456789abcdfp-52 53 256.5 +3 53 -0x10018000000000p-39 -0x10018000000001p-538 + 53 -0x1fffffffffffffp-52 -0x10000000000001p-550 53 4097.5 + +0 53 -0x1fdb97530eca6cp-7 -0x1fdb97530eca6cp-51 + 53 0x123456789abcdp-48 0x123456789abcdp-4 53 -3.5 +1 53 -0x123d70a3d70a3ep-44 0x123d70a3d6fd58p-52 + 53 -0x123456789abp-48 0x123456789abcdfp-52 53 -256.5 +2 53 -0x1fdb97530eca6cp-7 -0x1fdb97530eca86p-55 + 53 0x123456789abcdfp-56 0x123456789abcdp-4 53 -3.5 +3 53 0x10018000000001p-538 0x10018000000000p-39 + 53 -0x1fffffffffffffp-52 -0x10000000000001p-550 53 -4097.5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_q.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_q.dat new file mode 100644 index 00000000000..1b0078672c1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_q.dat @@ -0,0 +1,99 @@ +# data file for mpfi_mul_q +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1/1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1/1 +0 53 nan nan 53 nan -inf -3/1 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3/1 +0 53 nan nan 53 nan -7 -7/1 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7/1 +0 53 nan nan 53 nan -0 -15/1 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15/1 +0 53 nan nan 53 nan 1 -31/1 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31/1 +0 53 nan nan 53 nan +inf -63/1 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63/1 +0 53 +inf +inf 53 -inf -inf -2/1 +0 53 +0 -0 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2/1 + +1 53 0x12492492492492p-53 +inf + 53 -inf -4 -1/7 +0 53 +0 -0 53 -inf -7 0 +2 53 -inf -0x12492492492492p-53 + 53 -inf -4 1/7 + +0 53 +0 +inf 53 -inf -0 -8/1 +0 53 +0 -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8/1 +0 53 -0.5 +inf 53 -inf 8 -1/16 +0 53 +0 -0 53 -inf 8 0 +0 53 -inf 0.5 53 -inf 8 1/16 +0 53 -inf +inf 53 -inf +inf -32/1 +0 53 +0 -0 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32/1 +0 53 nan nan 53 -inf nan -64/1 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan 64/1 +0 53 +0 -0 53 +0 -0 -1/1 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1/1 + +1 53 -0x15555555555556p-51 -0 + 53 +0 8 -1/3 +0 53 +0 -0 53 +0 8 0 +2 53 +0 0x15555555555556p-51 + 53 +0 8 1/3 + +0 53 -inf -0 53 +0 +inf -7/1 +0 53 +0 -0 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7/1 +0 53 -inf -inf 53 +inf +inf -1/1 +0 53 +0 -0 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1/1 +0 53 nan nan 53 +inf nan -1/1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1/1 + +# regular values +0 53 0x55p-5 5 + 53 -32 -17 -5/32 +0 53 -5 -0x55p-5 + 53 -32 -17 5/32 +1 53 -0x12d2d2d2d2d2d3p-49 -5 + 53 -32 -17 5/17 + +0 53 0x123456789abcdfp-45 0x123456789abcdfp+8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256/1 +1 53 0x18000000000001p-52 9 + 53 0x10000000000001p-53 3 3/1 +2 53 -27 0x18000000000002p-52 + 53 -9 0x10000000000001p-53 3/1 +3 53 -0x15555555555556p-51 0x15555555555556p-51 + 53 -8 8 1/3 + +0 53 -0x123456789abcdfp+8 -0x123456789abcdfp-45 + 53 0x123456789abcdfp-53 0x123456789abcdf -256/1 +1 53 -0x18000000000002p-52 27 + 53 -9 0x10000000000001p-53 -3/1 +2 53 -9 -0x18000000000001p-52 + 53 0x10000000000001p-53 3 -3/1 +3 53 -0x15555555555556p-51 0x15555555555556p-51 + 53 -8 8 -1/3 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_si.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_si.dat new file mode 100644 index 00000000000..c2688310718 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_si.dat @@ -0,0 +1,99 @@ +# data file for mpfi_mul_si +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan nan 53 nan -inf -3 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3 +0 53 nan nan 53 nan -7 -7 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7 +0 53 nan nan 53 nan -0 -15 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15 +0 53 nan nan 53 nan 1 -31 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31 +0 53 nan nan 53 nan +inf -63 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63 +0 53 +inf +inf 53 -inf -inf -2 +0 53 +0 -0 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf +2 + +1 53 -0x14000000000002p+2 +inf + 53 -inf 0x10000000000001 -5 +0 53 +0 -0 53 -inf -1 0 +2 53 -inf 0xa000000000001p+3 + 53 -inf 0x10000000000001 5 + +0 53 +0 +inf 53 -inf -0 -8 +0 53 +0 -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -128 +inf 53 -inf 8 -16 +0 53 +0 -0 53 -inf 8 0 +0 53 -inf 128 53 -inf 8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 +0 -0 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf +32 +0 53 nan nan 53 -inf nan -64 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan +64 +0 53 +0 -0 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 + +1 53 -0x18000000000002p+1 -0 + 53 +0 0x10000000000001 -3 +0 53 +0 -0 53 +0 8 0 +2 53 +0 0x18000000000002p+1 + 53 +0 0x10000000000001 3 + +0 53 -inf -0 53 +0 +inf -7 +0 53 +0 -0 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 + +2 53 -inf -0x1c000000000001p+2 + 53 +0x10000000000001 +inf -7 +0 53 +0 -0 53 +0 +inf 0 +1 53 +0x1c000000000001p+2 +inf + 53 +0x10000000000001 +inf 7 + +0 53 -inf -inf 53 +inf +inf -1 +0 53 +0 -0 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 nan nan 53 +inf nan -1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1 + +# regular values +0 53 0x123456789abcdfp-45 0x123456789abcdfp+8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256 +1 53 0x18000000000001p-52 9 + 53 0x10000000000001p-53 3 3 +2 53 -27 0x18000000000002p-52 + 53 -9 0x10000000000001p-53 3 +3 53 -0xa000000000001p-50 0xa000000000001p-50 + 53 -0x10000000000001p-53 0x10000000000001p-53 5 + +0 53 -0x123456789abcdfp+8 -0x123456789abcdfp-45 + 53 0x123456789abcdfp-53 0x123456789abcdf -256 +1 53 -0x18000000000002p-52 27 + 53 -9 0x10000000000001p-53 -3 +2 53 -9 -0x18000000000001p-52 + 53 0x10000000000001p-53 3 -3 +3 53 -0x16c16c16c16c17p+2 0x16c16c16c16c17p+2 + 53 -0x123456789abcdf 0x123456789abcdf -5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_ui.dat new file mode 100644 index 00000000000..7d86fa4a9d3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_ui.dat @@ -0,0 +1,63 @@ +# data file for mpfi_mul_ui +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63 +0 53 +0 -0 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 +0 -0 53 -inf -1 0 +2 53 -inf 0xa000000000001p+3 + 53 -inf 0x10000000000001 5 +0 53 +0 -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 +0 -0 53 -inf 8 0 +0 53 -inf 128 53 -inf 8 16 +0 53 +0 -0 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf +32 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan +64 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 +0 53 +0 -0 53 +0 8 0 +2 53 +0 0x18000000000002p+1 + 53 +0 0x10000000000001 3 +0 53 +0 -0 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 +0 53 +0 -0 53 +0 +inf 0 +1 53 +0x1c000000000001p+2 +inf + 53 +0x10000000000001 +inf 7 +0 53 +0 -0 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1 + +# regular values +0 53 0x123456789abcdfp-45 0x123456789abcdfp+8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256 +1 53 0x18000000000001p-52 9 + 53 0x10000000000001p-53 3 3 +2 53 -27 0x18000000000002p-52 + 53 -9 0x10000000000001p-53 3 +3 53 -0xa000000000001p-50 0xa000000000001p-50 + 53 -0x10000000000001p-53 0x10000000000001p-53 5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/mul_z.dat b/Build/source/libs/mpfi/mpfi-src/tests/mul_z.dat new file mode 100644 index 00000000000..14770676a28 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/mul_z.dat @@ -0,0 +1,99 @@ +# data file for mpfi_mul_z +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan nan 53 nan -inf -3 +0 53 nan nan 53 nan -inf 0 +0 53 nan nan 53 nan -inf 3 +0 53 nan nan 53 nan -7 -7 +0 53 nan nan 53 nan -7 0 +0 53 nan nan 53 nan -7 7 +0 53 nan nan 53 nan -0 -15 +0 53 nan nan 53 nan -0 0 +0 53 nan nan 53 nan -0 15 +0 53 nan nan 53 nan 1 -31 +0 53 nan nan 53 nan 1 0 +0 53 nan nan 53 nan 1 31 +0 53 nan nan 53 nan +inf -63 +0 53 nan nan 53 nan +inf 0 +0 53 nan nan 53 nan +inf 63 +0 53 +inf +inf 53 -inf -inf -2 +0 53 +0 -0 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 + +1 53 -0x14000000000002p+2 +inf + 53 -inf 0x10000000000001 -5 +0 53 +0 -0 53 -inf -1 0 +2 53 -inf 0xa000000000001p+3 + 53 -inf 0x10000000000001 5 + +0 53 +0 +inf 53 -inf -0 -8 +0 53 +0 -0 53 -inf -0 0 +0 53 -inf -0 53 -inf -0 8 +0 53 -128 +inf 53 -inf +8 -16 +0 53 +0 -0 53 -inf +8 0 +0 53 -inf 128 53 -inf +8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 +0 -0 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 nan nan 53 -inf nan -64 +0 53 nan nan 53 -inf nan 0 +0 53 nan nan 53 -inf nan 64 +0 53 +0 -0 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 +0 -0 53 +0 -0 1 + +1 53 -0x18000000000002p+1 -0 + 53 +0 0x10000000000001 -3 +0 53 +0 -0 53 +0 8 0 +2 53 +0 0x18000000000002p+1 + 53 +0 0x10000000000001 3 + +0 53 -inf -0 53 +0 +inf -7 +0 53 +0 -0 53 +0 +inf 0 +0 53 +0 +inf 53 +0 +inf 7 + +2 53 -inf -0x1c000000000001p+2 + 53 +0x10000000000001 +inf -7 +0 53 +0 -0 53 +0 +inf 0 +1 53 +0x1c000000000001p+2 +inf + 53 +0x10000000000001 +inf 7 + +0 53 -inf -inf 53 +inf +inf -1 +0 53 +0 -0 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 nan nan 53 +inf nan -1 +0 53 nan nan 53 +inf nan 0 +0 53 nan nan 53 +inf nan 1 + +# regular values +0 53 0x123456789abcdfp-45 0x123456789abcdfp+8 + 53 0x123456789abcdfp-53 0x123456789abcdf 256 +1 53 0x18000000000001p-52 9 + 53 0x10000000000001p-53 3 3 +2 53 -27 0x18000000000002p-52 + 53 -9 0x10000000000001p-53 3 +3 53 -0xa000000000001p-50 0xa000000000001p-50 + 53 -0x10000000000001p-53 0x10000000000001p-53 5 + +0 53 -0x123456789abcdfp+8 -0x123456789abcdfp-45 + 53 0x123456789abcdfp-53 0x123456789abcdf -256 +1 53 -0x18000000000002p-52 27 + 53 -9 0x10000000000001p-53 -3 +2 53 -9 -0x18000000000001p-52 + 53 0x10000000000001p-53 3 -3 +3 53 -0x16c16c16c16c17p+2 0x16c16c16c16c17p+2 + 53 -0x123456789abcdf 0x123456789abcdf -5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/nan_p.dat b/Build/source/libs/mpfi/mpfi-src/tests/nan_p.dat new file mode 100644 index 00000000000..aa12a8c134a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/nan_p.dat @@ -0,0 +1,41 @@ +# data file for mpfi_nan_p +# +# column fields: +# 1: return value (0: false, +: true) +# 2: precision of argument +# 3: left endpoint value of argument +# 4: right endpoint value of argument +# + +# special values ++ 53 nan -inf ++ 53 nan -8 ++ 53 -8 nan ++ 53 nan -0 ++ 53 +0 nan ++ 53 nan 5 ++ 53 5 nan ++ 53 nan +inf ++ 53 nan nan +0 53 -inf -inf +0 53 -inf -8 +0 53 -inf -0 +0 53 -inf 5 +0 53 -inf +inf ++ 53 -inf nan +0 53 -8 -0 +0 53 +0 -0 +0 53 +0 5 +0 53 +0 +inf +0 53 5 +inf +0 53 +inf +inf ++ 53 +inf nan + +# regular values +0 8 -34 -17 +0 8 -8 -1 +0 8 -34 17 +0 53 -0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 0x1921fb54442d18p-51 0x1921fb54442d19p-51 +0 53 +8 +0x7fffffffffffbp+51 +0 53 +0x1fffffffffffffp-53 2 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/neg.dat b/Build/source/libs/mpfi/mpfi-src/tests/neg.dat new file mode 100644 index 00000000000..15dcc33b032 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/neg.dat @@ -0,0 +1,36 @@ +# data file for mpfi_neg +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 +inf nan 53 nan -inf +0 53 nan +7 53 -7 nan +0 53 +0 nan 53 nan -0 +0 53 nan -0 53 +0 nan +0 53 -1 nan 53 nan +1 +0 53 nan -inf 53 +inf nan +0 53 +inf +inf 53 -inf -inf +0 53 +7 +inf 53 -inf -7 +0 53 +0 +inf 53 -inf -0 +0 53 -8 +inf 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +0 53 +0 -0 53 +0 -0 +0 53 -8 -0 53 +0 +8 +0 53 -inf -0 53 +0 +inf +0 53 -inf -inf 53 +inf +inf + +# regular values +0 53 -0x123456799p-16 -0x123456789p-16 53 0x123456789p-16 0x123456799p-16 +1 12 -0x889p+21 0xaaap-26 53 -0xaaap-26 0x111111111 +2 12 0xaaa 0xaabp+4 53 -0xaaa1 -0xaaa +3 12 0xaaap+4 0xb6d0 53 -0xb6c1 -0xaaa1 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/put_d.dat b/Build/source/libs/mpfi/mpfi-src/tests/put_d.dat new file mode 100644 index 00000000000..91d5e8b019f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/put_d.dat @@ -0,0 +1,67 @@ +# data file for mpfi_put_d +# +# fields: see put_z.dat + +# special values +53 nan nan 0 53 nan nan -inf +53 nan nan 0 53 nan nan -8 +53 nan nan 0 53 nan nan -0 +53 nan nan 0 53 nan nan +0 +53 nan nan 0 53 nan nan +5 +53 nan nan 0 53 nan nan +inf +53 nan nan 0 53 nan nan nan +53 -inf -inf 0 53 -inf -inf -inf +53 -inf -inf 0 53 -inf -8 -8 +53 -inf -inf 0 53 -inf -0 -0 +53 -inf -inf 0 53 -inf -0 +0 +53 -inf -inf 0 53 -inf +5 +5 +53 -inf -inf 0 53 -inf +inf +inf +53 -inf -inf 0 53 nan -inf nan +53 +0 -0 0 53 -inf -0 -inf +53 +0 -0 0 53 -8 -0 -8 +53 +0 -0 0 53 +0 -0 -0 +53 +0 -0 0 53 +0 -0 +0 +53 +0 -0 0 53 +0 +5 +5 +53 +0 -0 0 53 +0 +inf +inf +53 +0 -0 0 53 nan -0 nan +53 +inf +inf 0 53 -inf +inf -inf +53 +inf +inf 0 53 -8 +inf -8 +53 +inf +inf 0 53 +0 +inf -0 +53 +inf +inf 0 53 +0 +inf +0 +53 +inf +inf 0 53 +5 +inf +5 +53 +inf +inf 0 53 +inf +inf +inf +53 +inf +inf 0 53 nan +inf nan + +# regular values + 49 +0x123456789abcdp-17 +0x1fedcba987654p-16 +0 49 +0x1111111111111p-17 +0x1fedcba987654p-16 +0x11111111111110p-21 + 49 +0x123456789abcdp-17 +0x1fedcba987654p-16 +1 49 +0x1111111111111p-17 +0x1fedcba987654p-16 +0x11111111111111p-21 + 49 +0x123456789abcdp-17 +0x1fedcba987654p-16 +0 49 +0x123456789abcdp-17 +0x1fedcba987654p-16 +0x1aaaaaaaaaaaaap-20 + 49 +0x123456789abcdp-17 +0x1fedcba987654p-16 +0 49 +0x123456789abcdp-17 +0x1ffffffffffffp-16 +0x1ffffffffffff0p-20 + 49 +0x123456789abcdp-17 +0x1fedcba987654p-16 +2 49 +0x123456789abcdp-17 +0x1ffffffffffffp-16 +0x1fffffffffffe2p-20 + + 49 -0x1fedcba987654 -0x123456789bcde +0 49 -0x1ffffffffffff -0x123456789bcde -0x1ffffffffffff + 49 -0x1fedcba987654 -0x123546789bcde +1 49 -0x20000000000000 -0x123546789bcde -0x1fffffffffffff + 49 -0x1fedcba987654 -1 +0 49 -0x1fedcba987654 -1 -0x1aaaaaaaaaaaa + 49 -0x123456789abcd -0x1111111111111 +0 49 -0x123456789abcd -1 -1 + 49 -0x123456789abcd -0x1fedcba987654p-19 +2 49 -0x123456789abcd -0x1ffffffffffffp-49 -0x1ffffffffffff2p-53 + + 49 -0x1 +0x1 +0 49 -0x2 +0x1 -0x2 + 49 -0x1 +0x1 +1 49 -0x2 +0x1 -0x1ffffffffffffep-52 + 49 -0x1 +0x1 +0 49 -0x1 +0x1 -0x1ffffffffffffep-53 + 49 -0x1 +0x1 +0 49 -0x1 +0x2 +0x2 + 49 -0x1 +0x1 +2 49 -0x1 +0x2 +0x1ffffffffffffep-52 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/put_fr.dat b/Build/source/libs/mpfi/mpfi-src/tests/put_fr.dat new file mode 100644 index 00000000000..de761bed88b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/put_fr.dat @@ -0,0 +1,77 @@ +# data file for mpfi_put_fr +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 nan nan 53 -inf +53 nan nan 0 53 nan nan 53 -8 +53 nan nan 0 53 nan nan 53 -0 +53 nan nan 0 53 nan nan 53 +0 +53 nan nan 0 53 nan nan 53 +5 +53 nan nan 0 53 nan nan 53 +inf +53 nan nan 0 53 nan nan 53 nan +53 -inf -inf 0 53 -inf -inf 53 -inf +53 -inf -inf 0 53 -inf -8 53 -8 +53 -inf -inf 0 53 -inf -0 53 -0 +53 -inf -inf 0 53 -inf -0 53 +0 +53 -inf -inf 0 53 -inf +5 53 +5 +53 -inf -inf 0 53 -inf +inf 53 +inf +53 -inf -inf 0 53 nan nan 53 nan +53 +0 -0 0 53 -inf -0 53 -inf +53 +0 -0 0 53 -8 -0 53 -8 +53 +0 -0 0 53 +0 -0 53 -0 +53 +0 -0 0 53 +0 -0 53 +0 +53 +0 -0 0 53 +0 +5 53 +5 +53 +0 -0 0 53 +0 +inf 53 +inf +53 +0 -0 0 53 nan nan 53 nan +53 +inf +inf 0 53 -inf +inf 53 -inf +53 +inf +inf 0 53 -8 +inf 53 -8 +53 +inf +inf 0 53 +0 +inf 53 -0 +53 +inf +inf 0 53 +0 +inf 53 +0 +53 +inf +inf 0 53 +5 +inf 53 +5 +53 +inf +inf 0 53 +inf +inf 53 +inf +53 +inf +inf 0 53 nan nan 53 nan + +# regular values + 53 +0x123456789abcdep+17 +0x1fedcba9876543p+19 +0 53 +0x11111111111111p+17 +0x1fedcba9876543p+19 53 +0x11111111111111p+17 + 53 +0x123456789abcdep+17 +0x1fedcba9876543p+19 +1 53 +0x11111111111111p+17 +0x1fedcba9876543p+19 64 +0x11111111111111002p+5 + 53 +0x123456789abcdep+17 +0x1fedcba9876543p+19 +0 53 +0x123456789abcdep+17 +0x1fedcba9876543p+19 53 +0x1aaaaaaaaaaaaap+17 + 53 +0x123456789abcdep+17 +0x1fedcba9876543p+19 +0 53 +0x123456789abcdep+17 +0x1fffffffffffffp+19 53 +0x1fffffffffffffp+19 + 53 +0x123456789abcdep+17 +0x1fedcba9876543p+19 +2 53 +0x123456789abcdep+17 +0x1fffffffffffffp+19 64 +0x1ffffffffffffe002p+7 + 53 -0x1fedcba9876543 -0x123456789abcde +0 53 -0x1fffffffffffff -0x123456789abcde 53 -0x1fffffffffffff + 53 -0x1fedcba9876543 -0x123546789abcde +1 53 -0x1p+65 -0x123546789abcde 64 -0x1fffffffffffff002 + 53 -0x1fedcba9876543 -1 +0 53 -0x1fedcba9876543 -1 53 -0xaaaaaaaaaaaaa + 53 -0x123456789abcde -0x11111111111111 +0 53 -0x123456789abcde -1 53 -1 + 53 -0x123456789abcde -0x1fedcba9876543p-19 +2 53 -0x123456789abcde -0x1fffffffffffffp-53 64 -0xffffffffffffffffp-64 + + 53 -0x1 +0x1 +0 53 -0x2 +0x1 53 -0x2 + 53 -0x1 +0x1 +1 53 -0x2 +0x1 64 -0x1fffffffffffffffep-64 + 53 -0x1 +0x1 +0 53 -0x1 +0x1 64 -0x1fffffffffffffffep-65 + 53 -0x1 +0x1 +0 53 -0x1 +0x2 53 +0x2 + 53 -0x1 +0x1 +2 53 -0x1 +0x2 64 +0x1fffffffffffffffep-64 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/put_q.dat b/Build/source/libs/mpfi/mpfi-src/tests/put_q.dat new file mode 100644 index 00000000000..3cf792add32 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/put_q.dat @@ -0,0 +1,66 @@ +# data file for mpfi_put_q +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 nan nan -8/2 +53 nan nan 0 53 nan nan -0/2 +53 nan nan 0 53 nan nan 0/2 +53 nan nan 0 53 nan nan 5/2 +53 -inf -inf 0 53 -inf -8 -8/1 +53 -inf -inf 0 53 -inf -0 -0/1 +53 -inf -inf 0 53 -inf -0 0/1 +53 -inf -inf 0 53 -inf +5 5/1 +53 +0 -0 0 53 -8 -0 -8/1 +53 +0 -0 0 53 +0 -0 -0/1 +53 +0 -0 0 53 +0 -0 0/1 +53 +0 -0 0 53 +0 +5 5/1 +53 +inf +inf 0 53 -8 +inf -8/1 +53 +inf +inf 0 53 +0 +inf -0/1 +53 +inf +inf 0 53 +0 +inf 0/1 +53 +inf +inf 0 53 +5 +inf 5/1 + +# regular values + 53 +1 +2 +0 53 +0.5 +2 1/2 + 53 +1 +2 +1 53 +0x15555555555555p-54 +2 1/3 + 53 +1 +2 +0 53 +1 +2 3/2 + 53 +1 +2 +0 53 +1 +2.5 5/2 + 53 +1 +2 +2 53 +1 +0x12aaaaaaaaaaabp-51 7/3 + + 53 -2 -1 +0 53 -4 -1 -8/2 + 53 -2 -1 +1 53 -0x15555555555556p-51 -1 -8/3 + 53 -4 -1 +0 53 -4 -1 -6/2 + 53 -4 -3 +0 53 -4 -2 -2/1 + 53 -4 -2 +2 53 -4 -0x15555555555555p-54 -1/3 + + 53 -0x1 +0x1 +0 53 -0x2 +0x1 -2/1 + 53 -0x1 +0x1 +1 53 -0x15555555555556p-52 +0x1 -4/3 + 53 -0x1 +0x1 +0 53 -0x1 +0x1 -1/2 + 53 -0x1 +0x1 +0 53 -0x1 +2.5 5/2 + 53 -0x1 +0x1 +2 53 -0x1 +0x1aaaaaaaaaaaabp-52 5/3 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/put_si.dat b/Build/source/libs/mpfi/mpfi-src/tests/put_si.dat new file mode 100644 index 00000000000..359556a8cf3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/put_si.dat @@ -0,0 +1,51 @@ +# data file for mpfi_put_ui +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 nan nan -8 +53 nan nan 0 53 nan nan -0 +53 nan nan 0 53 nan nan 0 +53 nan nan 0 53 nan nan 5 +53 -inf -inf 0 53 -inf -8 -8 +53 -inf -inf 0 53 -inf -0 -0 +53 -inf -inf 0 53 -inf -0 0 +53 -inf -inf 0 53 -inf +5 5 +53 +0 -0 0 53 -8 -0 -8 +53 +0 -0 0 53 +0 -0 -0 +53 +0 -0 0 53 +0 -0 0 +53 +0 -0 0 53 +0 +5 5 +53 +inf +inf 0 53 -8 +inf -8 +53 +inf +inf 0 53 +0 +inf -0 +53 +inf +inf 0 53 +0 +inf 0 +53 +inf +inf 0 53 +5 +inf 5 + +# regular values +53 +10 +20 0 53 +5 +20 5 +16 +0x123400 0xdada00 1 16 +0x111100 0xdada00 0x111101 +53 +10 +20 0 53 +10 +20 15 +16 +0x123400 0xdada00 0 16 +0x123400 0xdddd00 0xdddd00 +16 +0x123400 0xdada00 2 16 +0x123400 0xdadb00 0xdadada + +53 -0x888888 -0x888887 0 53 -0xbaffe0 -0x888887 -0xbaffe0 +16 -0x888800 -0x888700 1 16 -0x888900 -0x888700 -0x888801 +53 -0x888800 -0x888700 0 53 -0x888800 -0x888700 -0x888701 +16 -0x888800 -0x888700 0 16 -0x888800 -0x100000 -0x100000 +16 -0x888800 -0x888700 2 16 -0x888800 -0x100000 -0x100001 + +16 -0x888800 +0x1 0 16 -0xfedc00 +0x1 -0xfedc00 +16 -0x888800 +0x1 1 16 -0xfedc00 +0x1 -0xfedb01 +16 -0x888800 +0x1 0 16 -0x888800 +0x1 -1 +16 -0x888800 +0x1 0 16 -0x888800 +0x888800 0x888800 +16 -0x888800 +0x1 2 16 -0x888800 +0x888900 0x888801 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/put_ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/put_ui.dat new file mode 100644 index 00000000000..5f7a27ff5bd --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/put_ui.dat @@ -0,0 +1,44 @@ +# data file for mpfi_put_ui +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 nan nan +0 +53 nan nan 0 53 nan nan +5 +53 nan +inf 0 53 nan +inf +0 +53 nan -inf 0 53 nan -inf +5 +53 -inf -inf 0 53 -inf -0 +0 +53 -inf -0 0 53 -inf +5 +5 +53 -inf -1 0 53 -inf -0 +0 +53 -inf +inf 0 53 -inf +inf +5 +53 +0 -0 0 53 +0 -0 +0 +53 +0 -0 0 53 +0 +5 +5 +53 +0 +inf 0 53 +0 +inf +5 +53 +5 +inf 0 53 +0 +inf +0 +53 +inf +inf 0 53 +0 +inf +0 +53 +inf +inf 0 53 +5 +inf +5 + +# regular values +53 +10 +20 0 53 +5 +20 5 +16 +0x123400 0xdada00 1 16 +0x111100 +0xdada00 0x111101 +53 +10 +20 0 53 +10 +20 15 +16 +0x123400 0xdada00 0 16 +0x123400 +0xdddd00 0xdddd00 +16 +0x123400 0xdada00 2 16 +0x123400 +0xdadb00 0xdadada + +53 -0x888888 -0x888887 0 53 -0x888888 +0xbaffe0 0xbaffe0 +16 -0x888800 -0x888700 2 16 -0x888800 +0x888900 0x888801 + +16 -0x888800 +0x1 0 16 -0x888800 +0xfedc00 0xfedc00 +16 -0x888800 +0x10 0 16 -0x888800 +0x10 0x8 +16 -0x888800 +0x1 2 16 -0x888800 +0x888900 0x888801 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/put_z.dat b/Build/source/libs/mpfi/mpfi-src/tests/put_z.dat new file mode 100644 index 00000000000..68e2481bddb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/put_z.dat @@ -0,0 +1,51 @@ +# data file for mpfi_put_z +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 nan nan -8 +53 nan nan 0 53 nan nan -0 +53 nan nan 0 53 nan nan 0 +53 nan nan 0 53 nan nan 5 +53 -inf -inf 0 53 -inf -8 -8 +53 -inf -inf 0 53 -inf -0 -0 +53 -inf -inf 0 53 -inf -0 0 +53 -inf -inf 0 53 -inf +5 5 +53 +0 -0 0 53 -8 -0 -8 +53 +0 -0 0 53 +0 -0 -0 +53 +0 -0 0 53 +0 -0 0 +53 +0 -0 0 53 +0 +5 5 +53 +inf +inf 0 53 -8 +inf -8 +53 +inf +inf 0 53 +0 +inf -0 +53 +inf +inf 0 53 +0 +inf 0 +53 +inf +inf 0 53 +5 +inf 5 + +# regular values +53 +10 +20 0 53 +5 +20 5 +16 +0x123400 0xdada00 1 16 +0x111100 0xdada00 0x111101 +53 +10 +20 0 53 +10 +20 15 +16 +0x123400 0xdada00 0 16 +0x123400 0xdddd00 0xdddd00 +16 +0x123400 0xdada00 2 16 +0x123400 0xdadb00 0xdadada + +53 -0x888888 -0x888887 0 53 -0xbaffe0 -0x888887 -0xbaffe0 +16 -0x888800 -0x888700 1 16 -0x888900 -0x888700 -0x888801 +53 -0x888800 -0x888700 0 53 -0x888800 -0x888700 -0x888701 +16 -0x888800 -0x888700 0 16 -0x888800 -0x100000 -0x100000 +16 -0x888800 -0x888700 2 16 -0x888800 -0x100000 -0x100001 + +16 -0x888800 +0x1 0 16 -0xfedc00 +0x1 -0xfedc00 +16 -0x888800 +0x1 1 16 -0xfedc00 +0x1 -0xfedb01 +16 -0x888800 +0x1 0 16 -0x888800 +0x1 -1 +16 -0x888800 +0x1 0 16 -0x888800 +0x888800 0x888800 +16 -0x888800 +0x1 2 16 -0x888800 +0x888900 0x888801 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/q_div.dat b/Build/source/libs/mpfi/mpfi-src/tests/q_div.dat new file mode 100644 index 00000000000..51ca998caa5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/q_div.dat @@ -0,0 +1,130 @@ +#file for mpfi_q_div.dat +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan -1/1 53 nan nan +0 53 nan nan 0 53 nan nan +0 53 nan nan 1/1 53 nan nan +0 53 nan nan -3/1 53 nan -inf +0 53 nan nan 0 53 nan -inf +0 53 nan nan 3/1 53 nan -inf +0 53 nan nan -7/1 53 nan -7 +0 53 nan nan 0 53 nan -7 +0 53 nan nan 7/1 53 nan -7 +0 53 nan nan -15/1 53 nan -0 +0 53 nan nan 0 53 nan -0 +0 53 nan nan 15/1 53 nan -0 +0 53 nan nan -31/1 53 nan 1 +0 53 nan nan 0 53 nan 1 +0 53 nan nan 31/1 53 nan 1 +0 53 nan nan -63/1 53 nan +inf +0 53 nan nan 0 53 nan +inf +0 53 nan nan 63/1 53 nan +inf +0 53 +0 -0 -2/1 53 -inf -inf +0 53 +0 -0 0 53 -inf -inf +0 53 +0 -0 2/1 53 -inf -inf +0 53 +0 0.5 -4/1 53 -inf -8 +0 53 +0 -0 0 53 -inf -7 +0 53 -0.5 -0 4/1 53 -inf -8 + +2 53 +0 0x12492492492493p-58 + -1/7 + 53 -inf -8 +1 53 -0x12492492492493p-58 -0 + 1/7 + 53 -inf -8 +2 53 +0 0x12492492492493p-58 + -1/8 + 53 -inf -7 +1 53 -0x12492492492493p-58 -0 + 1/8 + 53 -inf -7 + +0 53 +0 +inf -8/1 53 -inf -0 +0 53 +0 -0 0 53 -inf -0 +0 53 -inf -0 8/1 53 -inf -0 +0 53 -inf +inf -16/1 53 -inf 8 +0 53 -inf +inf 0 53 -inf 8 +0 53 -inf +inf 16/1 53 -inf 8 +0 53 -inf +inf -32/1 53 -inf +inf +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf 32/1 53 -inf +inf +0 53 nan nan -64/1 53 -inf nan +0 53 nan nan 0 53 -inf nan +0 53 nan nan 64/1 53 -inf nan +0 53 -inf +inf -1/1 53 +0 -0 +0 53 +0 -0 0 53 +0 -0 +0 53 -inf +inf 1/1 53 +0 -0 +0 53 -inf -3 -9/1 53 +0 3 +0 53 +0 -0 0 53 +0 3 +0 53 3 +inf 9/1 53 +0 3 +2 53 -inf -0x1c71c71c71c71cp-58 + -1/9 + 53 +0 4 +1 53 0x1c71c71c71c71cp-58 +inf + 1/9 + 53 +0 4 +2 53 -inf -0x1c71c71c71c71cp-58 + -1/4 + 53 0 9 +1 53 0x1c71c71c71c71cp-58 +inf + 1/4 + 53 +0 9 + +0 53 -inf -0 -7/1 53 +0 +inf +0 53 +0 -0 0 53 +0 +inf +0 53 +0 +inf 7/1 53 +0 +inf +0 53 +0 -0 -1/1 53 +inf +inf +0 53 +0 -0 0 53 +inf +inf +0 53 +0 -0 1/1 53 +inf +inf +0 53 nan nan -1/1 53 +inf nan +0 53 nan nan 0 53 +inf nan +0 53 nan nan 1/1 53 +inf nan + +# regular values +0 53 0x1p-48 1 + -3/32 + 53 -0x3p+43 -0x3p-5 +1 53 0x13333333333333p-54 3 + -3/32 + 53 -0x5p-4 -0x1p-5 +2 53 0x1p-48 0x6db6db6db6db7p-14 + -3/32 + 53 -0x3p+43 -0x7p-43 +3 53 0x1b6db6db6db6dbp-59 0x4cccccccccccdp-56 + -3/32 + 53 -7 -5 + +0 53 -inf +inf + -3/32 + 53 -7 +5 + +0 53 0.5 1 + 5/8796093022208 + 53 0x5p-43 0x5p-42 +1 53 0xb6db6db6db6dbp-52 1 + 5/8796093022208 + 53 0x5p-43 0x7p-43 +2 53 1 0x1aaaaaaaaaaaabp-52 + 5/8796093022208 + 53 0x3p-43 0x5p-43 +3 53 0xb6db6db6db6dbp-52 0x1aaaaaaaaaaaabp-52 + 5/8796093022208 + 53 0x3p-43 0x7p-43 + +3 53 0xfffffffffffffp-52 0x10000000000001p-52 + 1/3 + 53 0x15555555555555p-54 0xaaaaaaaaaaaabp-53 +3 4 0xfp-4 0x9p-3 + 1165/16384 + 53 0x1234p-16 0x1234p-16 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/q_sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/q_sub.dat new file mode 100644 index 00000000000..46b3230b72a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/q_sub.dat @@ -0,0 +1,129 @@ +# data file for mpfi_q_sub +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan -1/1 53 nan nan +0 53 nan nan 0 53 nan nan +0 53 nan nan 1/1 53 nan nan +0 53 +inf nan -3/1 53 nan -inf +0 53 +inf nan 0 53 nan -inf +0 53 +inf nan 3/1 53 nan -inf +0 53 +0 nan -7/1 53 nan -7 +0 53 7 nan 0 53 nan -7 +0 53 14 nan 7/1 53 nan -7 +0 53 -15 nan -15/1 53 nan -0 +0 53 +0 nan 0 53 nan -0 +0 53 15 nan 15/1 53 nan -0 +0 53 -32 nan -31/1 53 nan 1 +0 53 -1 nan 0 53 nan 1 +0 53 30 nan 31/1 53 nan 1 +0 53 -inf nan -63/1 53 nan +inf +0 53 -inf nan 0 53 nan +inf +0 53 -inf nan 63/1 53 nan +inf +0 53 +inf +inf -2/1 53 -inf -inf +0 53 +inf +inf 0 53 -inf -inf +0 53 +inf +inf 2/1 53 -inf -inf +0 53 3 +inf -4/1 53 -inf -7 +0 53 7 +inf 0 53 -inf -7 +0 53 11 +inf 4/1 53 -inf -7 + +1 53 0x1b6db6db6db6dbp-50 +inf + -1/7 + 53 -inf -7 +1 53 0x1c924924924924p-50 +inf + 1/7 + 53 -inf -7 +1 53 0x1fffffffffffffp+17 +inf + -7/1 + 53 -inf -0x1p+70 +1 53 0x1p+70 +inf + 7/1 + 53 -inf -0x1p+70 + +0 53 -8 +inf -8/1 53 -inf -0 +0 53 +0 +inf 0 53 -inf -0 +0 53 8 +inf 8/1 53 -inf -0 +0 53 -24 +inf -16/1 53 -inf 8 +0 53 -8 +inf 0 53 -inf 8 +0 53 8 +inf 16/1 53 -inf 8 +0 53 -inf +inf -32/1 53 -inf +inf +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf 32/1 53 -inf +inf +0 53 nan +inf -64/1 53 -inf nan +0 53 nan +inf 0 53 -inf nan +0 53 nan +inf 64/1 53 -inf nan +0 53 -1 -1 -1/1 53 +0 -0 +0 53 +0 -0 0 53 +0 -0 +0 53 1 1 1/1 53 +0 -0 +0 53 -11 -3 -3/1 53 +0 8 +0 53 -8 -0 0 53 +0 8 +0 53 -5 3 3/1 53 +0 8 +0 53 -inf -7 -7/1 53 +0 +inf +0 53 -inf -0 0 53 +0 +inf +0 53 -inf +7 7/1 53 +0 +inf + +2 53 -inf -0x12492492492492p-55 + -1/7 + 53 +0 +inf +2 53 -inf 0x12492492492493p-55 + 1/7 + 53 +0 +inf +2 53 -inf -0x1p+70 + -7/1 + 53 0x1p+70 +inf +2 53 -inf -0x1fffffffffffffp+17 + 7/1 + 53 0x1p+70 +inf + +0 53 -inf -inf -1/1 53 +inf +inf +0 53 -inf -inf 0 53 +inf +inf +0 53 -inf -inf 1/1 53 +inf +inf +0 53 nan -inf -1/1 53 +inf nan +0 53 nan -inf 0 53 +inf nan +0 53 nan -inf 1/1 53 +inf nan + +# regular values +0 53 -15 -0 -32/1 53 -32 -17 +0 53 49 64 32/1 53 -32 -17 +0 53 34 49 17/1 53 -32 -17 + +0 53 -0x123456789abce2 -0x153456789abcdfp-48 + -3/1 + 53 0x123456789abcdfp-48 0x123456789abcdf +1 53 -0x10123456789abdp-44 -1 + -256/1 + 53 -0xff 0x123456789abcdfp-52 +2 53 -0x123456789abce2 -0x3123456789abcdp-52 + -3/1 + 53 0x123456789abcdfp-56 0x123456789abcdf +3 53 -0x1001 -0xfff + -0x1001/1 + 53 -0x1fffffffffffffp-52 -0x1p-550 + +0 53 -0x123456789abcdc -0xf3456789abcdfp-48 + 3/1 + 53 0x123456789abcdfp-48 0x123456789abcdf +1 53 0xfedcba9876543p-44 0x1ff + 256/1 + 53 -0xff 0x123456789abcdfp-52 +2 53 -0x123456789abcdc 0x2edcba98765433p-52 + 3/1 + 53 0x123456789abcdfp-56 0x123456789abcdf +3 53 0x1001 0x1003 + 0x1001/1 + 53 -0x1fffffffffffffp-52 -0x1p-550 + +# check if a double rounding occurs +3 4 -16 -0.3125 -97/3 53 -32 -17 +3 4 -0.34375 15 -52/3 53 -32 -17 +0 4 1 15 -17/1 53 -32 -18 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/random.c b/Build/source/libs/mpfi/mpfi-src/tests/random.c new file mode 100644 index 00000000000..5ab17bdf752 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/random.c @@ -0,0 +1,215 @@ +/* random.c -- Handle random seed in tests. + +Copyright (C) 2009, 2010, + Spaces project, Inria Lorraine + Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library, based on the MPFR Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Library General Public License as published by +the Free Software Foundation; either version 2 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public +License for more details. + +You should have received a copy of the GNU Library General Public License +along with the MPFR Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +/* Put test_start at the beginning of your test function and + test_end at the end. + These are an adaptation of those of MPFR. */ + +#include "mpfi-tests.h" + +#ifdef TIME_WITH_SYS_TIME +# include +# include +#else +# ifdef HAVE_SYS_TIME_H +# include +# else +# include +# endif +#endif + +#ifdef HAVE_LIMITS_H +#include +#endif +#ifndef ULONG_MAX +# define ULONG_MAX 4294967295 +#endif + +#ifdef HAVE_FLOAT_H +#include +#endif +#ifndef DBL_MANT_DIG +# define DBL_MANT_DIG 53 +#endif +#ifndef DBL_MAX_EXP +# define DBL_MAX_EXP +1024 +#endif + +gmp_randstate_t rands; +char rands_initialized; + +void +test_start (void) +{ + char *environment_seed; + unsigned long seed; + + if (rands_initialized) { + printf ("Put test_start ONCE at the beginning of your test function.\n"); + exit (1); + } + + gmp_randinit_default (rands); + rands_initialized = 1; + + environment_seed = getenv ("MPFI_CHECK_RANDOMIZE"); + if (environment_seed == NULL) + gmp_randseed_ui (rands, 0xfac11e); + else { + seed = atoi (environment_seed); + if (seed == 0 || seed == 1) { +#if HAVE_GETTIMEOFDAY + struct timeval tv; + gettimeofday (&tv, NULL); + seed = tv.tv_sec + tv.tv_usec; +#else + time_t tv; + time (&tv); + seed = tv; +#endif + gmp_randseed_ui (rands, seed); + printf ("Seed MPFI_CHECK_RANDOMIZE=%lu " + "(include this in bug reports)\n", seed); + } + else { + printf ("Re-seeding with MPFI_CHECK_RANDOMIZE=%lu\n", seed); + gmp_randseed_ui (rands, seed); + } + } +} + +void +test_end (void) +{ + if (rands_initialized) { + rands_initialized = 0; + gmp_randclear (rands); + } + else { + printf ("Put test_start at the beginning of your test function.\n"); + exit (1); + } + + mpfr_free_cache (); +} + +unsigned long +random_ui () +{ + return gmp_urandomm_ui (rands, ULONG_MAX); +} + +long +random_si () +{ + return (long)gmp_urandomm_ui (rands, ULONG_MAX); +} + +double +random_double () +{ + double d; + mpfr_t x; + + mpfr_init2 (x, DBL_MANT_DIG + 1); + mpfr_urandomb (x, rands); + mpfr_sub_d (x, x, 0.5, MPFI_RNDD); + mpfr_mul_2ui (x, x, DBL_MAX_EXP + 1, MPFI_RNDD); + d = mpfr_get_d (x, MPFI_RNDD); + mpfr_clear (x); + + return d; +} + +void +random_mpz (mpz_ptr z, unsigned long n) +{ + return mpz_urandomb (z, rands, n); +} + +void +random_mpq (mpq_ptr q) +{ + mpq_set_si (q, random_si (), random_ui ()); +} + +/* random endpoint with non-uniform distribution: + Prob(x == -oo) = 1/8 + Prob(-oo < x < -1) = 1/4 + Prob(-1 < x < 0) = 1/8 + Prob(0 < x < +1) = 1/8 + Prob(+1 < x < +oo) = 1/4 + Prob(x == +oo) = 1/8 + */ +void +random_mpfr (mpfr_ptr x) +{ + unsigned long r; + + r = gmp_urandomb_ui (rands, 3); + if (r < 1) { + mpfr_set_inf (x, +1); + return; + } + if (r < 2) { + mpfr_set_inf (x, -1); + return; + } + mpfr_urandomb (x, rands); + if (r < 3) + return; + if (r < 4) { + mpfr_neg (x, x, MPFI_RNDD); + return; + } + mpfr_ui_div (x, 1, x, MPFI_RNDD); + if (r < 6) + return; + mpfr_neg (x, x, MPFI_RNDD); +} + +/* random interval with non-uniform distribution: + Prob(inf == -oo) = Prob(sup == +oo) = 1/8 + 7/64 + Prob(-oo < inf < -1) = Prob(+1 < sup < +oo) = 3/8 + Prob(-1 < inf < 0) = Prob(0 < sup < +1) = 1/16 + 5/64 + Prob(0 < inf < +1) = Prob(-1 < sup < 0) = 1/16 + 3/64 + Prob(+1 < inf < +oo) = Prob(-oo < sup < -1) = 1/8 + Prob(inf == +oo) = Prob(sup == -oo) = 1/64 + where inf = left endpoint, sup = right endpoint + */ +void +random_interval (mpfi_ptr i) +{ + mpfr_t x; + + mpfr_init2 (x, mpfi_get_prec (i)); + + random_mpfr (x); + mpfi_set_fr (i, x); + random_mpfr (x); + mpfi_put_fr (i, x); + + mpfr_clear (x); +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/read_data.c b/Build/source/libs/mpfi/mpfi-src/tests/read_data.c new file mode 100644 index 00000000000..b663c2af9fc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/read_data.c @@ -0,0 +1,570 @@ +/* read_data.c -- Helper functions to read data files. + +Copyright 2009, 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include +#include "mpfi-tests.h" + +char *pathname; +unsigned long line_number; /* file name with complete path and currently read + line; kept globally to simplify parameter + passing */ +int nextchar; /* character appearing next in the file, may be EOF */ + +FILE* +open_file (const char* file_name) +{ + FILE *fp; + char *src_dir; + char default_srcdir[] = "."; + + src_dir = getenv ("srcdir"); + if (src_dir == NULL) + src_dir = default_srcdir; + + pathname = (char *) malloc ((strlen (src_dir)) + strlen (file_name) + 2); + if (pathname == NULL) { + printf ("Cannot allocate memory\n"); + exit (1); + } + sprintf (pathname, "%s/%s", src_dir, file_name); + fp = fopen (pathname, "r"); + if (fp == NULL) { + fprintf (stderr, "Unable to open %s\n", pathname); + exit (1); + } + + return fp; +} + +void +close_file (FILE *f) +{ + free (pathname); + fclose (f); +} + +void +init_reading (FILE* f) +{ + line_number = 1; + nextchar = getc (f); + skip_whitespace_comments (f); +} + +/* comparisons: return true when arguments have the same value (even if both + are NaN) */ +int +same_mpfr_value (mpfr_srcptr got, mpfr_srcptr ref) +{ + if (mpfr_nan_p (got) || mpfr_nan_p (ref)) + return mpfr_nan_p (ref) && mpfr_nan_p (got); + if (mpfr_inf_p (got)) + return mpfr_inf_p (ref) && mpfr_signbit (got) == mpfr_signbit (ref); + if (mpfr_zero_p (got)) + return mpfr_zero_p (ref) && mpfr_signbit (got) == mpfr_signbit (ref); + return mpfr_cmp (got, ref) == 0; +} + +int +same_value (mpfi_srcptr a, mpfi_srcptr b) +{ + return same_mpfr_value (&(a->left), &(b->left)) + && same_mpfr_value (&(a->right), &(b->right)); +} + + +/* read primitives */ + +/* skips characters until reaching '\n' or EOF; + '\n' is skipped as well */ +static void +skip_line (FILE *f) +{ + while (nextchar != EOF && nextchar != '\n') + nextchar = getc (f); + if (nextchar != EOF) { + line_number++; + nextchar = getc (f); + } +} + +/* skips over whitespace if any until reaching EOF or non-whitespace */ +static void +skip_whitespace (FILE *f) +{ + while (isspace (nextchar)) { + if (nextchar == '\n') + line_number++; + nextchar = getc (f); + } +} + +/* skips over all whitespace and comments, if any */ +void +skip_whitespace_comments (FILE *f) +{ + skip_whitespace (f); + while (nextchar == '#') { + skip_line (f); + if (nextchar != EOF) + skip_whitespace (f); + } +} + + +/* Read operand in file, and sometimes check its validity */ + +void +read_sign (FILE *f, int *sign) +{ + switch (nextchar) { + case '-': + *sign = -1; + break; + case '0': + *sign = 0; + break; + case '+': + *sign = +1; + break; + default: + printf ("Error: unexpected signedness '%c' in file '%s' line %lu\n", + nextchar, pathname, line_number); + exit (1); + } + + nextchar = getc (f); + if (!isspace(nextchar)) { + printf ("Error: unexpected character '%c' after exactness flag" + " in file '%s' line %lu\n", nextchar, pathname, line_number); + exit (1); + } + + skip_whitespace_comments (f); +} + +void +read_exactness (FILE *f, int *exactness) +{ + if (!isdigit (nextchar) || nextchar < '0' || nextchar > '4') { + printf ("Error: unexpected exactness flag '%c' in file '%s' line %lu\n", + nextchar, pathname, line_number); + exit (1); + } + + *exactness = nextchar - '0'; + nextchar = getc (f); + if (!isspace(nextchar)) { + printf ("Error: unexpected character '%c' after exactness flag" + " in file '%s' line %lu\n", nextchar, pathname, line_number); + exit (1); + } + + skip_whitespace_comments (f); +} + +void +read_ui (FILE *f, unsigned long *i) +{ + mpfr_t x; + + mpfr_init2 (x, 32); + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading integer " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read integer in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + + if (mpfr_fits_ulong_p (x, MPFI_RNDD)) + *i = mpfr_get_ui (x, MPFI_RNDD); + else { + printf ("Error: the number "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf (" read in file '%s' line %lu does not fit " + "in an unsigned long int\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); +} + +/* problem with uintmax on some archi +void +read_uj (FILE *f, uintmax_t *i) +{ + mpfr_t x; +*/ + + /* unknown constant... + mpfr_init2 (x, INTMAX_WIDTH); + */ +/* + mpfr_init2 (x, sizeof(uintmax_t)); + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading integer " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read integer in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + + if (mpfr_fits_uintmax_p (x, MPFI_RNDD)) + *i = mpfr_get_uj (x, MPFI_RNDD); + else { + printf ("Error: the number "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf (" read in file '%s' line %lu does not fit " + "in an unsigned long int\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); +} +*/ + +void +read_si (FILE *f, long *i) +{ + mpfr_t x; + + mpfr_init2 (x, 32); + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading integer " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read integer in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + if (mpfr_fits_slong_p (x, MPFI_RNDD)) + *i = mpfr_get_si (x, MPFI_RNDD); + else { + printf ("Error: the number "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf (" read in file '%s' line %lu does not fit in a long int\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); +} + +/* problem with intmax on some archi +void +read_sj (FILE *f, intmax_t *i) +{ + mpfr_t x; +*/ + /* unknown constant... + mpfr_init2 (x, INTMAX_WIDTH); + */ +/* + mpfr_init2 (x, sizeof(intmax_t)); + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading integer " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read integer in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + if (mpfr_fits_intmax_p (x, MPFI_RNDD)) + *i = mpfr_get_sj (x, MPFI_RNDD); + else { + printf ("Error: the number "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf (" read in file '%s' line %lu does not fit in a huge int\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); +} +*/ +/* WARNING: when reading a double value, all roundings are towards + minus infinity and the precision depends on the host system. */ +int +read_double (FILE *f, double *d) +{ + int ret; + mpfr_t x; + +#if defined(DBL_MANT_DIG) && DBL_MANT_DIG > 53 + mpfr_init2 (x, DBL_MANT_DIG); +#else + mpfr_init2 (x, 53); +#endif + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading double" + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read double in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + *d = mpfr_get_d (x, MPFI_RNDD); + ret = mpfr_cmp_d (x, *d); /* verify conversion */ + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); + + return ret; +} + +int +read_float (FILE *f, float *d) +{ + int ret; + mpfr_t x; + +#if defined(FLT_MANT_DIG) && FLT_MANT_DIG > 24 + mpfr_init2 (x, FLT_MANT_DIG); +#else + mpfr_init2 (x, 24); +#endif + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading float" + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read float in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + *d = mpfr_get_flt (x, MPFI_RNDD); + ret = mpfr_cmp_d (x, *d); /* verify conversion */ + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); + + return ret; +} + +int +read_long_double (FILE *f, long double *d) +{ + int ret; + mpfr_t x; + +#if defined(LDBL_MANT_DIG) && LDBL_MANT_DIG > 64 + mpfr_init2 (x, LDBL_MANT_DIG); +#else + mpfr_init2 (x, 64); +#endif + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading long double" + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFI_RNDD) == 0) { + printf ("Error: Impossible to read long double in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + *d = mpfr_get_ld (x, MPFI_RNDD); + ret = mpfr_cmp_ld (x, *d); /* verify conversion */ + + nextchar = getc (f); + skip_whitespace_comments (f); + + mpfr_clear (x); + + return ret; +} + +void +read_mpz (FILE *f, mpz_ptr x) +{ + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading mpz number" + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpz_inp_str (x, f, 0) == 0) { + printf ("Error: Impossible to read mpz number " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); +} + +void +read_mpq (FILE *f, mpq_ptr x) +{ + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading mpq number" + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpq_inp_str (x, f, 0) == 0) { + printf ("Error: Impossible to read mpq number " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); +} + +static mpfr_prec_t +read_prec (FILE *f) +{ + unsigned long prec; + int n; + + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading mpfr precision " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + n = fscanf (f, "%lu", &prec); + if (ferror (f)) /* then also n == EOF */ + perror ("Error when reading precision"); + if (n == 0 || n == EOF || prec < MPFR_PREC_MIN || prec > MPFR_PREC_MAX) { + printf ("Error: Impossible precision in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + nextchar = getc (f); + skip_whitespace_comments (f); + return (mpfr_prec_t) prec; +} + +static void +read_mpfr_number (FILE *f, mpfr_ptr x) +{ + if (nextchar == EOF) { + printf ("Error: Unexpected EOF when reading mpfr number" + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + ungetc (nextchar, f); + if (mpfr_inp_str (x, f, 0, MPFR_RNDN) == 0) { + printf ("Error: Impossible to read mpfr number " + "in file '%s' line %lu\n", + pathname, line_number); + exit (1); + } + + nextchar = getc (f); + skip_whitespace_comments (f); +} + +void +read_mpfr (FILE *f, mpfr_ptr x) +{ + mpfr_set_prec (x, read_prec (f)); + read_mpfr_number (f, x); +} + +void +read_mpfi (FILE *f, mpfi_ptr a) +{ + mpfi_set_prec (a, read_prec (f)); + read_mpfr_number (f, &(a->left)); + read_mpfr_number (f, &(a->right)); + +#ifdef WARN_IF_REVERTED_ENDPOINTS + if (mpfr_cmp (&(a->left), &(a->right)) > 0) + printf ("Warning: reverted endpoints line %lu\n", line_number); + if (mpfr_zero_p (&(a->left)) && mpfr_signbit (&(a->left))) + printf ("Warning: -0 as lower bound line %lu\n", line_number); + if (mpfr_zero_p (&(a->right)) && !mpfr_signbit (&(a->right))) + printf ("Warning: +0 in upper bound line %lu\n", line_number); +#endif +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/rec_sqrt.dat b/Build/source/libs/mpfi/mpfi-src/tests/rec_sqrt.dat new file mode 100644 index 00000000000..fb7e69e309e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/rec_sqrt.dat @@ -0,0 +1,31 @@ +# data file for mpfi_rec_sqrt +# +# column fields: see neg.dat + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 -inf nan 53 nan -0 +0 53 nan +inf 53 +0 nan +0 53 +1 nan 53 nan +1 +0 53 nan +0 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -0 53 -inf -0 +0 53 nan -0 53 -inf -0 +0 53 nan +3 53 -inf +9 +0 53 nan +inf 53 -inf +inf +0 53 +inf +inf 53 +0 -0 +0 53 +0.25 +inf 53 +0 +16 +0 53 +0 +inf 53 +0 +inf +0 53 +0 +0.25 53 +16 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 +0.25 +0.5 + 53 +4 +16 +1 53 +0.5 +0xb.504f333f9de68p-1 + 53 +2 +4 +2 53 +0x9.3cd3a2c8198ep-1 +0xb.504f333f9de68p-1 + 53 +2 +3 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sec.dat b/Build/source/libs/mpfi/mpfi-src/tests/sec.dat new file mode 100644 index 00000000000..84bd13d291c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sec.dat @@ -0,0 +1,144 @@ +# data file for mpfi_sec +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 nan nan 53 -inf -inf +0 53 -inf +inf 53 -inf -7 +0 53 -inf +inf 53 -inf -0 +0 53 -inf +inf 53 -inf 8 +0 53 -inf +inf 53 -inf +inf +0 53 -inf +inf 53 -8 -0 +0 53 -inf +inf 53 -3 -0 +2 53 1 0x1d9cf0f125cc2ap-52 53 -1 -0 +0 53 1 1 53 +0 -0 +2 53 1 0x1d9cf0f125cc2ap-52 53 +0 +1 +0 53 -inf +inf 53 +0 3 +0 53 -inf +inf 53 +0 8 +0 53 -inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 -inf +inf 53 -6 7 +0 53 -inf +inf 53 -6 6 +0 53 -inf +inf 53 -6 5 +0 53 -inf +inf 53 -6 4 +0 53 -inf +inf 53 -6 3 +0 53 -inf +inf 53 -6 2 +0 53 -inf +inf 53 -6 1 +0 53 -inf +inf 53 -6 -0 +0 53 -inf +inf 53 -6 -1 +0 53 -inf +inf 53 -6 -2 +0 53 -inf +inf 53 -6 -3 +0 53 -inf +inf 53 -6 -4 +3 53 0x10a9e8f3e19df1p-52 0x1c33db0464189bp-51 53 -6 -5 +3 53 0x10a9e8f3e19df1p-52 0x10a9e8f3e19df2p-52 53 -6 -6 + +0 53 -inf +inf 53 -5 7 +0 53 -inf +inf 53 -5 6 +0 53 -inf +inf 53 -5 5 +0 53 -inf +inf 53 -5 4 +0 53 -inf +inf 53 -5 3 +0 53 -inf +inf 53 -5 2 +0 53 -inf +inf 53 -5 1 +0 53 -inf +inf 53 -5 -0 +0 53 -inf +inf 53 -5 -1 +0 53 -inf +inf 53 -5 -2 +0 53 -inf +inf 53 -5 -3 +0 53 -inf +inf 53 -5 -4 +3 53 0x1c33db0464189ap-51 0x1c33db0464189bp-51 53 -5 -5 + +0 53 -inf +inf 53 -4 7 +0 53 -inf +inf 53 -4 6 +0 53 -inf +inf 53 -4 5 +0 53 -inf +inf 53 -4 4 +0 53 -inf +inf 53 -4 3 +0 53 -inf +inf 53 -4 2 +0 53 -inf +inf 53 -4 1 +0 53 -inf +inf 53 -4 -0 +0 53 -inf +inf 53 -4 -1 +1 53 -0x133956fecf9e49p-51 -1 53 -4 -2 +1 53 -0x187a6961d2485fp-52 -1 53 -4 -3 +3 53 -0x187a6961d2485fp-52 -0x187a6961d2485ep-52 53 -4 -4 + +0 53 -inf +inf 53 -3 7 +0 53 -inf +inf 53 -3 6 +0 53 -inf +inf 53 -3 5 +0 53 -inf +inf 53 -3 4 +0 53 -inf +inf 53 -3 3 +0 53 -inf +inf 53 -3 2 +0 53 -inf +inf 53 -3 1 +0 53 -inf +inf 53 -3 -0 +0 53 -inf +inf 53 -3 -1 +3 53 -0x133956fecf9e49p-51 -0x102967b457b245p-52 53 -3 -2 +3 53 -0x102967b457b246p-52 -0x102967b457b245p-52 53 -3 -3 + +0 53 -inf +inf 53 -2 7 +0 53 -inf +inf 53 -2 6 +0 53 -inf +inf 53 -2 5 +0 53 -inf +inf 53 -2 4 +0 53 -inf +inf 53 -2 3 +0 53 -inf +inf 53 -2 2 +0 53 -inf +inf 53 -2 1 +0 53 -inf +inf 53 -2 -0 +0 53 -inf +inf 53 -2 -1 +3 53 -0x133956fecf9e49p-51 -0x133956fecf9e48p-51 53 -2 -2 + +0 53 -inf +inf 53 -1 7 +0 53 -inf +inf 53 -1 6 +0 53 -inf +inf 53 -1 5 +0 53 -inf +inf 53 -1 4 +0 53 -inf +inf 53 -1 3 +0 53 -inf +inf 53 -1 2 +2 53 1 0x1d9cf0f125cc2ap-52 53 -1 1 +2 53 1 0x1d9cf0f125cc2ap-52 53 -1 -0 +3 53 0x1d9cf0f125cc29p-52 0x1d9cf0f125cc2ap-52 53 -1 -1 + +0 53 -inf +inf 53 1 7 +0 53 -inf +inf 53 1 6 +0 53 -inf +inf 53 1 5 +0 53 -inf +inf 53 1 4 +0 53 -inf +inf 53 1 3 +0 53 -inf +inf 53 1 2 +3 53 0x1d9cf0f125cc29p-52 0x1d9cf0f125cc2ap-52 53 1 1 + +0 53 -inf +inf 53 2 7 +0 53 -inf +inf 53 2 6 +0 53 -inf +inf 53 2 5 +1 53 -0x133956fecf9e49p-51 -1 53 2 4 +3 53 -0x133956fecf9e49p-51 -0x102967b457b245p-52 53 2 3 +3 53 -0x133956fecf9e49p-51 -0x133956fecf9e48p-51 53 2 2 + +0 53 -inf +inf 53 3 7 +0 53 -inf +inf 53 3 6 +0 53 -inf +inf 53 3 5 +1 53 -0x187a6961d2485fp-52 -1 53 3 4 +3 53 -0x102967b457b246p-52 -0x102967b457b245p-52 53 3 3 + +0 53 -inf +inf 53 4 7 +0 53 -inf +inf 53 4 6 +0 53 -inf +inf 53 4 5 +3 53 -0x187a6961d2485fp-52 -0x187a6961d2485ep-52 53 4 4 + +2 53 1 0x1c33db0464189bp-51 53 5 7 +3 53 0x10a9e8f3e19df1p-52 0x1c33db0464189bp-51 53 5 6 +3 53 0x1c33db0464189ap-51 0x1c33db0464189bp-51 53 5 5 + +2 53 1 0x153910a80e7db5p-52 53 6 7 +3 53 0x10a9e8f3e19df1p-52 0x10a9e8f3e19df2p-52 53 6 6 + +3 53 0x153910a80e7db4p-52 0x153910a80e7db5p-52 53 7 7 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sech.dat b/Build/source/libs/mpfi/mpfi-src/tests/sech.dat new file mode 100644 index 00000000000..b5f71f7acd2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sech.dat @@ -0,0 +1,43 @@ +# data file for mpfi_sech +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 +0 -0 53 -inf -inf +2 53 +0 0x1de169fb49b339p-62 53 -inf -7 +0 53 +0 1 53 -inf -0 +0 53 +0 1 53 -inf +8 +0 53 +0 1 53 -inf +inf +1 53 0x14bcdc50ed6be7p-53 1 53 -1 -0 +0 53 1 1 53 +0 -0 +1 53 0x14bcdc50ed6be7p-53 1 53 +0 +1 +1 53 0x15fc20da8e18dbp-63 1 53 +0 +8 +0 53 +0 1 53 +0 +inf +0 53 +0 -0 53 +inf +inf + +# regular values +1 53 0x1fc069fe3f72bep-53 1 + 53 -0.125 -0 +1 53 0x1c60d1ff040dcfp-53 1 + 53 0 0x10000000000001p-53 +3 53 0x16bf984a9a2355p-58 0x1aa0b464a5e24ap-53 + 53 -4.5 -0.625 +3 53 0x196d8e17d88eb1p-56 0x14bcdc50ed6be8p-53 + 53 1 3 + +3 53 0x10000000000173p-1074 0x1639e3175a6893p-76 + 53 17 0xb145bb71d3dbp-38 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_d.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_d.dat new file mode 100644 index 00000000000..96c852375a5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_d.dat @@ -0,0 +1,39 @@ +# data file for mpfi_set_d +# +# fields: see put_ui.dat + +# special values +53 nan nan 0 53 -inf -inf -inf +53 nan nan 0 53 -8 -8 -8 +53 nan nan 0 53 +0 -0 -0 +53 nan nan 0 53 +0 -0 +0 +53 nan nan 0 53 +5 +5 +5 +53 +7 -7 0 53 +inf +inf +inf +53 +7 -7 0 53 nan nan nan +53 +7 -7 0 53 -inf -inf -inf +53 +7 -7 0 53 -8 -8 -8 +53 +7 -7 0 53 +0 -0 -0 +53 nan nan 0 53 +0 -0 +0 +53 nan nan 0 53 +5 +5 +5 +53 nan nan 0 53 +inf +inf +inf +53 +0 -0 0 53 nan nan nan +53 +0 -0 0 53 -inf -inf -inf +53 nan nan 0 53 -8 -8 -8 +53 nan nan 0 53 +0 -0 -0 +53 nan nan 0 53 +0 -0 +0 +53 nan nan 0 53 +5 +5 +5 +53 nan nan 0 53 +inf +inf +inf +53 -1 +1 0 53 nan nan nan +53 -1 +1 0 53 -inf -inf -inf +53 -1 +1 0 53 -8 -8 -8 +53 -1 +1 0 53 +0 -0 -0 +53 nan nan 0 53 +0 -0 +0 +53 nan nan 0 53 +5 +5 +5 +53 nan nan 0 53 +inf +inf +inf +53 +0 +1 0 53 nan nan nan + +# regular values + 53 +0x123456789abcdep-16 +0x1fedcba9876543p-16 +0 53 +0x11111111111111 +0x11111111111111 +0x11111111111111 + 49 +0x123456789abcdp-57 +0x1fedcba987654p+33 +3 49 +0x1111111111111 +0x1111111111112 +0x11111111111111p-4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_flt.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_flt.dat new file mode 100644 index 00000000000..9306afa1ad0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_flt.dat @@ -0,0 +1,37 @@ +# data file for mpfi_set_flt +# +# fields: see put_ui.dat + +# special values +24 nan nan 0 24 -inf -inf -inf +24 nan nan 0 24 -8 -8 -8 +24 nan nan 0 24 +0 -0 -0 +24 nan nan 0 24 +0 -0 +0 +24 nan nan 0 24 +5 +5 +5 +24 +7 -7 0 24 +inf +inf +inf +24 +7 -7 0 24 nan nan nan +24 +7 -7 0 24 -inf -inf -inf +24 +7 -7 0 24 -8 -8 -8 +24 +7 -7 0 24 +0 -0 -0 +24 nan nan 0 24 +0 -0 +0 +24 nan nan 0 24 +5 +5 +5 +24 nan nan 0 24 +inf +inf +inf +24 +0 -0 0 24 nan nan nan +24 +0 -0 0 24 -inf -inf -inf +24 nan nan 0 24 -8 -8 -8 +24 nan nan 0 24 +0 -0 -0 +24 nan nan 0 24 +0 -0 +0 +24 nan nan 0 24 +5 +5 +5 +24 nan nan 0 24 +inf +inf +inf +24 -1 +1 0 24 nan nan nan +24 -1 +1 0 24 -inf -inf -inf +24 -1 +1 0 24 -8 -8 -8 +24 -1 +1 0 24 +0 -0 -0 +24 nan nan 0 24 +0 -0 +0 +24 nan nan 0 24 +5 +5 +5 +24 nan nan 0 24 +inf +inf +inf +24 +0 +1 0 24 nan nan nan + +# regular values + 24 +0x123456p-16 +0xfedcbap-16 0 24 +0x111111 +0x111111 +0x111111 + 20 +0x123456p-57 +0xfedcbap+33 3 20 +0x1.111110 +0x1.111112 +0x1.111111 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_fr.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_fr.dat new file mode 100644 index 00000000000..9a04b7b6c95 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_fr.dat @@ -0,0 +1,48 @@ +# data file for mpfi_set_fr +# +# column fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 -inf -inf 53 -inf +53 -inf -inf 0 53 -8 -8 53 -8 +53 nan nan 0 53 +0 -0 53 -0 +53 nan nan 0 53 +0 -0 53 +0 +53 nan nan 0 53 +5 +5 53 +5 +53 nan nan 0 53 +inf +inf 53 +inf +53 -inf -0 0 53 nan nan 53 nan +53 nan nan 0 53 -inf -inf 53 -inf +53 -inf -inf 0 53 -8 -8 53 -8 +53 -inf -inf 0 53 +0 -0 53 -0 +53 -inf -inf 0 53 +0 -0 53 +0 +53 -inf -inf 0 53 +5 +5 53 +5 +53 -inf -inf 0 53 +inf +inf 53 +inf +53 -inf -inf 0 53 nan nan 53 nan +53 +0 -0 0 53 -inf -inf 53 -inf +53 +0 -0 0 53 -8 -8 53 -8 +53 +0 -0 0 53 +0 -0 53 -0 +53 +0 -0 0 53 +0 -0 53 +0 +53 +0 -0 0 53 +5 +5 53 +5 +53 +0 -0 0 53 +inf +inf 53 +inf +53 +0 -0 0 53 nan nan 53 nan +53 +inf +inf 0 53 -inf -inf 53 -inf +53 +inf +inf 0 53 -8 -8 53 -8 +53 +inf +inf 0 53 +0 -0 53 -0 +53 +inf +inf 0 53 +0 -0 53 +0 +53 +inf +inf 0 53 +5 +5 53 +5 +53 -inf +inf 0 53 +inf +inf 53 +inf +53 +inf +inf 0 53 nan nan 53 nan + +# regular values +53 nan nan 0 53 0x1999999999999a@-14 0x1999999999999a@-14 53 0.1 + 2 nan nan 3 2 0x18@-2 0x2@-1 53 0.1 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_ld.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_ld.dat new file mode 100644 index 00000000000..55fc83c5a65 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_ld.dat @@ -0,0 +1,40 @@ +# data file for mpfi_set_d +# +# fields: see put_ui.dat +# long doubles seem to be at least 64 bits of precision, can be up to 106... check only with 64 + +# special values +64 nan nan 0 64 -inf -inf -inf +64 nan nan 0 64 -8 -8 -8 +64 nan nan 0 64 +0 -0 -0 +64 nan nan 0 64 +0 -0 +0 +64 nan nan 0 64 +5 +5 +5 +64 +7 -7 0 64 +inf +inf +inf +64 +7 -7 0 64 nan nan nan +64 +7 -7 0 64 -inf -inf -inf +64 +7 -7 0 64 -8 -8 -8 +64 +7 -7 0 64 +0 -0 -0 +64 nan nan 0 64 +0 -0 +0 +64 nan nan 0 64 +5 +5 +5 +64 nan nan 0 64 +inf +inf +inf +64 +0 -0 0 64 nan nan nan +64 +0 -0 0 64 -inf -inf -inf +64 nan nan 0 64 -8 -8 -8 +64 nan nan 0 64 +0 -0 -0 +64 nan nan 0 64 +0 -0 +0 +64 nan nan 0 64 +5 +5 +5 +64 nan nan 0 64 +inf +inf +inf +64 -1 +1 0 64 nan nan nan +64 -1 +1 0 64 -inf -inf -inf +64 -1 +1 0 64 -8 -8 -8 +64 -1 +1 0 64 +0 -0 -0 +64 nan nan 0 64 +0 -0 +0 +64 nan nan 0 64 +5 +5 +5 +64 nan nan 0 64 +inf +inf +inf +64 +0 +1 0 64 nan nan nan + +# regular values + 64 +0x123456789abcdep-16 +0x1fedcba9876543p-16 +0 64 +0x11111111111111 +0x11111111111111 +0x11111111111111 + 60 +0x123456789abcdeep-57 +0x1fedcba98765432p+33 +3 60 +0x1.111111111111110 +0x1.111111111111112 +0x1.1111111111111111 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_q.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_q.dat new file mode 100644 index 00000000000..c9903f685eb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_q.dat @@ -0,0 +1,35 @@ +# data file for mpfi_set_q +# +# column fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: value of argument + +# special values in initial interval +53 nan nan 0 53 -8 -8 -8/1 +53 nan nan 0 53 +0 -0 -0/1 +53 nan nan 0 53 +0 -0 0/1 +53 nan nan 0 53 +5 +5 5/1 +53 -inf -inf 0 53 -8 -8 -8/1 +53 -inf -inf 0 53 +0 -0 -0/1 +53 -inf -inf 0 53 +0 -0 0/1 +53 -inf -inf 0 53 +5 +5 5/1 +53 +0 -0 0 53 -8 -8 -8/1 +53 +0 -0 0 53 +0 -0 -0/1 +53 +0 -0 0 53 +0 -0 0/1 +53 +0 -0 0 53 +5 +5 5/1 +53 +inf +inf 0 53 -8 -8 -8/1 +53 +inf +inf 0 53 +0 -0 -0/1 +53 +inf +inf 0 53 +0 -0 0/1 +53 +inf +inf 0 53 +5 +5 5/1 + +# regular values +53 nan nan 3 53 0x19999999999999@-14 0x1999999999999a@-14 1/10 + 2 nan nan 3 2 0x18@-2 0x2@-1 1/10 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_si.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_si.dat new file mode 100644 index 00000000000..ea9ebbb04b5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_si.dat @@ -0,0 +1,40 @@ +# data file for mpfi_set_si +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 -8 -8 -8 +53 nan nan 0 53 +0 -0 -0 +53 nan nan 0 53 +0 -0 +0 +53 nan nan 0 53 +5 +5 +5 +53 -inf -inf 0 53 -8 -8 -8 +53 -inf -inf 0 53 +0 -0 -0 +53 -inf -inf 0 53 +0 -0 +0 +53 -inf -inf 0 53 +5 +5 +5 +53 +0 -0 0 53 -8 -8 -8 +53 +0 -0 0 53 +0 -0 -0 +53 +0 -0 0 53 +0 -0 +0 +53 +0 -0 0 53 +5 +5 +5 +53 +inf +inf 0 53 -8 -8 -8 +53 +inf +inf 0 53 +0 -0 -0 +53 +inf +inf 0 53 +0 -0 +0 +53 +inf +inf 0 53 +5 +5 +5 + +# regular values +53 +10 +20 0 53 +5 +5 +5 +16 +0x123400 0xdada00 3 16 +0x111100 +0x111120 +0x111101 +53 -0x888888 -0x888887 0 53 -0xbaffe0 -0xbaffe0 -0xbaffe0 +16 -0x888800 -0x888700 3 16 -0x888900 -0x888800 -0x888801 +16 -0x888800 +0x1 0 16 -0xfedc00 -0xfedc00 -0xfedc00 +16 -0x888800 +0x1 3 16 +0xfedb00 +0xfedc00 +0xfedb01 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_ui.dat new file mode 100644 index 00000000000..abb8c872f4b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_ui.dat @@ -0,0 +1,38 @@ +# data file for mpfi_set_ui +# +# fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: precision of argument +# 9: value of argument + +# special values +53 nan nan 0 53 +0 -0 +0 +53 nan nan 0 53 +5 +5 +5 +53 -inf -inf 0 53 +0 -0 +0 +53 -inf -inf 0 53 +5 +5 +5 +53 +0 -0 0 53 +0 -0 +0 +53 +0 -0 0 53 +5 +5 +5 +53 +inf +inf 0 53 +0 -0 +0 +53 +inf +inf 0 53 +5 +5 +5 + +# regular values +53 +10 +20 0 53 +5 +5 5 +16 +0x123400 0xdada00 3 16 +0x111100 +0x111120 0x111101 +53 +10 +20 0 53 +15 +15 15 +16 +0x123400 0xdada00 0 16 +0xdddd00 +0xdddd00 0xdddd00 +16 +0x123400 0xdada00 3 16 +0xdada00 +0xdadb00 0xdadada + +53 -0x888888 -0x888887 0 53 +0xbaffe0 0xbaffe0 0xbaffe0 +16 -0x888800 -0x888700 3 16 +0x888800 0x888900 0x888801 + +16 -0x888800 +0x1 0 16 +0xfedc00 +0xfedc00 0xfedc00 +16 -0x888800 +0x10 0 16 +0x8 +0x8 0x8 +16 -0x888800 +0x1 3 16 +0x888800 +0x888900 0x888801 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/set_z.dat b/Build/source/libs/mpfi/mpfi-src/tests/set_z.dat new file mode 100644 index 00000000000..3ff088c130b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/set_z.dat @@ -0,0 +1,35 @@ +# data file for mpfi_set_z +# +# column fields: +# 1: initial precision of interval +# 2: initial left point value of interval +# 3: initial right endpoint value of interval +# +# 4: inexact flag (returned value) +# 5: precision of result (must be the same as in field 1) +# 6: left endpoint value of result +# 7: right endpoint value of result +# +# 8: value of argument + +# special values in initial interval +53 nan nan 0 53 -8 -8 -8 +53 nan nan 0 53 +0 -0 -0 +53 nan nan 0 53 +0 -0 0 +53 nan nan 0 53 +5 +5 5 +53 -inf -inf 0 53 -8 -8 -8 +53 -inf -inf 0 53 +0 -0 -0 +53 -inf -inf 0 53 +0 -0 0 +53 -inf -inf 0 53 +5 +5 5 +53 +0 -0 0 53 -8 -8 -8 +53 +0 -0 0 53 +0 -0 -0 +53 +0 -0 0 53 +0 -0 0 +53 +0 -0 0 53 +5 +5 5 +53 +inf +inf 0 53 -8 -8 -8 +53 +inf +inf 0 53 +0 -0 -0 +53 +inf +inf 0 53 +0 -0 0 +53 +inf +inf 0 53 +5 +5 5 + +# regular values +53 nan nan 3 53 0x15555555555555p+3 0x15555555555556p+3 0xaaaaaaaaaaaaaa + 2 nan nan 3 2 0x18 0x20 0x19 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/si_div.dat b/Build/source/libs/mpfi/mpfi-src/tests/si_div.dat new file mode 100644 index 00000000000..63707981b1e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/si_div.dat @@ -0,0 +1,112 @@ +# data file for mpfi_si_div +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan -1 53 nan nan +0 53 nan nan 0 53 nan nan +0 53 nan nan 1 53 nan nan +0 53 nan nan -3 53 nan -inf +0 53 nan nan 0 53 nan -inf +0 53 nan nan 3 53 nan -inf +0 53 nan nan -7 53 nan -7 +0 53 nan nan 0 53 nan -7 +0 53 nan nan 7 53 nan -7 +0 53 nan nan -1 53 nan -0 +0 53 nan nan 0 53 nan -0 +0 53 nan nan 1 53 nan -0 +0 53 nan nan -3 53 nan 1 +0 53 nan nan 0 53 nan 1 +0 53 nan nan 3 53 nan 1 +0 53 nan nan -6 53 nan +inf +0 53 nan nan 0 53 nan +inf +0 53 nan nan 6 53 nan +inf +0 53 +0 -0 -2 53 -inf -inf +0 53 +0 -0 0 53 -inf -inf +0 53 +0 -0 2 53 -inf -inf +0 53 +0 4 -4 53 -inf -1 +0 53 +0 -0 0 53 -inf -1 +0 53 -4 -0 4 53 -inf -1 + +2 53 +0 0x12492492492493p-53 + -4 + 53 -inf -7 +1 53 -0x12492492492493p-53 -0 + 4 + 53 -inf -7 + +0 53 +0 +inf -8 53 -inf -0 +0 53 +0 -0 0 53 -inf -0 +0 53 -inf -0 8 53 -inf -0 +0 53 -inf +inf -1 53 -inf +8 +0 53 -inf +inf 0 53 -inf +8 +0 53 -inf +inf 1 53 -inf +8 +0 53 -inf +inf -3 53 -inf +inf +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf 3 53 -inf +inf +0 53 nan nan -6 53 -inf nan +0 53 nan nan 0 53 -inf nan +0 53 nan nan 6 53 -inf nan +0 53 -inf +inf -1 53 +0 -0 +0 53 +0 -0 0 53 +0 -0 +0 53 -inf +inf 1 53 +0 -0 +0 53 -inf -0.5 -4 53 +0 +8 +0 53 +0 -0 0 53 +0 +8 +0 53 0.5 +inf 4 53 +0 +8 + +2 53 -inf -0x12492492492492p-53 + -4 + 53 +0 7 +1 53 0x12492492492492p-53 +inf + 4 + 53 +0 7 + +0 53 -inf -0 -7 53 +0 +inf +0 53 +0 -0 0 53 +0 +inf +0 53 +0 +inf 7 53 +0 +inf +0 53 +0 -0 -1 53 +inf +inf +0 53 +0 -0 0 53 +inf +inf +0 53 +0 -0 1 53 +inf +inf +0 53 nan nan -1 53 +inf nan +0 53 nan nan 0 53 +inf nan +0 53 nan nan 1 53 +inf nan + +# regular values +0 53 -inf +inf + -32 + 53 -32 17 + +0 53 2 5 + 30 + 53 6 15 +1 53 0x11249249249249p-51 5 + 30 + 53 6 14 +2 53 2 0x1124924924924ap-50 + 30 + 53 7 15 +3 53 0x10888888888888p-51 0x14aaaaaaaaaaabp-50 + 31 + 53 6 15 + +0 53 -5 -2 + -30 + 53 6 15 +1 53 -0x1124924924924ap-50 -2 + 30 + 53 -15 -7 +2 53 -5 -0x11249249249249p-51 + -30 + 53 6 14 +3 53 -0x14aaaaaaaaaaabp-50 -0x10888888888888p-51 + 31 + 53 -15 -6 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/si_sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/si_sub.dat new file mode 100644 index 00000000000..cba94fbae7b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/si_sub.dat @@ -0,0 +1,101 @@ +# data file for mpfi_si_sub +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan -1 53 nan nan +0 53 nan nan 0 53 nan nan +0 53 nan nan 1 53 nan nan +0 53 +inf nan -3 53 nan -inf +0 53 +inf nan 0 53 nan -inf +0 53 +inf nan 3 53 nan -inf +0 53 +0 nan -7 53 nan -7 +0 53 7 nan 0 53 nan -7 +0 53 14 nan 7 53 nan -7 +0 53 -15 nan -15 53 nan -0 +0 53 +0 nan 0 53 nan -0 +0 53 15 nan 15 53 nan -0 +0 53 -32 nan -31 53 nan 1 +0 53 -1 nan 0 53 nan 1 +0 53 30 nan 31 53 nan 1 +0 53 -inf nan -63 53 nan +inf +0 53 -inf nan 0 53 nan +inf +0 53 -inf nan 63 53 nan +inf +0 53 +inf +inf -2 53 -inf -inf +0 53 +inf +inf 0 53 -inf -inf +0 53 +inf +inf +2 53 -inf -inf +0 53 3 +inf -4 53 -inf -7 +0 53 7 +inf 0 53 -inf -7 +0 53 11 +inf 4 53 -inf -7 + +1 53 0x1p+70 +inf + 1 + 53 -inf -0x1p+70 + +0 53 -8 +inf -8 53 -inf -0 +0 53 +0 +inf 0 53 -inf -0 +0 53 8 +inf 8 53 -inf -0 +0 53 -24 +inf -16 53 -inf 8 +0 53 -8 +inf 0 53 -inf 8 +0 53 8 +inf 16 53 -inf 8 +0 53 -inf +inf -32 53 -inf +inf +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf +32 53 -inf +inf +0 53 nan +inf -64 53 -inf nan +0 53 nan +inf 0 53 -inf nan +0 53 nan +inf +64 53 -inf nan +0 53 -1 -1 -1 53 +0 -0 +0 53 +0 -0 0 53 +0 -0 +0 53 1 1 1 53 +0 -0 +0 53 -11 -3 -3 53 +0 8 +0 53 -8 -0 0 53 +0 8 +0 53 -5 3 3 53 +0 8 +0 53 -inf -7 -7 53 +0 +inf +0 53 -inf -0 0 53 +0 +inf +0 53 -inf 7 7 53 +0 +inf +0 53 -inf -inf -1 53 +inf +inf +0 53 -inf -inf 0 53 +inf +inf +0 53 -inf -inf 1 53 +inf +inf +0 53 nan -inf -1 53 +inf nan +0 53 nan -inf 0 53 +inf nan +0 53 nan -inf 1 53 +inf nan + +# regular values +0 53 -64 -49 -32 53 17 32 +0 53 +0 +15 32 53 17 32 +0 53 -15 -0 17 53 17 32 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 3 + 53 -0x123456789abcdf -0x123456789abcdfp-48 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 3 + 53 -0x123456789abcdf -0x123456789abcdfp-56 +2 53 1 0x10123456789abdp-44 + 256 + 53 -0x123456789abcdfp-52 0xff +3 53 0xfff 0x1001 + 0x1001 + 53 0x1p-550 0x1fffffffffffffp-52 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + -3 + 53 -0x123456789abcdf -0x123456789abcdfp-48 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + -3 + 53 -0x123456789abcdf -0x123456789abcdfp-56 +2 53 -0x1ff -0xfedcba9876543p-44 + -256 + 53 -0x123456789abcdfp-52 0xff +3 53 -0x1003 -0x1001 + -0x1001 + 53 0x1p-550 0x1fffffffffffffp-52 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sin.dat b/Build/source/libs/mpfi/mpfi-src/tests/sin.dat new file mode 100644 index 00000000000..171a9c110ef --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sin.dat @@ -0,0 +1,168 @@ +# data file for mpfi_sin +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 nan nan 53 -inf -inf +0 53 -1 1 53 -inf -7 +0 53 -1 1 53 -inf -0 +0 53 -1 1 53 -inf +8 +0 53 -1 1 53 -inf +inf +1 53 -0x1aed548f090cefp-53 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x1aed548f090cefp-53 53 +0 +1 +0 53 -1 1 53 +0 +8 +0 53 -1 1 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 -1 1 53 0.125 17 +1 53 0x1fffffffffffffp-53 1 + 53 0x1921fb54442d18p-52 0x1921fb54442d19p-52 +2 53 -1 -0x1eaee8744b05efp-54 53 -2 -0.5 +2 53 -1 0x1f47ed3dc74081p-53 53 -4.5 0.625 +3 53 -0x1aed548f090cefp-53 -0x1faaeed4f31576p-55 53 -1 -0.25 +3 53 -0x1eaee8744b05f0p-54 0x1eaee8744b05f0p-54 53 -0.5 0.5 +3 53 0x1bde6c11cbfc46p-55 0x1bde6c11cbfc47p-55 + 53 0x71p+76 0x71p+76 + +0 53 -1 1 53 -7 7 +0 53 -1 1 53 -7 6 +0 53 -1 1 53 -7 5 +0 53 -1 1 53 -7 4 +0 53 -1 1 53 -7 3 +0 53 -1 1 53 -7 2 +0 53 -1 1 53 -7 1 +0 53 -1 1 53 -7 -0 +0 53 -1 1 53 -7 -1 +1 53 -0x1d18f6ead1b446p-53 1 53 -7 -2 +1 53 -0x150608c26d0a09p-53 1 53 -7 -3 +1 53 -0x150608c26d0a09p-53 1 53 -7 -4 +3 53 -0x150608c26d0a09p-53 0x1eaf81f5e09934p-53 53 -7 -5 +3 53 -0x150608c26d0a09p-53 0x11e1f18ab0a2c1p-54 53 -7 -6 +3 53 -0x150608c26d0a09p-53 -0x150608c26d0a08p-53 53 -7 -7 + +0 53 -1 1 53 -6 7 +0 53 -1 1 53 -6 6 +0 53 -1 1 53 -6 5 +0 53 -1 1 53 -6 4 +0 53 -1 1 53 -6 3 +0 53 -1 1 53 -6 2 +0 53 -1 1 53 -6 1 +0 53 -1 1 53 -6 -0 +0 53 -1 1 53 -6 -1 +1 53 -0x1d18f6ead1b446p-53 1 53 -6 -2 +1 53 -0x1210386db6d55cp-55 1 53 -6 -3 +1 53 0x11e1f18ab0a2c0p-54 1 53 -6 -4 +3 53 0x11e1f18ab0a2c0p-54 0x1eaf81f5e09934p-53 53 -6 -5 +3 53 0x11e1f18ab0a2c0p-54 0x11e1f18ab0a2c1p-54 53 -6 -6 + +0 53 -1 1 53 -5 7 +0 53 -1 1 53 -5 6 +0 53 -1 1 53 -5 5 +0 53 -1 1 53 -5 4 +0 53 -1 1 53 -5 3 +0 53 -1 1 53 -5 2 +0 53 -1 1 53 -5 1 +0 53 -1 1 53 -5 -0 +0 53 -1 1 53 -5 -1 +1 53 -0x1d18f6ead1b446p-53 1 53 -5 -2 +1 53 -0x1210386db6d55cp-55 1 53 -5 -3 +1 53 0x1837b9dddc1eaep-53 1 53 -5 -4 +3 53 0x1eaf81f5e09933p-53 0x1eaf81f5e09934p-53 53 -5 -5 + +0 53 -1 1 53 -4 7 +0 53 -1 1 53 -4 6 +0 53 -1 1 53 -4 5 +0 53 -1 1 53 -4 4 +0 53 -1 1 53 -4 3 +0 53 -1 1 53 -4 2 +2 53 -1 0x1aed548f090cefp-53 53 -4 1 +2 53 -1 0x1837b9dddc1eafp-53 53 -4 -0 +2 53 -1 0x1837b9dddc1eafp-53 53 -4 -1 +3 53 -0x1d18f6ead1b446p-53 0x1837b9dddc1eafp-53 53 -4 -2 +3 53 -0x1210386db6d55cp-55 0x1837b9dddc1eafp-53 53 -4 -3 +3 53 0x1837b9dddc1eaep-53 0x1837b9dddc1eafp-53 53 -4 -4 + +0 53 -1 1 53 -3 7 +0 53 -1 1 53 -3 6 +0 53 -1 1 53 -3 5 +0 53 -1 1 53 -3 4 +0 53 -1 1 53 -3 3 +0 53 -1 1 53 -3 2 +2 53 -1 0x1aed548f090cefp-53 53 -3 1 +0 53 -1 -0 53 -3 -0 +2 53 -1 -0x1210386db6d55bp-55 53 -3 -1 +3 53 -0x1d18f6ead1b446p-53 -0x1210386db6d55bp-55 53 -3 -2 +3 53 -0x1210386db6d55cp-55 -0x1210386db6d55bp-55 53 -3 -3 + +0 53 -1 1 53 -2 7 +0 53 -1 1 53 -2 6 +0 53 -1 1 53 -2 5 +0 53 -1 1 53 -2 4 +0 53 -1 1 53 -2 3 +0 53 -1 1 53 -2 2 +2 53 -1 0x1aed548f090cefp-53 53 -2 1 +0 53 -1 -0 53 -2 -0 +2 53 -1 -0x1aed548f090ceep-53 53 -2 -1 +3 53 -0x1d18f6ead1b446p-53 -0x1d18f6ead1b445p-53 53 -2 -2 + +0 53 -1 1 53 -1 7 +0 53 -1 1 53 -1 6 +0 53 -1 1 53 -1 5 +1 53 -0x1aed548f090cefp-53 1 53 -1 4 +1 53 -0x1aed548f090cefp-53 1 53 -1 3 +1 53 -0x1aed548f090cefp-53 1 53 -1 2 +3 53 -0x1aed548f090cefp-53 0x1aed548f090cefp-53 53 -1 1 +1 53 -0x1aed548f090cefp-53 -0 53 -1 -0 +3 53 -0x1aed548f090cefp-53 -0x1aed548f090ceep-53 53 -1 -1 + +0 53 -1 1 53 1 7 +0 53 -1 1 53 1 6 +0 53 -1 1 53 1 5 +1 53 -0x1837b9dddc1eafp-53 1 53 1 4 +1 53 0x1210386db6d55bp-55 1 53 1 3 +1 53 0x1aed548f090ceep-53 1 53 1 2 +3 53 0x1aed548f090ceep-53 0x1aed548f090cefp-53 53 1 1 + +2 53 -1 0x1d18f6ead1b446p-53 53 2 7 +2 53 -1 0x1d18f6ead1b446p-53 53 2 6 +2 53 -1 0x1d18f6ead1b446p-53 53 2 5 +3 53 -0x1837b9dddc1eafp-53 0x1d18f6ead1b446p-53 53 2 4 +3 53 0x1210386db6d55bp-55 0x1d18f6ead1b446p-53 53 2 3 +3 53 0x1d18f6ead1b445p-53 0x1d18f6ead1b446p-53 53 2 2 + +2 53 -1 0x150608c26d0a09p-53 53 3 7 +2 53 -1 0x1210386db6d55cp-55 53 3 6 +2 53 -1 0x1210386db6d55cp-55 53 3 5 +3 53 -0x1837b9dddc1eafp-53 0x1210386db6d55cp-55 53 3 4 +3 53 0x1210386db6d55bp-55 0x1210386db6d55cp-55 53 3 3 + +2 53 -1 0x150608c26d0a09p-53 53 4 7 +2 53 -1 -0x11e1f18ab0a2c0p-54 53 4 6 +2 53 -1 -0x1837b9dddc1eaep-53 53 4 5 +3 53 -0x1837b9dddc1eafp-53 -0x1837b9dddc1eaep-53 53 4 4 + +3 53 -0x1eaf81f5e09934p-53 0x150608c26d0a09p-53 53 5 7 +3 53 -0x1eaf81f5e09934p-53 -0x11e1f18ab0a2c0p-54 53 5 6 +3 53 -0x1eaf81f5e09934p-53 -0x1eaf81f5e09933p-53 53 5 5 + +3 53 -0x11e1f18ab0a2c1p-54 0x150608c26d0a09p-53 53 6 7 +3 53 -0x11e1f18ab0a2c1p-54 -0x11e1f18ab0a2c0p-54 53 6 6 + +3 53 0x150608c26d0a08p-53 0x150608c26d0a09p-53 53 7 7 + diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sinh.dat b/Build/source/libs/mpfi/mpfi-src/tests/sinh.dat new file mode 100644 index 00000000000..c5aaae3b961 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sinh.dat @@ -0,0 +1,36 @@ +# data file for mpfi_sinh +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -inf 53 nan -inf +0 53 -0x1122876ba380cap-43 nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 -inf nan 53 -inf nan +0 53 -inf -inf 53 -inf -inf +2 53 -inf -0x1122876ba380c9p-43 53 -inf -7 +0 53 -inf -0 53 -inf -0 +2 53 -inf 0x1749ea514eca66p-42 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +1 53 -0x12cd9fc44eb983p-52 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x12cd9fc44eb983p-52 53 +0 +1 +2 53 +0 0x1749ea514eca66p-42 53 +0 +8 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +1 53 -0x100aaccd00d2f1p-55 -0 53 -0.125 -0 +2 53 +0 0x10acd00fe63b98p-53 53 0 0x10000000000001p-53 +3 53 -0x168062ab5fa9fdp-47 -0x1553e795dc19ccp-53 53 -4.5 -0.625 +3 53 0x12cd9fc44eb982p-52 0x140926e70949aep-49 53 1 3 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sqr.dat b/Build/source/libs/mpfi/mpfi-src/tests/sqr.dat new file mode 100644 index 00000000000..89eb6ca7a64 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sqr.dat @@ -0,0 +1,31 @@ +# data file for mpfi_sqr +# +# column fields: see neg.dat + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 nan +1 +0 53 nan nan 53 +inf nan +0 53 +inf +inf 53 -inf -inf +0 53 +49 +inf 53 -inf -7 +0 53 +0 +inf 53 -inf -0 +0 53 +0 +inf 53 -inf +8 +0 53 +0 +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +0 53 +0 +64 53 +0 +8 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 0x4.65df11464764p-4 0xf.8f918d688891p+16 + 53 0x8.6374d8p-4 0x3.f1d929p+8 +1 53 0x2.8b45c3cc03ea6p+12 0x14b66cb0ce4 + 53 0x6.61485c33c0b14p+4 0x123456 +2 53 +0 0x1.f04dba0302d4dp+0 + 53 -0x1.64722ad2480c9p+0 0x1 +3 53 0x2.02ce7912cddf6p+0 0x7.3a5dee779527p+0 + 53 0x1.6b079248747a2p+0 0x2.b041176d263f6p+0 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sqrt.dat b/Build/source/libs/mpfi/mpfi-src/tests/sqrt.dat new file mode 100644 index 00000000000..a6f7246db86 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sqrt.dat @@ -0,0 +1,32 @@ +# data file for mpfi_sqrt +# +# column fields: see neg.dat + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 nan +1 53 nan +1 +0 53 +inf nan 53 +inf nan +0 53 nan nan 53 -inf -inf +0 53 nan nan 53 -inf -7 +0 53 nan -0 53 -inf -0 +0 53 nan -0 53 -inf -0 +0 53 nan +3 53 -inf +9 +0 53 nan +inf 53 -inf +inf +0 53 +0 -0 53 +0 -0 +0 53 +0 +3 53 +0 +9 +0 53 +0 +inf 53 +0 +inf +0 53 +inf +inf 53 +inf +inf + +# regular values +0 53 0xd1 0x123456 + 53 0xaaa1 0x14b66cb0ce4 +1 53 0xf.1ea42821b27a8p-4 0xd1 + 53 0xe.49ae7969e41bp-4 0xaaa1 +2 53 0xd.1p-4 0x1.06081714eef1dp+0 + 53 0xa.aa1p-4 0x1.0c348f804c7a9p+0 +3 53 0xf.1ea42821b27a8p-4 0x1.06081714eef1dp+0 + 53 0xe.49ae7969e41bp-4 0x1.0c348f804c7a9p+0 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub.dat new file mode 100644 index 00000000000..1d5a6464ccf --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub.dat @@ -0,0 +1,62 @@ +# data file for mpfi_sub +# +# column fields: see add.dat + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan +inf 53 nan -0 53 -inf -7 +0 53 nan +8 53 nan -0 53 -8 +1 +0 53 nan +inf 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan -inf 53 nan -inf 53 +5 +inf +0 53 nan -inf 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan +1 53 nan -0 +0 53 nan nan 53 -inf -inf 53 -inf -inf +0 53 -inf -6 53 -inf -7 53 -1 +8 +0 53 -inf -8 53 -inf -0 53 +8 +inf +0 53 -inf -inf 53 -inf -0 53 +inf +inf +0 53 -inf +8 53 -inf +8 53 +0 +8 +0 53 -inf +inf 53 -inf +inf 53 +0 +8 +0 53 +7 +inf 53 +0 -0 53 -inf -7 +0 53 +0 +15 53 +0 +8 53 -7 -0 +0 53 -8 -0 53 +0 -0 53 +0 +8 +0 53 -8 +inf 53 +0 +inf 53 +0 +8 +0 53 -inf -8 53 +0 -0 53 +8 +inf +0 53 nan -inf 53 +0 +8 53 +inf nan +0 53 -inf +inf 53 +0 -0 53 -inf +inf +0 53 -8 +15 53 +0 +8 53 -7 +8 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 -8 +inf 53 +0 +inf 53 +0 +8 +0 53 -inf nan 53 +0 nan 53 +8 +inf +0 53 -inf -inf 53 +0 +8 53 +inf +inf +0 53 +inf +inf 53 +inf +inf 53 -inf +3 +0 53 nan +inf 53 +inf +inf 53 +0 +inf +0 53 nan +inf 53 +inf +inf 53 +3 nan +0 53 +inf nan 53 +inf nan 53 -inf -7 +0 53 nan nan 53 +inf nan 53 +inf +inf +0 53 +inf nan 53 +inf nan 53 -3 +7 + +# regular values +0 53 -86 42 53 -5 59 53 17 81 +1 53 -0x10000000000001p-93 0x123456789abcd + 53 -0x1p-300 0x123456p+28 + 53 -0x789abcd 0x10000000000000p-93 +2 53 -0x123456791abcdp-17 0x8f596b3002c1bp+947 + 53 -4 7 + 53 -3e300 0x123456789abcdp-17 +3 53 -0x10101010101011p+4 0x8f596b3002c1bp+947 + 53 -0x1000100010001p+8 0x1p+60 + 53 -3e300 0x1000100010001 + +1 53 -0x10000000000001p+18 -0 + 53 -5 1 + 53 1 0x1p+70 +2 53 +0 0x1p+70 + 53 5 0x1p+70 + 53 3 5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub_d.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub_d.dat new file mode 100644 index 00000000000..d7d71502092 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub_d.dat @@ -0,0 +1,108 @@ +# data file for mpfi_sub_d +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +#WARNING: +# double values are read by the test suite with rounding towards minus +# infinity to a machine-dependant precision (whereas the mpfi data are read +# at the given precision with rounding to the nearest). +# So as to ensure portability, use test values that are representable with a +# 53 bit-significand which corresponds to the minimum default precision for +# a double in the test suite. + +# special values +0 53 nan nan 53 nan nan -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 0.0 +0 53 nan nan 53 nan nan 0x170ef54646d497p-109 +0 53 nan -inf 53 nan -inf -0x114b37f4b51f71p-107 +0 53 nan -inf 53 nan -inf 0.0 +0 53 nan -inf 53 nan -inf 0x114b37f4b51f71p-107 +0 53 nan -0x1bfffffffffff8p-50 53 nan -7 -0xfc339ab0a6b53p-99 +0 53 nan -7 53 nan -7 0.0 +0 53 nan -0x1c000000000007p-50 53 nan -7 0xfc339ab0a6b53p-99 +0 53 nan 15 53 nan -0 -15.0 +0 53 nan -0 53 nan -0 0.0 +0 53 nan -15 53 nan -0 15.0 +0 53 nan 0x8000000000001p-51 53 nan +1 -0xb2b3ece0a4ef9p-103 +0 53 nan 1 53 nan +1 0.0 +0 53 nan 0xfffffffffffffp-52 53 nan +1 0xb2b3ece0a4ef9p-103 +0 53 nan +inf 53 nan +inf -0x5acae5c4b6e51p-101 +0 53 nan +inf 53 nan +inf 0.0 +0 53 nan +inf 53 nan +inf 0x5acae5c4b6e51p-101 +0 53 -inf -inf 53 -inf -inf -0x170ef54646d497p-108 +0 53 -inf -inf 53 -inf -inf 0.0 +0 53 -inf -inf 53 -inf -inf 0x170ef54646d497p-108 +2 53 -inf -0x1bffffffffffffp-50 53 -inf -7 -0x170ef54646d497p-107 +0 53 -inf -7 53 -inf -7 0.0 +2 53 -inf -7 53 -inf -7 0x170ef54646d497p-107 +0 53 -inf 0x170ef54646d497p-106 53 -inf -0 -0x170ef54646d497p-106 +0 53 -inf -0 53 -inf -0 0.0 +0 53 -inf -8.0e-17 53 -inf -0 0x170ef54646d497p-106 +2 53 -inf 0x16345785d8a00100 53 -inf 8 -0x16345785d8a00000 +0 53 -inf 8 53 -inf 8 0.0 +2 53 -inf -0x16345785d89fff00 53 -inf 8 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf -0x170ef54646d497p-105 +0 53 -inf +inf 53 -inf +inf 0.0e-17 +0 53 -inf +inf 53 -inf +inf +0x170ef54646d497p-105 +0 53 -inf nan 53 -inf nan -0x170ef54646d497p-104 +0 53 -inf nan 53 -inf nan 0.0e-17 +0 53 -inf nan 53 -inf nan +0x170ef54646d497p-104 +0 53 +0x170ef54646d497p-109 +0x170ef54646d497p-109 + 53 +0 -0 -0x170ef54646d497p-109 +0 53 +0 -0 + 53 +0 -0 0.0 +0 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 + 53 +0 -0 0x170ef54646d497p-109 +2 53 0x114b37f4b51f71p-107 0x10000000000001p-49 + 53 +0 8 -0x114b37f4b51f71p-107 +0 53 +0 8 + 53 +0 8 0.0 +2 53 -0x114b37f4b51f71p-107 8 + 53 +0 8 0x114b37f4b51f71p-107 +0 53 0x50b45a75f7e81p-104 +inf + 53 +0 +inf -0x50b45a75f7e81p-104 +0 53 +0 +inf + 53 +0 +inf 0.0 +0 53 -0x142d169d7dfa03p-106 +inf + 53 +0 +inf 0x142d169d7dfa03p-106 +0 53 +inf +inf 53 +inf +inf -0x170ef54646d497p-109 +0 53 +inf +inf 53 +inf +inf 0.0 +0 53 +inf +inf 53 +inf +inf 0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan -0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan 0.0 +0 53 +inf nan 53 +inf nan 0x170ef54646d497p-109 + +# regular values +0 53 -0x1fb53d14aa9c2fp-47 -0x18353d14aa9c2fp-47 + 53 -32 -17 0xfb53d14aa9c2fp-47 +0 53 +0 0x7353d14aa9c2fp-47 + 53 -0xfb53d14aa9c2fp-47 -17 -0xfb53d14aa9c2fp-47 +0 53 -0x104ac2eb5563d1p-48 -0 + 53 -32 -0xfb53d14aa9c2fp-48 -0xfb53d14aa9c2fp-48 + +0 53 0x15b456789abcdfp-48 0x123456789abd17p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 -3.5 +1 53 0x3923456789abcdp-52 0x123456789abd17p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 -3.5 +2 53 0x18p-4 0x101a3456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 -256.5 +3 53 0xfff8p-4 0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 -4097.5 + +0 53 0xeb456789abcdfp-48 0x123456789abca7p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 3.5 +1 53 -0x36dcba98765434p-52 0x123456789abca7p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 3.5 +2 53 -0x1ff8p-4 -0xff5cba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 256.5 +3 53 -0x10038p-4 -0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 4097.5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub_fr.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub_fr.dat new file mode 100644 index 00000000000..7d7647a0e46 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub_fr.dat @@ -0,0 +1,125 @@ +# data file for mpfi_sub_fr +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 53 -0x170ef54646d497p-109 +0 53 nan nan 53 nan nan 53 +0 +0 53 nan nan 53 nan nan 53 0x170ef54646d497p-109 +0 53 nan -inf 53 nan -inf 53 -0x114b37f4b51f71p-107 +0 53 nan -inf 53 nan -inf 53 -0 +0 53 nan -inf 53 nan -inf 53 0x114b37f4b51f71p-107 +0 53 nan -0x1bfffffffffff8p-50 53 nan -7 53 -0xfc339ab0a6b53p-99 +0 53 nan -7 53 nan -7 53 +0 +0 53 nan -0x1c000000000007p-50 53 nan -7 53 0xfc339ab0a6b53p-99 +0 53 nan 15 53 nan -0 53 -15 +0 53 nan -0 53 nan -0 53 -0 +0 53 nan -15 53 nan -0 53 15 +0 53 nan 0x8000000000001p-51 53 nan +1 53 -0xb2b3ece0a4ef9p-103 +0 53 nan 1 53 nan +1 53 +0 +0 53 nan 0xfffffffffffffp-52 53 nan +1 53 0xb2b3ece0a4ef9p-103 +0 53 nan +inf 53 nan +inf 53 -0x5acae5c4b6e51p-101 +0 53 nan +inf 53 nan +inf 53 -0 +0 53 nan +inf 53 nan +inf 53 0x5acae5c4b6e51p-101 +0 53 -inf -inf 53 -inf -inf 53 -0x170ef54646d497p-108 +0 53 -inf -inf 53 -inf -inf 53 +0 +0 53 -inf -inf 53 -inf -inf 53 0x170ef54646d497p-108 +2 53 -inf -0x1bffffffffffffp-50 53 -inf -7 53 -0x170ef54646d497p-107 +0 53 -inf -7 53 -inf -7 53 -0 +2 53 -inf -7 53 -inf -7 53 0x170ef54646d497p-107 +0 53 -inf 0x170ef54646d497p-106 53 -inf -0 53 -0x170ef54646d497p-106 +0 53 -inf -0 53 -inf -0 53 +0 +0 53 -inf -8e-17 53 -inf -0 53 0x170ef54646d497p-106 +2 53 -inf 0x16345785d8a00100 53 -inf 8 53 -0x16345785d8a00000 +0 53 -inf 8 53 -inf 8 53 -0 +2 53 -inf -0x16345785d89fff00 53 -inf 8 53 0x16345785d8a00000 +0 53 -inf +inf 53 -inf +inf 53 -0x170ef54646d497p-105 +0 53 -inf +inf 53 -inf +inf 53 +0e-17 +0 53 -inf +inf 53 -inf +inf 53 0x170ef54646d497p-105 +0 53 -inf nan 53 -inf nan 53 -0x170ef54646d497p-104 +0 53 -inf nan 53 -inf nan 53 -0e-17 +0 53 -inf nan 53 -inf nan 53 0x170ef54646d497p-104 +0 53 +0x170ef54646d497p-109 +0x170ef54646d497p-109 + 53 +0 -0 + 53 -0x170ef54646d497p-109 +0 53 +0 -0 + 53 +0 -0 + 53 +0 +0 53 -0x170ef54646d497p-109 -0x170ef54646d497p-109 + 53 +0 -0 + 53 0x170ef54646d497p-109 +2 53 0x114b37f4b51f71p-107 0x10000000000001p-49 + 53 +0 8 + 53 -0x114b37f4b51f71p-107 +0 53 +0 8 + 53 +0 8 + 53 -0 +2 53 -0x114b37f4b51f71p-107 8 + 53 +0 8 + 53 0x114b37f4b51f71p-107 +0 53 0x50b45a75f7e81p-104 +inf + 53 +0 +inf + 53 -0x50b45a75f7e81p-104 +0 53 +0 +inf + 53 +0 +inf + 53 -0 +0 53 -0x142d169d7dfa03p-106 +inf + 53 +0 +inf + 53 0x142d169d7dfa03p-106 +0 53 +inf +inf 53 +inf +inf 53 -0x170ef54646d497p-109 +0 53 +inf +inf 53 +inf +inf 53 0 +0 53 +inf +inf 53 +inf +inf 53 0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan 53 -0x170ef54646d497p-109 +0 53 +inf nan 53 +inf nan 53 0 +0 53 +inf nan 53 +inf nan 53 0x170ef54646d497p-109 + +# bug20111222 +3 53 -0x170ef54646d498p-109 -0x170ef54646d497p-109 + 53 +0 -0 + 54 0x170ef54646d4978p-113 + +# regular values +0 53 -0x1fb53d14aa9c2fp-47 -0x18353d14aa9c2fp-47 + 53 -32 -17 + 53 0xfb53d14aa9c2fp-47 +0 53 +0 0x7353d14aa9c2fp-47 + 53 -0xfb53d14aa9c2fp-47 -17 + 53 -0xfb53d14aa9c2fp-47 +0 53 -0x104ac2eb5563d1p-48 -0 + 53 -32 -0xfb53d14aa9c2fp-48 + 53 -0xfb53d14aa9c2fp-48 + +0 53 0x15b456789abcdfp-48 0x123456789abd17p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 + 53 -3.5 +1 53 0x3923456789abcdp-52 0x123456789abd17p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 + 53 -3.5 +2 53 0x18p-4 0x101a3456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 + 53 -256.5 +3 53 0xfff8p-4 0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 + 53 -4097.5 + +0 53 0xeb456789abcdfp-48 0x123456789abca7p-4 + 53 0x123456789abcdfp-48 0x123456789abcdfp-4 + 53 3.5 +1 53 -0x36dcba98765434p-52 0x123456789abca7p-4 + 53 0x123456789abcdfp-56 0x123456789abcdfp-4 + 53 3.5 +2 53 -0x1ff8p-4 -0xff5cba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 + 53 256.5 +3 53 -0x10038p-4 -0x10018p-4 + 53 -0x1fffffffffffffp-52 -0x1p-550 + 53 4097.5 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub_q.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub_q.dat new file mode 100644 index 00000000000..8a6d1d00f24 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub_q.dat @@ -0,0 +1,117 @@ +# data file for mpfi_sub_q +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1/1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1/1 +0 53 nan -inf 53 nan -inf -3/1 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3/1 +0 53 nan -0 53 nan -7 -7/1 +0 53 nan -7 53 nan -7 0 +0 53 nan -14 53 nan -7 7/1 +0 53 nan +15 53 nan -0 -15/1 +0 53 nan -0 53 nan -0 0 +0 53 nan -15 53 nan -0 15/1 +0 53 nan 32 53 nan 1 -31/1 +0 53 nan 1 53 nan 1 0 +0 53 nan -30 53 nan 1 31/1 +0 53 nan +inf 53 nan +inf -63/1 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63/1 +0 53 -inf -inf 53 -inf -inf -2/1 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2/1 +0 53 -inf -3 53 -inf -7 -4/1 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -11 53 -inf -7 4/1 + +2 53 -inf -0x1b6db6db6db6dbp-50 + 53 -inf -7 -1/7 +2 53 -inf -0x1c924924924924p-50 + 53 -inf -7 1/7 +2 53 -inf -0x1fffffffffffffp+17 + 53 -inf -0x1p+70 -7/1 +2 53 -inf -0x1p+70 + 53 -inf -0x1p+70 7/1 + +0 53 -inf 8 53 -inf -0 -8/1 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -8 53 -inf -0 8/1 +0 53 -inf 24 53 -inf 8 -16/1 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf -8 53 -inf 8 16/1 +0 53 -inf +inf 53 -inf +inf -32/1 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32/1 +0 53 -inf nan 53 -inf nan -64/1 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64/1 +0 53 1 1 53 +0 -0 -1/1 +0 53 +0 -0 53 +0 -0 0 +0 53 -1 -1 53 +0 -0 1/1 +0 53 3 11 53 +0 8 -3/1 +0 53 +0 8 53 +0 8 0 +0 53 -3 5 53 +0 8 3/1 +0 53 7 +inf 53 +0 +inf -7/1 +0 53 +0 +inf 53 +0 +inf 0 +0 53 -7 +inf 53 +0 +inf 7/1 + +1 53 0x12492492492492p-55 +inf + 53 +0 +inf -1/7 +1 53 -0x12492492492493p-55 +inf + 53 +0 +inf 1/7 +1 53 0x1p+70 +inf + 53 0x1p+70 +inf -7/1 +1 53 0x1fffffffffffffp+17 +inf + 53 0x1p+70 +inf 7/1 + +0 53 +inf +inf 53 +inf +inf -1/1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1/1 +0 53 +inf nan 53 +inf nan -1/1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1/1 + +# regular values +0 53 -64 -49 53 -32 -17 32/1 +0 53 +0 +15 53 -32 -17 -32/1 +0 53 -15 -0 53 -32 -17 -17/1 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf -3/1 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf -3/1 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 -256/1 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 -0x1001/1 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf 3/1 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf 3/1 +2 53 -0x1ff -0xfedcba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 256/1 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001/1 + +# the precision of the result is too small for the mpq value +3 4 +0.3125 +10 53 -20 -11 -61/3 +3 4 +0.3125 16 53 -32 -17 -97/3 +0 4 -15 -1 53 -32 -18 -17/1 +1 3 -16 -1 53 -32 -18 -17/1 + + + diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub_si.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub_si.dat new file mode 100644 index 00000000000..8eece85d1cb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub_si.dat @@ -0,0 +1,92 @@ +# data file for mpfi_sub_si +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf -3 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -0 53 nan -7 -7 +0 53 nan -7 53 nan -7 0 +0 53 nan -14 53 nan -7 7 +0 53 nan +15 53 nan -0 -15 +0 53 nan -0 53 nan -0 0 +0 53 nan -15 53 nan -0 15 +0 53 nan 32 53 nan 1 -31 +0 53 nan 1 53 nan 1 0 +0 53 nan -30 53 nan 1 31 +0 53 nan +inf 53 nan +inf -63 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf -2 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf +2 +0 53 -inf -3 53 -inf -7 -4 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -11 53 -inf -7 4 + +2 53 -inf -0x1p+70 + 53 -inf -0x1p+70 1 + +0 53 -inf 8 53 -inf -0 -8 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -8 53 -inf -0 8 +0 53 -inf 24 53 -inf 8 -16 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf -8 53 -inf 8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf +32 +0 53 -inf nan 53 -inf nan -64 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan +64 +0 53 1 1 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 -1 -1 53 +0 -0 1 +0 53 3 11 53 +0 +8 -3 +0 53 +0 8 53 +0 +8 0 +0 53 -3 5 53 +0 +8 3 +0 53 7 +inf 53 +0 +inf -7 +0 53 +0 +inf 53 +0 +inf 0 +0 53 -7 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf -1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan -1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -64 -49 53 -32 -17 32 +0 53 +0 +15 53 -32 -17 -32 +0 53 -15 -0 53 -32 -17 -17 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf -3 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf -3 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 -256 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 -0x1001 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf 3 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf 3 +2 53 -0x1ff -0xfedcba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 256 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub_ui.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub_ui.dat new file mode 100644 index 00000000000..b2386f40ec3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub_ui.dat @@ -0,0 +1,63 @@ +# data file for mpfi_sub_ui +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -7 53 nan -7 0 +0 53 nan -14 53 nan -7 7 +0 53 nan -0 53 nan -0 0 +0 53 nan -15 53 nan -0 15 +0 53 nan 1 53 nan 1 0 +0 53 nan -30 53 nan 1 31 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 1 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -8 53 -inf -7 1 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -2 53 -inf -0 2 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf 4 53 -inf 8 4 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 4 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 8 +0 53 +0 -0 53 +0 -0 0 +0 53 -1 -1 53 +0 -0 1 +0 53 +0 8 53 +0 8 0 +0 53 -3 5 53 +0 8 3 +0 53 +0 +inf 53 +0 +inf 0 +0 53 -7 +inf 53 +0 +inf 7 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -64 -49 53 -32 -17 32 +0 53 -49 -34 53 -32 -17 17 +0 53 -15 -0 53 17 32 32 +0 53 +0 15 53 17 32 17 + +0 53 0x0f3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf 3 +1 53 -0x176e5d4c3b2a1ap-51 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf 3 +2 53 -0x1ff -0x1fdb97530eca86p-45 + 53 -0xff 0x123456789abcdfp-52 256 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/sub_z.dat b/Build/source/libs/mpfi/mpfi-src/tests/sub_z.dat new file mode 100644 index 00000000000..55070805d6c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/sub_z.dat @@ -0,0 +1,106 @@ +# data file for mpfi_sub_z +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of first parameter +# 6: left endpoint value of first parameter +# 7: right endpoint value of first parameter +# 8: second parameter value + +# special values +0 53 nan nan 53 nan nan -1 +0 53 nan nan 53 nan nan 0 +0 53 nan nan 53 nan nan 1 +0 53 nan -inf 53 nan -inf -3 +0 53 nan -inf 53 nan -inf 0 +0 53 nan -inf 53 nan -inf 3 +0 53 nan -0 53 nan -7 -7 +0 53 nan -7 53 nan -7 0 +0 53 nan -14 53 nan -7 7 +0 53 nan +15 53 nan -0 -15 +0 53 nan -0 53 nan -0 0 +0 53 nan -15 53 nan -0 15 +0 53 nan 32 53 nan 1 -31 +0 53 nan 1 53 nan 1 0 +0 53 nan -30 53 nan 1 31 +0 53 nan +inf 53 nan +inf -63 +0 53 nan +inf 53 nan +inf 0 +0 53 nan +inf 53 nan +inf 63 +0 53 -inf -inf 53 -inf -inf -2 +0 53 -inf -inf 53 -inf -inf 0 +0 53 -inf -inf 53 -inf -inf 2 +0 53 -inf -3 53 -inf -7 -4 +0 53 -inf -7 53 -inf -7 0 +0 53 -inf -11 53 -inf -7 4 + +2 53 -inf -0x1fffffffffffffp+17 + 53 -inf -0x1p+70 -7 +2 53 -inf -0x1p+70 + 53 -inf -0x1p+70 7 + +0 53 -inf 8 53 -inf -0 -8 +0 53 -inf -0 53 -inf -0 0 +0 53 -inf -8 53 -inf -0 8 +0 53 -inf 24 53 -inf 8 -16 +0 53 -inf 8 53 -inf 8 0 +0 53 -inf -8 53 -inf 8 16 +0 53 -inf +inf 53 -inf +inf -32 +0 53 -inf +inf 53 -inf +inf 0 +0 53 -inf +inf 53 -inf +inf 32 +0 53 -inf nan 53 -inf nan -64 +0 53 -inf nan 53 -inf nan 0 +0 53 -inf nan 53 -inf nan 64 +0 53 1 1 53 +0 -0 -1 +0 53 +0 -0 53 +0 -0 0 +0 53 -1 -1 53 +0 -0 1 +0 53 3 11 53 +0 8 -3 +0 53 +0 8 53 +0 8 0 +0 53 -3 5 53 +0 8 3 +0 53 7 +inf 53 +0 +inf -7 +0 53 +0 +inf 53 +0 +inf 0 +0 53 -7 +inf 53 +0 +inf 7 + +1 53 0x1p+70 +inf + 53 0x1p+70 +inf -7 +1 53 0x1fffffffffffffp+17 +inf + 53 0x1p+70 +inf 7 + +0 53 +inf +inf 53 +inf +inf -1 +0 53 +inf +inf 53 +inf +inf 0 +0 53 +inf +inf 53 +inf +inf 1 +0 53 +inf nan 53 +inf nan -1 +0 53 +inf nan 53 +inf nan 0 +0 53 +inf nan 53 +inf nan 1 + +# regular values +0 53 -64 -49 53 -32 -17 32 +0 53 +0 +15 53 -32 -17 -32 +0 53 -15 -0 53 -32 -17 -17 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 53 0x123456789abcdfp-48 0x123456789abcdf -3 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 53 0x123456789abcdfp-56 0x123456789abcdf -3 +2 53 1 0x10123456789abdp-44 + 53 -0xff 0x123456789abcdfp-52 -256 +3 53 0xfff 0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 -0x1001 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + 53 0x123456789abcdfp-48 0x123456789abcdf 3 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + 53 0x123456789abcdfp-56 0x123456789abcdf 3 +2 53 -0x1ff -0xfedcba9876543p-44 + 53 -0xff 0x123456789abcdfp-52 256 +3 53 -0x1003 -0x1001 + 53 -0x1fffffffffffffp-52 -0x1p-550 0x1001 + +# the precision of the result is too small for the mpz value +2 4 1 30 53 -32 -4 -33 +2 3 1 32 53 -32 -4 -33 +0 4 -15 -1 53 -32 -18 -17 +1 3 -16 -1 53 -32 -18 -17 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tabs.c b/Build/source/libs/mpfi/mpfi-src/tests/tabs.c new file mode 100644 index 00000000000..11905f4b591 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tabs.c @@ -0,0 +1,44 @@ +/* tabs.c -- Test mpfi_abs. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_abs; + + mpfi_fun_init_II (&i_abs, mpfi_abs, mpfr_abs); + test_start (); + + check_data (&i_abs, "abs.dat"); + check_random (&i_abs, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_abs); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tacos.c b/Build/source/libs/mpfi/mpfi-src/tests/tacos.c new file mode 100644 index 00000000000..57845d41f6d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tacos.c @@ -0,0 +1,44 @@ +/* tacos.c -- Test mpfi_acos. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_acos; + + mpfi_fun_init_II (&i_acos, mpfi_acos, mpfr_acos); + test_start (); + + check_data (&i_acos, "acos.dat"); + check_random (&i_acos, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_acos); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tacosh.c b/Build/source/libs/mpfi/mpfi-src/tests/tacosh.c new file mode 100644 index 00000000000..c36800656e9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tacosh.c @@ -0,0 +1,44 @@ +/* tacosh.c -- Test mpfi_acosh. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_acosh; + + mpfi_fun_init_II (&i_acosh, mpfi_acosh, mpfr_acosh); + test_start (); + + check_data (&i_acosh, "acosh.dat"); + check_random (&i_acosh, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_acosh); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd.c new file mode 100644 index 00000000000..578b3d9a1c4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd.c @@ -0,0 +1,45 @@ +/* tadd.c -- Test mpfi_add. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add; + + mpfi_fun_init_III (&i_add, mpfi_add, mpfr_add); + + test_start (); + + check_data (&i_add, "add.dat"); + check_random (&i_add, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_add); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd_d.c new file mode 100644 index 00000000000..4f5b5cd8f1c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd_d.c @@ -0,0 +1,96 @@ +/* tadd_d.c -- Test mpfi_add_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +static void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_add_d (a, a, +1.1); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_add_d does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_d does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_add_d (a, a, -1.1); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_add_d does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_d does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add_d; + + mpfi_fun_init_IID (&i_add_d, mpfi_add_d, mpfr_add_d); + test_start (); + + check_data (&i_add_d, "add_d.dat"); + check_random (&i_add_d, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_add_d); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd_fr.c new file mode 100644 index 00000000000..4ed7c5dfd5e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd_fr.c @@ -0,0 +1,101 @@ +/* tadd_fr.c -- Test mpfi_add_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +static void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpfr_t b; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_init2 (b, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + mpfr_set_ui (b, +1, MPFI_RNDD); + + inexact = mpfi_add_fr (a, a, b); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_add_fr does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_fr does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpfr_set_si (b, -1, MPFI_RNDD); + + inexact = mpfi_add_fr (a, a, b); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_add_fr does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_fr does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (b); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add_fr; + + test_start (); + mpfi_fun_init_IIR (&i_add_fr, mpfi_add_fr, mpfr_add); + + check_data (&i_add_fr, "add_fr.dat"); + check_overflow (); + check_random (&i_add_fr, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_add_fr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd_q.c new file mode 100644 index 00000000000..76e370bc3aa --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd_q.c @@ -0,0 +1,98 @@ +/* tadd_q.c -- Test mpfi_add_q. + +Copyright 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpq_t q; + int inexact; + + mpq_init (q); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + + mpq_set_ui (q, 42, 17); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_add_q (a, a, q); + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_add_q does not correctly handle overflow.\n"); + exit (1); + } + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_q does not return correct value " + "when overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpq_set_si (q, -42, 17); + + inexact = mpfi_add_q (a, a, q); + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_add_q does not correctly handle negative " + "overflow.\n"); + exit (1); + } + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_q does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); + mpq_clear (q); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add_q; + + mpfi_fun_init_IIQ (&i_add_q, mpfi_add_q, mpfr_add_q); + test_start (); + + check_data (&i_add_q, "add_q.dat"); + + if (getenv ("MPFI_CHECK_EXPENSIVE_OVERFLOW") != NULL) + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_add_q); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd_si.c new file mode 100644 index 00000000000..c268c09b1d2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd_si.c @@ -0,0 +1,97 @@ +/* tadd_si.c -- Test mpfi_add_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_add_si (a, a, +1); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_add_si does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_si does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_add_si (a, a, -1); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_add_si does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_si does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add_si; + + mpfi_fun_init_IIS (&i_add_si, mpfi_add_si, mpfr_add_si); + + test_start (); + + check_data (&i_add_si, "add_si.dat"); + check_random (&i_add_si, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_add_si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd_ui.c new file mode 100644 index 00000000000..ebc23b1043d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd_ui.c @@ -0,0 +1,77 @@ +/* tadd_ui.c -- Test mpfi_add_ui. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_add_ui (a, a, +1); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_add_ui does not correctly handle overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_ui does not return correct value " + "when overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add_ui; + + mpfi_fun_init_IIU (&i_add_ui, mpfi_add_ui, mpfr_add_ui); + + test_start (); + + check_data (&i_add_ui, "add_ui.dat"); + check_random (&i_add_ui, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_add_ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tadd_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tadd_z.c new file mode 100644 index 00000000000..7cd21ec1651 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tadd_z.c @@ -0,0 +1,97 @@ +/* tadd_z.c -- Test mpfi_add_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpz_t n; + int inexact; + + mpz_init (n); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + + mpz_set_ui (n, 17); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_add_z (a, a, n); + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_add_z does not correctly handle overflow.\n"); + exit (1); + } + if (!MPFI_RIGHT_IS_INEXACT (inexact) || MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_z does not return correct value " + "when overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpz_set_si (n, -17); + + inexact = mpfi_add_z (a, a, n); + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_add_z does not correctly handle negative " + "overflow.\n"); + exit (1); + } + if (!MPFI_LEFT_IS_INEXACT (inexact) || MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_add_z does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); + mpz_clear (n); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_add_z; + + mpfi_fun_init_IIZ (&i_add_z, mpfi_add_z, mpfr_add_z); + test_start (); + + check_data (&i_add_z, "add_z.dat"); + check_overflow (); + check_random (&i_add_z, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_add_z); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tan.dat b/Build/source/libs/mpfi/mpfi-src/tests/tan.dat new file mode 100644 index 00000000000..bc8ae6ccee7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tan.dat @@ -0,0 +1,167 @@ +# data file for mpfi_tan +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan nan 53 nan -inf +0 53 nan nan 53 -7 nan +0 53 nan nan 53 nan -0 +0 53 nan nan 53 +0 nan +0 53 nan nan 53 -inf nan +0 53 nan nan 53 -inf -inf +0 53 -inf +inf 53 -inf -7 +0 53 -inf +inf 53 -inf -0 +0 53 -inf +inf 53 -inf +8 +0 53 -inf +inf 53 -inf +inf +1 53 -0x18eb245cbee3a6p-52 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x18eb245cbee3a6p-52 53 +0 +1 +0 53 -inf +inf 53 +0 +8 +0 53 -inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf + +# regular values +0 53 -inf +inf 53 0.125 17 +0 53 -inf +inf + 53 0x1921fb54442d18p-52 0x1921fb54442d19p-52 +0 53 -inf +inf 53 -2 -0.5 +0 53 -inf +inf 53 -4.5 0.625 +3 53 -0x18eb245cbee3a6p-52 -0x105785a43c4c55p-54 53 -1 -0.25 +3 53 -0x117b4f5bf3474bp-53 0x117b4f5bf3474bp-53 53 -0.5 0.5 +3 53 -0x1c8dc87ddcc134p-55 -0x1c8dc87ddcc133p-55 + 53 0x71p+76 0x71p+76 + +0 53 -inf +inf 53 -7 7 +0 53 -inf +inf 53 -7 6 +0 53 -inf +inf 53 -7 5 +0 53 -inf +inf 53 -7 4 +0 53 -inf +inf 53 -7 3 +0 53 -inf +inf 53 -7 2 +0 53 -inf +inf 53 -7 1 +0 53 -inf +inf 53 -7 -0 +0 53 -inf +inf 53 -7 -1 +0 53 -inf +inf 53 -7 -2 +0 53 -inf +inf 53 -7 -3 +0 53 -inf +inf 53 -7 -4 +3 53 -0x1be2e6e13eea79p-53 0x1b0b4b739bbb07p-51 53 -7 -5 +3 53 -0x1be2e6e13eea79p-53 0x129fd86ebb95bfp-54 53 -7 -6 +3 53 -0x1be2e6e13eea79p-53 -0x1be2e6e13eea78p-53 53 -7 -7 + +0 53 -inf +inf 53 -6 7 +0 53 -inf +inf 53 -6 6 +0 53 -inf +inf 53 -6 5 +0 53 -inf +inf 53 -6 4 +0 53 -inf +inf 53 -6 3 +0 53 -inf +inf 53 -6 2 +0 53 -inf +inf 53 -6 1 +0 53 -inf +inf 53 -6 -0 +0 53 -inf +inf 53 -6 -1 +0 53 -inf +inf 53 -6 -2 +0 53 -inf +inf 53 -6 -3 +0 53 -inf +inf 53 -6 -4 +3 53 0x129fd86ebb95bep-54 0x1b0b4b739bbb07p-51 53 -6 -5 +3 53 0x129fd86ebb95bep-54 0x129fd86ebb95bfp-54 53 -6 -6 + +0 53 -inf +inf 53 -5 7 +0 53 -inf +inf 53 -5 6 +0 53 -inf +inf 53 -5 5 +0 53 -inf +inf 53 -5 4 +0 53 -inf +inf 53 -5 3 +0 53 -inf +inf 53 -5 2 +0 53 -inf +inf 53 -5 1 +0 53 -inf +inf 53 -5 -0 +0 53 -inf +inf 53 -5 -1 +0 53 -inf +inf 53 -5 -2 +0 53 -inf +inf 53 -5 -3 +0 53 -inf +inf 53 -5 -4 +3 53 0x1b0b4b739bbb06p-51 0x1b0b4b739bbb07p-51 53 -5 -5 + +0 53 -inf +inf 53 -4 7 +0 53 -inf +inf 53 -4 6 +0 53 -inf +inf 53 -4 5 +0 53 -inf +inf 53 -4 4 +0 53 -inf +inf 53 -4 3 +0 53 -inf +inf 53 -4 2 +0 53 -inf +inf 53 -4 1 +0 53 -inf +inf 53 -4 -0 +0 53 -inf +inf 53 -4 -1 +3 53 -0x12866f9be4de14p-52 0x117af62e0950f9p-51 53 -4 -2 +3 53 -0x12866f9be4de14p-52 0x123ef71254b870p-55 53 -4 -3 +3 53 -0x12866f9be4de14p-52 -0x12866f9be4de13p-52 53 -4 -4 + +0 53 -inf +inf 53 -3 7 +0 53 -inf +inf 53 -3 6 +0 53 -inf +inf 53 -3 5 +0 53 -inf +inf 53 -3 4 +0 53 -inf +inf 53 -3 3 +0 53 -inf +inf 53 -3 2 +0 53 -inf +inf 53 -3 1 +0 53 -inf +inf 53 -3 -0 +0 53 -inf +inf 53 -3 -1 +3 53 0x123ef71254b86fp-55 0x117af62e0950f9p-51 53 -3 -2 +3 53 0x123ef71254b86fp-55 0x123ef71254b870p-55 53 -3 -3 + +0 53 -inf +inf 53 -2 7 +0 53 -inf +inf 53 -2 6 +0 53 -inf +inf 53 -2 5 +0 53 -inf +inf 53 -2 4 +0 53 -inf +inf 53 -2 3 +0 53 -inf +inf 53 -2 2 +0 53 -inf +inf 53 -2 1 +0 53 -inf +inf 53 -2 -0 +0 53 -inf +inf 53 -2 -1 +3 53 0x117af62e0950f8p-51 0x117af62e0950f9p-51 53 -2 -2 + +0 53 -inf +inf 53 -1 7 +0 53 -inf +inf 53 -1 6 +0 53 -inf +inf 53 -1 5 +0 53 -inf +inf 53 -1 4 +0 53 -inf +inf 53 -1 3 +0 53 -inf +inf 53 -1 2 +3 53 -0x18eb245cbee3a6p-52 0x18eb245cbee3a6p-52 53 -1 1 +1 53 -0x18eb245cbee3a6p-52 -0 53 -1 -0 +3 53 -0x18eb245cbee3a6p-52 -0x18eb245cbee3a5p-52 53 -1 -1 + +0 53 -inf +inf 53 1 7 +0 53 -inf +inf 53 1 6 +0 53 -inf +inf 53 1 5 +0 53 -inf +inf 53 1 4 +0 53 -inf +inf 53 1 3 +0 53 -inf +inf 53 1 2 +3 53 0x18eb245cbee3a5p-52 0x18eb245cbee3a6p-52 53 1 1 + +0 53 -inf +inf 53 2 7 +0 53 -inf +inf 53 2 6 +0 53 -inf +inf 53 2 5 +3 53 -0x117af62e0950f9p-51 0x12866f9be4de14p-52 53 2 4 +3 53 -0x117af62e0950f9p-51 -0x123ef71254b86fp-55 53 2 3 +3 53 -0x117af62e0950f9p-51 -0x117af62e0950f8p-51 53 2 2 + +0 53 -inf +inf 53 3 7 +0 53 -inf +inf 53 3 6 +0 53 -inf +inf 53 3 5 +3 53 -0x123ef71254b870p-55 0x12866f9be4de14p-52 53 3 4 +3 53 -0x123ef71254b870p-55 -0x123ef71254b86fp-55 53 3 3 + +0 53 -inf +inf 53 4 7 +0 53 -inf +inf 53 4 6 +0 53 -inf +inf 53 4 5 +3 53 0x12866f9be4de13p-52 0x12866f9be4de14p-52 53 4 4 + +3 53 -0x1b0b4b739bbb07p-51 0x1be2e6e13eea79p-53 53 5 7 +3 53 -0x1b0b4b739bbb07p-51 -0x129fd86ebb95bep-54 53 5 6 +3 53 -0x1b0b4b739bbb07p-51 -0x1b0b4b739bbb06p-51 53 5 5 + +3 53 -0x129fd86ebb95bfp-54 0x1be2e6e13eea79p-53 53 6 7 +3 53 -0x129fd86ebb95bfp-54 -0x129fd86ebb95bep-54 53 6 6 + +3 53 0x1be2e6e13eea78p-53 0x1be2e6e13eea79p-53 53 7 7 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tanh.dat b/Build/source/libs/mpfi/mpfi-src/tests/tanh.dat new file mode 100644 index 00000000000..336f253b924 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tanh.dat @@ -0,0 +1,37 @@ +# data file for mpfi_tanh +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: precision of input parameter +# 6: left endpoint value of input parameter +# 7: right endpoint value of input parameter + +# special values +0 53 nan nan 53 nan nan +0 53 nan -1 53 nan -inf +0 53 -0x1ffffc832750f2p-53 nan 53 -7 nan +0 53 nan -0 53 nan -0 +0 53 +0 nan 53 +0 nan +0 53 -1 nan 53 -inf nan +0 53 -1 -1 53 -inf -inf +2 53 -1 -0x1ffffc832750f1p-53 53 -inf -7 +0 53 -1 -0 53 -inf -0 +2 53 -1 0x1fffff872a91f9p-53 53 -inf 8 +0 53 -1 +1 53 -inf +inf +1 53 -0x185efab514f395p-53 -0 53 -1 -0 +0 53 +0 -0 53 +0 -0 +2 53 +0 0x185efab514f395p-53 53 +0 1 +2 53 +0 0x1fffff872a91f9p-53 53 +0 8 +0 53 +0 +1 53 +0 +inf +0 53 +1 +1 53 +inf +inf + +# regular values +1 53 -0x1fd5992bc4b835p-56 -0 53 -0.125 -0 +2 53 +0 0x1d9353d7568af5p-54 53 0 0x10000000000001p-53 +3 53 -0x1ffdfa72153984p-53 -0x11bf47eabb8f95p-53 53 -4.5 -0.625 +3 53 0x185efab514f394p-53 0x1fd77d111a0b00p-53 53 1 3 +3 53 0x1fffffffffffe1p-53 0x1ffffffffffffcp-53 53 17 18 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tasin.c b/Build/source/libs/mpfi/mpfi-src/tests/tasin.c new file mode 100644 index 00000000000..86cb8940fd1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tasin.c @@ -0,0 +1,44 @@ +/* tasin.c -- Test mpfi_asin. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_asin; + + mpfi_fun_init_II (&i_asin, mpfi_asin, mpfr_asin); + test_start (); + + check_data (&i_asin, "asin.dat"); + check_random (&i_asin, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_asin); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tasinh.c b/Build/source/libs/mpfi/mpfi-src/tests/tasinh.c new file mode 100644 index 00000000000..405b582f3ee --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tasinh.c @@ -0,0 +1,44 @@ +/* tasinh.c -- Test mpfi_asinh. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_asinh; + + mpfi_fun_init_II (&i_asinh, mpfi_asinh, mpfr_asinh); + test_start (); + + check_data (&i_asinh, "asinh.dat"); + check_random (&i_asinh, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_asinh); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tatan.c b/Build/source/libs/mpfi/mpfi-src/tests/tatan.c new file mode 100644 index 00000000000..37f84a38238 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tatan.c @@ -0,0 +1,44 @@ +/* tatan.c -- Test mpfi_atan. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_atan; + + mpfi_fun_init_II (&i_atan, mpfi_atan, mpfr_atan); + test_start (); + + check_data (&i_atan, "atan.dat"); + check_random (&i_atan, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_atan); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tatan2.c b/Build/source/libs/mpfi/mpfi-src/tests/tatan2.c new file mode 100644 index 00000000000..7fb3fac1d6d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tatan2.c @@ -0,0 +1,45 @@ +/* tatan2.c -- Test mpfi_atan2. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_atan2; + + mpfi_fun_init_III (&i_atan2, mpfi_atan2, mpfr_atan2); + + test_start (); + + check_data (&i_atan2, "atan2.dat"); + check_random (&i_atan2, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_atan2); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tatanh.c b/Build/source/libs/mpfi/mpfi-src/tests/tatanh.c new file mode 100644 index 00000000000..ab242e2d853 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tatanh.c @@ -0,0 +1,44 @@ +/* tatanh.c -- Test mpfi_atanh. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_atanh; + + mpfi_fun_init_II (&i_atanh, mpfi_atanh, mpfr_atanh); + test_start (); + + check_data (&i_atanh, "atanh.dat"); + check_random (&i_atanh, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_atanh); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tbisect.c b/Build/source/libs/mpfi/mpfi-src/tests/tbisect.c new file mode 100644 index 00000000000..65eaf7ee618 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tbisect.c @@ -0,0 +1,164 @@ +/* tbisect.c -- Test mpfi_bisect. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; +extern unsigned long line_number; +unsigned long test_line_number; /* start line of a test */ + +static void +check (mpfi_ptr left, mpfi_ptr right, mpfi_srcptr interval, + mpfi_srcptr expected_left, mpfi_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_bisect (left, right, interval); + if (inex != expected_inex || !same_value (left, expected_left) + || !same_value (right, expected_right)) + { + printf ("Failed line %lu.\n interval: ", test_line_number); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\n returned left: "); + mpfi_out_str (stdout, 16, 0, left); + printf ("\nreturned right: "); + mpfi_out_str (stdout, 16, 0, right); + printf ("\n expected left: "); + mpfi_out_str (stdout, 16, 0, expected_left); + printf ("\nexpected right: "); + mpfi_out_str (stdout, 16, 0, expected_right); + printf ("\n"); + if (inex != expected_inex) { + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + } + + exit (1); + } + + + /* reuse variable tests */ + + if (mpfi_get_prec (interval) == mpfi_get_prec (expected_left)) + { + mpfi_set (left, interval); + inex = mpfi_bisect (left, right, left); + if (inex != expected_inex || !same_value (left, expected_left) + || !same_value (right, expected_right)) + { + printf ("Error when reusing input argument as first output " + "(line %lu).\n interval: ", test_line_number); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\n returned left: "); + mpfi_out_str (stdout, 16, 0, left); + printf ("\nreturned right: "); + mpfi_out_str (stdout, 16, 0, right); + printf ("\n expected left: "); + mpfi_out_str (stdout, 16, 0, expected_left); + printf ("\nexpected right: "); + mpfi_out_str (stdout, 16, 0, expected_right); + printf ("\n"); + if (inex != expected_inex) { + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + } + + exit (1); + } + } + + if (mpfi_get_prec (interval) == mpfi_get_prec (expected_right)) + { + mpfi_set (right, interval); + inex = mpfi_bisect (left, right, right); + if (inex != expected_inex || !same_value (left, expected_left) + || !same_value (right, expected_right)) + { + printf ("Error when reusing input argument as second output " + "(line %lu).\n interval: ", test_line_number); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\n returned left: "); + mpfi_out_str (stdout, 16, 0, left); + printf ("\nreturned right: "); + mpfi_out_str (stdout, 16, 0, right); + printf ("\n expected left: "); + mpfi_out_str (stdout, 16, 0, expected_left); + printf ("\nexpected right: "); + mpfi_out_str (stdout, 16, 0, expected_right); + printf ("\n"); + if (inex != expected_inex) { + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + } + + exit (1); + } + } +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + mpfi_t left; + mpfi_t right; + mpfi_t expected_left; + mpfi_t expected_right; + + int retval; + + mpfi_init2 (interval, 1024); + mpfi_init2 (left, 1024); + mpfi_init2 (right, 1024); + mpfi_init2 (expected_left, 1024); + mpfi_init2 (expected_right, 1024); + + stream = open_file ("bisect.dat"); + init_reading (stream); + + while (nextchar != EOF) { + test_line_number = line_number; + read_sign (stream, &retval); + read_mpfi (stream, expected_left); + mpfi_set_prec (left, mpfi_get_prec (expected_left)); + read_mpfi (stream, expected_right); + mpfi_set_prec (right, mpfi_get_prec (expected_right)); + read_mpfi (stream, interval); + + check (left, right, interval, expected_left, expected_right, retval); + } + + close_file (stream); + mpfi_clear (interval); + mpfi_clear (left); + mpfi_clear (right); + mpfi_clear (expected_left); + mpfi_clear (expected_right); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tblow.c b/Build/source/libs/mpfi/mpfi-src/tests/tblow.c new file mode 100644 index 00000000000..bcced78617b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tblow.c @@ -0,0 +1,43 @@ +/* tblow.c -- Test mpfi_blow. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_blow; + + mpfi_fun_init_IID (&i_blow, mpfi_blow, NULL); + test_start (); + + check_data (&i_blow, "blow.dat"); + + test_end (); + mpfi_fun_clear (&i_blow); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tbounded_p.c b/Build/source/libs/mpfi/mpfi-src/tests/tbounded_p.c new file mode 100644 index 00000000000..803c637ce8d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tbounded_p.c @@ -0,0 +1,69 @@ +/* tbounded_p.c -- Test mpfi_bounded_p. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_bounded_p (A) returns %d\nA = ", + mpfi_bounded_p (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("bounded_p.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_bounded_p (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcbrt.c b/Build/source/libs/mpfi/mpfi-src/tests/tcbrt.c new file mode 100644 index 00000000000..c12b63c5e7c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcbrt.c @@ -0,0 +1,44 @@ +/* tcbrt.c -- Test mpfi_cbrt. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_cbrt; + + mpfi_fun_init_II (&i_cbrt, mpfi_cbrt, mpfr_cbrt); + test_start (); + + check_data (&i_cbrt, "cbrt.dat"); + check_random (&i_cbrt, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_cbrt); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp.c new file mode 100644 index 00000000000..78f18089de9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp.c @@ -0,0 +1,136 @@ +/* tcmp.c -- Test mpfi_cmp. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpfr_cmp ((min), (max)) > 0) \ + mpfr_swap ((min), (max)); \ + } while (0) + +void +print_error (mpfi_srcptr a, mpfi_srcptr b) +{ + printf ("Error: mpfi_cmp (A, B) returns %d\nA = ", + mpfi_cmp (a, b)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nB = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t i1, i2; + mpfr_t a, b, c, d; + int cmp; + int i; + + mpfr_init2 (a, 53); + mpfr_init2 (b, 53); + mpfr_init2 (c, 53); + mpfr_init2 (d, 53); + mpfi_init2 (i1, 53); + mpfi_init2 (i2, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpfr (a); + random_mpfr (b); + random_mpfr (c); + random_mpfr (d); + ORDER (a, b); + ORDER (a, c); + ORDER (a, d); + ORDER (b, c); + ORDER (b, d); + ORDER (c, d); + + mpfi_interv_fr (i1, a, b); + mpfi_interv_fr (i2, c, d); + cmp = mpfi_cmp (i1, i2); + if (cmp > 0 || (cmp == 0 && !mpfr_equal_p (b, c))) { + print_error (i1, i2); + } + cmp = mpfi_cmp (i2, i1); + if (cmp < 0 || (cmp == 0 && !mpfr_equal_p (b, c))) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_cmp (i1, i2) != 1) { + print_error (i1, i2); + } + + mpfi_interv_fr (i1, a, c); + mpfi_interv_fr (i2, b, d); + if (mpfi_cmp (i1, i2) != 0) { + print_error (i1, i2); + } + if (mpfi_cmp (i2, i1) != 0) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_cmp (i1, i2) != 1) { + print_error (i1, i2); + } + + mpfi_interv_fr (i1, a, d); + mpfi_interv_fr (i2, b, c); + if (mpfi_cmp (i1, i2) != 0) { + print_error (i1, i2); + } + if (mpfi_cmp (i2, i1) != 0) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_cmp (i2, i1) != 1) { + print_error (i2, i1); + } + } + + mpfr_clear (a); + mpfr_clear (b); + mpfr_clear (c); + mpfr_clear (d); + mpfi_clear (i1); + mpfi_clear (i2); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_d.c new file mode 100644 index 00000000000..f9da54925f7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_d.c @@ -0,0 +1,120 @@ +/* tcmp_d.c -- Test mpfi_cmp_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_FLOAT_H +#include +#endif + +/* Warning: DBL_MANT_DIG is not necessary a number of bits */ +#ifndef DBL_MANT_DIG +#define DBL_MANT_DIG 53 +#endif + +#define ORDER(min, max) \ + do { \ + if (min > max) { \ + double tmp; \ + tmp = min; \ + min = max; \ + max = tmp;} \ + } while (0) + +void +print_error (double x, mpfi_srcptr i) +{ + printf ("Error: mpfi_cmp_d (x, I) returns %d\nx = %g\nI = ", + mpfi_cmp_d (i, x), x); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + double a, b, c; + int cmp; + int i; + + mpfi_init2 (interval, DBL_MANT_DIG); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + a = random_double (); + b = random_double (); + c = random_double (); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_d (interval, b, c); + cmp = mpfi_cmp_d (interval, a); + if (cmp < 0 || (cmp == 0 && a != b)) { + print_error (a, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_d (interval, a) != 1) { + print_error (a, interval); + } + + mpfi_interv_d (interval, a, c); + if (mpfi_cmp_d (interval, b) != 0) { + print_error (b, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_d (interval, b) != 1) { + print_error (b, interval); + } + + mpfi_interv_d (interval, a, b); + cmp = mpfi_cmp_d (interval, c); + if (cmp > 0 || (cmp == 0 && c != b)) { + print_error (c, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_d (interval, c) != 1) { + print_error (c, interval); + } + } + + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_fr.c new file mode 100644 index 00000000000..bb89257ee6f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_fr.c @@ -0,0 +1,108 @@ +/* tcmp_fr.c -- Test mpfi_cmp_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +print_error (mpfr_ptr x, mpfi_srcptr i) +{ + printf ("Error: mpfi_cmp_fr (x, I) returns %d\nx = ", + mpfi_cmp_fr (i, x)); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + mpfr_t a, b, c; + int i; + int cmp; + + mpfr_init2 (a, 53); + mpfr_init2 (b, 53); + mpfr_init2 (c, 53); + mpfi_init2 (interval, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_interval (interval); + mpfi_alea (b, interval); + mpfr_set (a, &(interval->left), MPFI_RNDD); + mpfr_set (c, &(interval->right), MPFI_RNDU); + + mpfi_interv_fr (interval, b, c); + cmp = mpfi_cmp_fr (interval, a); + if (cmp < 0 || (cmp == 0 && !mpfr_equal_p (a, b))) { + print_error (a, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_fr (interval, a) != 1) { + print_error (a, interval); + } + + mpfi_interv_fr (interval, a, c); + if (mpfi_cmp_fr (interval, b) != 0) { + print_error (b, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_fr (interval, b) != 1) { + print_error (b, interval); + } + + mpfi_interv_fr (interval, a, b); + cmp = mpfi_cmp_fr (interval, c); + if (cmp > 0 || (cmp == 0 && !mpfr_equal_p (c, b))) { + print_error (c, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_fr (interval, c) != 1) { + print_error (c, interval); + } + } + + mpfr_clear (a); + mpfr_clear (b); + mpfr_clear (c); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_q.c new file mode 100644 index 00000000000..47b55f9fcb4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_q.c @@ -0,0 +1,116 @@ +/* tcmp_q.c -- Test mpfi_cmp_q. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpq_cmp ((min), (max)) > 0) \ + mpq_swap ((min), (max)); \ + } while (0) + +void +print_error (mpq_ptr x, mpfi_srcptr i) +{ + printf ("Error: mpfi_cmp_q (x, I) returns %d\nx = ", + mpfi_cmp_q (i, x)); + mpq_out_str (stdout, 10, x); + printf ("\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + mpq_t a, b, c; + int cmp; + int i; + + mpq_init (a); + mpq_init (b); + mpq_init (c); + mpfi_init2 (interval, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpq (a); + random_mpq (b); + random_mpq (c); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_q (interval, b, c); + cmp = mpfi_cmp_q (interval, a); + if (cmp < 0 || (cmp == 0 && mpq_cmp (a, b) != 0)) { + print_error (a, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_q (interval, a) != 1) { + print_error (a, interval); + } + + mpfi_interv_q (interval, a, c); + if (mpfi_cmp_q (interval, b) != 0) { + print_error (b, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_q (interval, b) != 1) { + print_error (b, interval); + } + + mpfi_interv_q (interval, a, b); + cmp = mpfi_cmp_q (interval, c); + if (cmp > 0 || (cmp == 0 && mpq_cmp (c, b) != 0)) { + print_error (c, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_q (interval, c) != 1) { + print_error (c, interval); + } + } + + mpq_clear (a); + mpq_clear (b); + mpq_clear (c); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_si.c new file mode 100644 index 00000000000..f38da04cd3d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_si.c @@ -0,0 +1,123 @@ +/* tcmp_si.c -- Test mpfi_cmp_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_LIMITS_H +#include +#endif + +#ifndef LONG_MAX +# define LONG_MAX 2147483647 +#endif + +#define ORDER(min, max) \ + do { \ + if ((min) > (max)) { \ + long tmp; \ + tmp = (min); \ + (min) = (max); \ + (max) = tmp;} \ + } while (0) + +void +print_error (long x, mpfi_srcptr i) +{ + printf ("Error: mpfi_cmp_si (x, I) returns %d\nx = %ld\nI = ", + mpfi_cmp_si (i, x), x); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + long a, b, c; + int cmp; + int i; + + i = 1; + a = LONG_MAX; + while (a >>= 1) i++; + + mpfi_init2 (interval, i); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + a = random_si (); + b = random_si (); + c = random_si (); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_si (interval, b, c); + cmp = mpfi_cmp_si (interval, a); + if (cmp < 0 || (cmp == 0 && a != b)) { + print_error (a, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_si (interval, a) != 1) { + print_error (a, interval); + } + + mpfi_interv_si (interval, a, c); + if (mpfi_cmp_si (interval, b) != 0) { + print_error (b, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_si (interval, b) != 1) { + print_error (b, interval); + } + + mpfi_interv_si (interval, a, b); + cmp = mpfi_cmp_si (interval, c); + if (cmp > 0 || (cmp == 0 && c != b)) { + print_error (c, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_si (interval, c) != 1) { + print_error (c, interval); + } + } + + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_ui.c new file mode 100644 index 00000000000..0cd99cdc503 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_ui.c @@ -0,0 +1,123 @@ +/* tcmp_ui.c -- Test mpfi_cmp_ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_LIMITS_H +#include +#endif + +#ifndef ULONG_MAX +# define ULONG_MAX 4294967295 +#endif + +#define ORDER(min, max) \ + do { \ + if (min > max) { \ + unsigned long tmp; \ + tmp = min; \ + min = max; \ + max = tmp;} \ + } while (0) + +void +print_error (unsigned long x, mpfi_srcptr i) +{ + printf ("Error: mpfi_cmp_ui (x, I) returns %d\nx = %lu\nI = ", + mpfi_cmp_ui (i, x), x); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + unsigned long a, b, c; + int cmp; + int i; + + i = 1; + a = ULONG_MAX; + while (a >>= 1) i++; + + mpfi_init2 (interval, i); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + a = random_ui (); + b = random_ui (); + c = random_ui (); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_ui (interval, b, c); + cmp = mpfi_cmp_ui (interval, a); + if (cmp < 0 || (cmp == 0 && a != b)) { + print_error (a, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_ui (interval, a) != 1) { + print_error (a, interval); + } + + mpfi_interv_ui (interval, a, c); + if (mpfi_cmp_ui (interval, b) != 0) { + print_error (b, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_ui (interval, b) != 1) { + print_error (b, interval); + } + + mpfi_interv_ui (interval, a, b); + cmp = mpfi_cmp_ui (interval, c); + if (cmp > 0 || (cmp == 0 && c != b)) { + print_error (c, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_ui (interval, c) != 1) { + print_error (c, interval); + } + } + + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcmp_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_z.c new file mode 100644 index 00000000000..11990cadde1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcmp_z.c @@ -0,0 +1,116 @@ +/* tcmp_z.c -- Test mpfi_cmp_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpz_cmp ((min), (max)) > 0) \ + mpz_swap ((min), (max)); \ + } while (0) + +void +print_error (mpz_ptr x, mpfi_srcptr i) +{ + printf ("Error: mpfi_cmp_z (x, I) returns %d\nx = ", + mpfi_cmp_z (i, x)); + mpz_out_str (stdout, 10, x); + printf ("\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + mpz_t a, b, c; + int cmp; + int i; + + mpz_init (a); + mpz_init (b); + mpz_init (c); + mpfi_init2 (interval, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpz (a, 100000); + random_mpz (b, 100000); + random_mpz (c, 100000); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_z (interval, b, c); + cmp = mpfi_cmp_z (interval, a); + if (cmp < 0 || (cmp == 0 && mpz_cmp (a, b) != 0)) { + print_error (a, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_z (interval, a) != 1) { + print_error (a, interval); + } + + mpfi_interv_z (interval, a, c); + if (mpfi_cmp_z (interval, b) != 0) { + print_error (b, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_z (interval, b) != 1) { + print_error (b, interval); + } + + mpfi_interv_z (interval, a, b); + cmp = mpfi_cmp_z (interval, c); + if (cmp > 0 || (cmp == 0 && mpz_cmp (c, b) != 0)) { + print_error (c, interval); + } + mpfr_set_nan (&(interval->right)); + if (mpfi_cmp_z (interval, c) != 1) { + print_error (c, interval); + } + } + + mpz_clear (a); + mpz_clear (b); + mpz_clear (c); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tconst_catalan.c b/Build/source/libs/mpfi/mpfi-src/tests/tconst_catalan.c new file mode 100644 index 00000000000..ac248061195 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tconst_catalan.c @@ -0,0 +1,41 @@ +/* tconst_catalan.c -- Test mpfi_const_catalan. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_catalan; + + mpfi_fun_init_I (&i_catalan, mpfi_const_catalan, mpfr_const_catalan); + + check_data (&i_catalan, "const_catalan.dat"); + + mpfi_fun_clear (&i_catalan); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tconst_euler.c b/Build/source/libs/mpfi/mpfi-src/tests/tconst_euler.c new file mode 100644 index 00000000000..359a203c497 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tconst_euler.c @@ -0,0 +1,41 @@ +/* tconst_euler.c -- Test mpfi_const_euler. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_euler; + + mpfi_fun_init_I (&i_euler, mpfi_const_euler, mpfr_const_euler); + + check_data (&i_euler, "const_euler.dat"); + + mpfi_fun_clear (&i_euler); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tconst_log2.c b/Build/source/libs/mpfi/mpfi-src/tests/tconst_log2.c new file mode 100644 index 00000000000..72d18b659ea --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tconst_log2.c @@ -0,0 +1,41 @@ +/* tconst_log2.c -- Test mpfi_const_log2. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_log2; + + mpfi_fun_init_I (&i_log2, mpfi_const_log2, mpfr_const_log2); + + check_data (&i_log2, "const_log2.dat"); + + mpfi_fun_clear (&i_log2); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tconst_pi.c b/Build/source/libs/mpfi/mpfi-src/tests/tconst_pi.c new file mode 100644 index 00000000000..5f5ad6874a0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tconst_pi.c @@ -0,0 +1,41 @@ +/* tconst_pi.c -- Test mpfi_const_pi. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_pi; + + mpfi_fun_init_I (&i_pi, mpfi_const_pi, mpfr_const_pi); + + check_data (&i_pi, "const_pi.dat"); + + mpfi_fun_clear (&i_pi); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcos.c b/Build/source/libs/mpfi/mpfi-src/tests/tcos.c new file mode 100644 index 00000000000..de9d0ae2008 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcos.c @@ -0,0 +1,60 @@ +/* tcos.c -- Test mpfi_cos. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -7) < 0 || mpfr_cmp_si (&(a->left), +7) > 0) { + mpfr_set_si (&(a->left), -7, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -7) < 0 + || mpfr_cmp_si (&(a->right), +7) > 0) { + mpfr_set_si (&(a->right), 7, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_cos; + + mpfi_fun_init_II (&i_cos, mpfi_cos, mpfr_cos); + mpfi_restrict_random (&i_cos, restrict_domain); + + test_start (); + + check_data (&i_cos, "cos.dat"); + check_random (&i_cos, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_cos); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcosh.c b/Build/source/libs/mpfi/mpfi-src/tests/tcosh.c new file mode 100644 index 00000000000..fb6e2d3c9f5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcosh.c @@ -0,0 +1,44 @@ +/* tcosh.c -- Test mpfi_cosh. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_cosh; + + mpfi_fun_init_II (&i_cosh, mpfi_cosh, mpfr_cosh); + test_start (); + + check_data (&i_cosh, "cosh.dat"); + check_random (&i_cosh, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_cosh); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcot.c b/Build/source/libs/mpfi/mpfi-src/tests/tcot.c new file mode 100644 index 00000000000..0efb4f3c921 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcot.c @@ -0,0 +1,60 @@ +/* tcot.c -- Test mpfi_cot. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -7) < 0 || mpfr_cmp_si (&(a->left), +7) > 0) { + mpfr_set_si (&(a->left), -7, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -7) < 0 + || mpfr_cmp_si (&(a->right), +7) > 0) { + mpfr_set_si (&(a->right), 7, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_cot; + + mpfi_fun_init_II (&i_cot, mpfi_cot, mpfr_cot); + mpfi_restrict_random (&i_cot, restrict_domain); + + test_start (); + + check_data (&i_cot, "cot.dat"); + check_random (&i_cot, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_cot); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcoth.c b/Build/source/libs/mpfi/mpfi-src/tests/tcoth.c new file mode 100644 index 00000000000..751848d80ab --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcoth.c @@ -0,0 +1,44 @@ +/* tcoth.c -- Test mpfi_coth. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_coth; + + mpfi_fun_init_II (&i_coth, mpfi_coth, mpfr_coth); + test_start (); + + check_data (&i_coth, "coth.dat"); + check_random (&i_coth, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_coth); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcsc.c b/Build/source/libs/mpfi/mpfi-src/tests/tcsc.c new file mode 100644 index 00000000000..8a7de1b0fa4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcsc.c @@ -0,0 +1,60 @@ +/* tcsc.c -- Test mpfi_csc. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -7) < 0 || mpfr_cmp_si (&(a->left), +7) > 0) { + mpfr_set_si (&(a->left), -7, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -7) < 0 + || mpfr_cmp_si (&(a->right), +7) > 0) { + mpfr_set_si (&(a->right), 7, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_csc; + + mpfi_fun_init_II (&i_csc, mpfi_csc, mpfr_csc); + mpfi_restrict_random (&i_csc, restrict_domain); + + test_start (); + + check_data (&i_csc, "csc.dat"); + check_random (&i_csc, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_csc); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tcsch.c b/Build/source/libs/mpfi/mpfi-src/tests/tcsch.c new file mode 100644 index 00000000000..2ec0964918b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tcsch.c @@ -0,0 +1,44 @@ +/* tcsch.c -- Test mpfi_csch. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_csch; + + mpfi_fun_init_II (&i_csch, mpfi_csch, mpfr_csch); + test_start (); + + check_data (&i_csch, "csch.dat"); + check_random (&i_csch, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_csch); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/td_div.c b/Build/source/libs/mpfi/mpfi-src/tests/td_div.c new file mode 100644 index 00000000000..dd93e0bcaff --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/td_div.c @@ -0,0 +1,125 @@ +/* td_div.c -- Test mpfi_d_div. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t interval; + mpfi_t got; + double d = 1024.0; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + + /* right overflow: 1024.0 / [epsilon, 1] = [1024, +oo] */ + mpfr_set_ui (&(interval->left), 0, MPFI_RNDD); + mpfr_nextabove (&(interval->left)); /* tiny left endpoint x0 */ + mpfr_set_ui (&(interval->right), 1, MPFI_RNDU); + + inex = mpfi_d_div (got, d, interval); + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp_ui (&(got->left), 1024) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_d_div (rop, %g, op) does not correctly handle " + "overflow.\nop = ", d); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: 1024.0 / [-1, -epsilon] = [-oo, -1024] */ + mpfi_neg (interval, interval); + + inex = mpfi_d_div (got, d, interval); + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -1024) != 0) { + printf ("Error: mpfi_d_div (rop, %g, op) does not correctly handle " + "overflow.\nop = ", d); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpfi_clear (interval); + mpfi_clear (got); +} + +void +check_nan () +{ + double nan; + mpfi_t got, interval; + int inex; + + nan = 0.0/0.0; + if (nan == nan) + return; + + mpfi_init2 (got, 53); + mpfi_init2 (interval, 53); + + mpfi_set_ui (interval, 10); + inex = mpfi_d_div (got, nan, interval); + if (!MPFI_BOTH_ARE_EXACT (inex) || !MPFI_NAN_P (got)) { + printf ("Error in mpfi_d_div (rop, %g, op).\nop = ", nan); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + + exit (1); + } + + mpfi_clear (got); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_d_div; + + mpfi_fun_init_IDI (&i_d_div, mpfi_d_div, mpfr_d_div); + test_start (); + + check_data (&i_d_div, "d_div.dat"); + check_random (&i_d_div, 2, 1000, 10); + check_overflow (); + check_nan (); + + test_end (); + mpfi_fun_clear (&i_d_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/td_sub.c b/Build/source/libs/mpfi/mpfi-src/tests/td_sub.c new file mode 100644 index 00000000000..4a2f2458076 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/td_sub.c @@ -0,0 +1,98 @@ +/* td_sub.c -- Test mpfi_d_sub. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfi_t got; + mpfi_t op; + double d; + int inexact; + + mpfi_init2 (got, 53); + mpfi_init2 (op, 53); + + d = -1024.0; + mpfr_set_ui (&(op->left), 1, MPFI_RNDD); + mpfr_set_inf (&(op->right), +1); + mpfr_nextbelow (&(op->right)); + + inexact = mpfi_d_sub (got, d, op); + + if (!MPFI_LEFT_IS_INEXACT (inexact) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inexact) + || mpfr_cmp_d (&(got->right), d - 1) != 0) { + printf ("Error: mpfi_d_div (rop, %g, op) does not correctly handle " + "overflow.\n op = ", d); + mpfi_out_str (stdout, 10, 0, op); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inexact); + exit (1); + } + + d = +1024.0; + mpfi_neg (op, op); + + inexact = mpfi_d_sub (got, d, op); + + if (MPFI_LEFT_IS_INEXACT (inexact) + || mpfr_cmp_d (&(got->left), d + 1) != 0 + || !MPFI_RIGHT_IS_INEXACT (inexact) + || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_d_div (rop, %g, op) does not correctly handle " + "overflow.\n op = ", d); + mpfi_out_str (stdout, 10, 0, op); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inexact); + exit (1); + } + + mpfi_clear (op); + mpfi_clear (got); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_d_sub; + + mpfi_fun_init_IDI (&i_d_sub, mpfi_d_sub, mpfr_d_sub); + test_start (); + + check_data (&i_d_sub, "d_sub.dat"); + check_random (&i_d_sub, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_d_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiam.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiam.c new file mode 100644 index 00000000000..7afdad22269 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiam.c @@ -0,0 +1,41 @@ +/* tdiam.c -- Test mpfi_diam. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_diam; + + mpfi_fun_init_RI (&i_diam, mpfi_diam, NULL); + + check_data (&i_diam, "diam.dat"); + + mpfi_fun_clear (&i_diam); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiam_abs.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiam_abs.c new file mode 100644 index 00000000000..ef2d8205b37 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiam_abs.c @@ -0,0 +1,41 @@ +/* tdiam_abs.c -- Test mpfi_diam_abs. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_diam_abs; + + mpfi_fun_init_RI (&i_diam_abs, mpfi_diam_abs, NULL); + + check_data (&i_diam_abs, "diam_abs.dat"); + + mpfi_fun_clear (&i_diam_abs); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiam_rel.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiam_rel.c new file mode 100644 index 00000000000..0b3fa898f83 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiam_rel.c @@ -0,0 +1,41 @@ +/* tdiam_rel.c -- Test mpfi_diam_rel. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_diam_rel; + + mpfi_fun_init_RI (&i_diam_rel, mpfi_diam_rel, NULL); + + check_data (&i_diam_rel, "diam_rel.dat"); + + mpfi_fun_clear (&i_diam_rel); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv.c new file mode 100644 index 00000000000..4ebf0e8d50a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv.c @@ -0,0 +1,45 @@ +/* tdiv.c -- Test mpfi_div. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div; + + mpfi_fun_init_III (&i_div, mpfi_div, mpfr_div); + + test_start (); + + check_data (&i_div, "div.dat"); + check_random (&i_div, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2exp.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2exp.c new file mode 100644 index 00000000000..67f7d3df329 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2exp.c @@ -0,0 +1,45 @@ +/* tdiv_2exp.c -- Test mpfi_div_2exp. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_2exp; + + mpfi_fun_init_IIU (&i_div_2exp, mpfi_div_2exp, mpfr_div_2exp); + + test_start (); + + check_data (&i_div_2exp, "div_2ui.dat"); + check_random (&i_div_2exp, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_div_2exp); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2si.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2si.c new file mode 100644 index 00000000000..c09f0cb1241 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2si.c @@ -0,0 +1,45 @@ +/* tdiv_2si.c -- Test mpfi_div_2si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_2si; + + mpfi_fun_init_IIS (&i_div_2si, mpfi_div_2si, mpfr_div_2si); + + test_start (); + + check_data (&i_div_2si, "div_2si.dat"); + check_random (&i_div_2si, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_div_2si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2ui.c new file mode 100644 index 00000000000..1d6555fd972 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_2ui.c @@ -0,0 +1,45 @@ +/* tdiv_2ui.c -- Test mpfi_div_2ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_2ui; + + mpfi_fun_init_IIU (&i_div_2ui, mpfi_div_2ui, mpfr_div_2ui); + + test_start (); + + check_data (&i_div_2ui, "div_2ui.dat"); + check_random (&i_div_2ui, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_div_2ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_d.c new file mode 100644 index 00000000000..435ef43b7ea --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_d.c @@ -0,0 +1,136 @@ +/* tdiv_d.c -- Test mpfi_div_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_div_d (a, a, 0.5); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_div_d does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_div_d does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_div_d (a, a, 0.5); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_div_d does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_div_d does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +void +check_underflow (void) +{ + mpfi_t got, expected; + double d = 0x1p+100; + int inex; + + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_div_d (got, expected, d); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_div_d (rop, op, d) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\nd = %a\ngot = ", d); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_d; + + mpfi_fun_init_IID (&i_div_d, mpfi_div_d, mpfr_div_d); + test_start (); + + check_data (&i_div_d, "div_d.dat"); + check_random (&i_div_d, 2, 1000, 10); + check_overflow (); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_div_d); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_ext.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_ext.c new file mode 100644 index 00000000000..8f1256281ba --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_ext.c @@ -0,0 +1,41 @@ +/* tdiv_ext.c -- Test mpfi_div_ext. + +Copyright 2018 + AriC project, Inria Grenoble - Rhone-Alpes, France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_ext; + mpfi_fun_init_IIII (&i_div_ext, mpfi_div_ext, mpfr_div); + + test_start (); + + check_data (&i_div_ext, "div_ext.dat"); + check_random (&i_div_ext, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_div_ext); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_fr.c new file mode 100644 index 00000000000..ea1fbf6011c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_fr.c @@ -0,0 +1,145 @@ +/* tdiv_fr.c -- Test mpfi_div_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfr_t x; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_init2 (x, 53); + mpfr_set_ui_2exp (x, 1, -1024, MPFI_RNDD); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_div_fr (a, a, x); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_div_fr does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_div_fr does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_div_fr (a, a, x); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_div_fr does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_div_fr does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); + mpfr_clear (x); +} + +void +check_underflow (void) +{ + mpfi_t got, expected; + mpfr_t x; + int inex; + + mpfr_init2 (x, 128); + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpfr_set_ui_2exp (x, 1, 1024, MPFI_RNDD); + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_div_fr (got, expected, x); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_div_fr (rop, op, x) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\nx = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpfr_clear (x); + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_fr; + + mpfi_fun_init_IIR (&i_div_fr, mpfi_div_fr, mpfr_div); + test_start (); + + check_data (&i_div_fr, "div_fr.dat"); + check_random (&i_div_fr, 2, 1000, 10); + check_overflow (); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_div_fr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_q.c new file mode 100644 index 00000000000..22730ef67cd --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_q.c @@ -0,0 +1,184 @@ +/* tdiv_q.c -- Test mpfi_div_q. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpq_t q; + int inexact; + + mpq_init (q); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set (&(a->right), max, MPFI_RNDU); + mpq_set_ui (q, 3, 4); + + inexact = mpfi_div_q (a, a, q); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error[1]: mpfi_div_q does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error[1]: mpfi_div_q does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set (&(a->right), max, MPFI_RNDU); + mpq_set_si (q, -3, 4); + + inexact = mpfi_div_q (a, a, q); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error[2]: mpfi_div_q does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error[2]: mpfi_div_q does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpq_set_ui (q, 3, 4); + + inexact = mpfi_div_q (a, a, q); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error[3]: mpfi_div_q does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error[3]: mpfi_div_q does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpq_set_si (q, -3, 4); + + inexact = mpfi_div_q (a, a, q); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error[4]: mpfi_div_q does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error[4]: mpfi_div_q does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpq_clear (q); + mpfi_clear (a); + mpfr_clear (max); +} + +void +check_underflow (void) +{ + mpfi_t got, expected; + mpq_t q; + int inex; + + mpq_init (q); + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpq_set_ui (q, 4096, 3); + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_div_q (got, expected, q); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_div_q (rop, op, q) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 10, 0, expected); + printf ("\nq = "); + mpq_out_str (stdout, 10, q); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpq_clear (q); + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_q; + + mpfi_fun_init_IIQ (&i_div_q, mpfi_div_q, mpfr_div_q); + test_start (); + + check_data (&i_div_q, "div_q.dat"); + check_random (&i_div_q, 2, 1000, 10); + check_overflow (); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_div_q); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_si.c new file mode 100644 index 00000000000..a86cd4ee581 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_si.c @@ -0,0 +1,85 @@ +/* tdiv_si.c -- Test mpfi_div_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_underflow (void) +{ + mpfi_t got, expected; + long si = 1024; + int inex; + + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_div_si (got, expected, si); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_div_si (rop, op, si) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\nsi = %ld\ngot = ", si); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_si; + + mpfi_fun_init_IIS (&i_div_si, mpfi_div_si, mpfr_div_si); + + test_start (); + + check_data (&i_div_si, "div_si.dat"); + check_random (&i_div_si, 2, 1000, 10); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_div_si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_ui.c new file mode 100644 index 00000000000..86f2867701a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_ui.c @@ -0,0 +1,85 @@ +/* tdiv_ui.c -- Test mpfi_div_ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_underflow (void) +{ + mpfi_t got, expected; + unsigned long ui = 1024; + int inex; + + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_div_ui (got, expected, ui); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_div_ui (rop, op, ui) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\nui = %lu\ngot = ", ui); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_ui; + + mpfi_fun_init_IIU (&i_div_ui, mpfi_div_ui, mpfr_div_ui); + + test_start (); + + check_data (&i_div_ui, "div_ui.dat"); + check_random (&i_div_ui, 2, 1000, 10); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_div_ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tdiv_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_z.c new file mode 100644 index 00000000000..00b13c42423 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tdiv_z.c @@ -0,0 +1,88 @@ +/* tdiv_z.c -- Test mpfi_div_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_underflow (void) +{ + mpfi_t got, expected; + mpz_t z; + int inex; + + mpz_init (z); + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpz_set_ui (z, 1024); + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_div_z (got, expected, z); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_div_z (rop, op, z) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\nz = "); + mpz_out_str (stdout, 16, z); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpz_clear (z); + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_div_z; + + mpfi_fun_init_IIZ (&i_div_z, mpfi_div_z, mpfr_div_z); + test_start (); + + check_data (&i_div_z, "div_z.dat"); + check_random (&i_div_z, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_div_z); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/terror.c b/Build/source/libs/mpfi/mpfi-src/tests/terror.c new file mode 100644 index 00000000000..32f7b945c41 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/terror.c @@ -0,0 +1,140 @@ +/* terror.c -- Frightening test of error handling. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_UNISTD_H +#include +#endif + +int +read_stderr (FILE *stream) +{ + int ret = 0; + + /* something to read? */ + ret = (fgetc (stream) != EOF); + if (fseek (stream, 0, SEEK_END) != 0) { + printf ("Internal error: cannot reset stream.\n"); + exit (1); + } + + return ret; +} + +int +main (int argc, char **argv) +{ + FILE *stream; + + if (freopen ("error.tmp", "w", stderr) == NULL) { + printf ("Internal error: cannot redirect stderr to a file.\n"); + exit (1); + } + stream = fopen ("error.tmp", "r"); + if (stream == NULL) { + printf ("Internal error: cannot open the file \"error.tmp\".\n"); + exit (1); + } + + mpfi_reset_error (); + if (mpfi_is_error () == 1) { + printf ("Error: mpfi_is_error() returns 1 after a call to " + "mpfi_reset_error.\n"); + exit (1); + } + + MPFI_ERROR ("[1] this should be printed!"); + fflush (stderr); + if (!read_stderr (stream)) { + printf ("Error: MPFI_ERROR does not print message after a call to " + "mpfi_reset_error.\n"); + exit (1); + } + if (mpfi_is_error () != 1) { + printf ("Error: mpfi_is_error does not set return 1 after a call to " + "MPFI_ERROR.\n"); + exit (1); + } + + mpfi_set_error (2); + if (mpfi_is_error () == 1) { + printf ("Error: mpfi_is_error() returns 1 after calling " + "mpfi_set_error(2).\n"); + exit (1); + } + MPFI_ERROR ("[2] this should not be printed!"); + fflush (stderr); + if (read_stderr (stream)) { + printf ("Error: MPFI_ERROR prints a message while error number is " + "set.\n"); + exit (1); + } + if (mpfi_is_error () == 1) { + printf ("Error: MPFI_ERROR set error number to 1 while it was already " + "set.\n"); + exit (1); + } + + mpfi_set_error (1); + if (mpfi_is_error () != 1) { + printf ("Error: mpfi_is_error() does not return 1 after calling " + "mpfi_set_error(1).\n"); + exit (1); + } + MPFI_ERROR ("[3] this should not be printed!"); + fflush (stderr); + if (read_stderr (stream)) { + printf ("Error: MPFI_ERROR prints a message while error number is " + "set.\n"); + exit (1); + } + + mpfi_reset_error (); + if (mpfi_is_error () == 1) { + printf ("Error: mpfi_is_error() returns 1 after a call to " + "mpfi_reset_error.\n"); + exit (1); + } + MPFI_ERROR ("[4] this should be printed!"); + fflush (stderr); + if (!read_stderr (stream)) { + printf ("Error: MPFI_ERROR does not print message after a call to " + "mpfi_reset_error.\n"); + exit (1); + } + if (mpfi_is_error () != 1) { + printf ("Error: MPFI_ERROR dos not set error number to 1 after a call to " + "mpfi_reset_error.\n"); + exit (1); + } + + fclose (stream); + fclose (stderr); + unlink ("error.tmp"); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/texp.c b/Build/source/libs/mpfi/mpfi-src/tests/texp.c new file mode 100644 index 00000000000..55bcf7763f8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/texp.c @@ -0,0 +1,44 @@ +/* texp.c -- Test mpfi_exp. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_exp; + + mpfi_fun_init_II (&i_exp, mpfi_exp, mpfr_exp); + test_start (); + + check_data (&i_exp, "exp.dat"); + check_random (&i_exp, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_exp); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/texp10.c b/Build/source/libs/mpfi/mpfi-src/tests/texp10.c new file mode 100644 index 00000000000..03f112bfed8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/texp10.c @@ -0,0 +1,44 @@ +/* texp10.c -- Test mpfi_exp10. + +Copyright 2009, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_exp10; + + mpfi_fun_init_II (&i_exp10, mpfi_exp10, mpfr_exp10); + test_start (); + + check_data (&i_exp10, "exp10.dat"); + check_random (&i_exp10, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_exp10); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/texp10m1.c b/Build/source/libs/mpfi/mpfi-src/tests/texp10m1.c new file mode 100644 index 00000000000..b5c8fc6ceec --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/texp10m1.c @@ -0,0 +1,50 @@ +/* texp10m1.c -- Test mpfi_exp10m1. + +Copyright 2009, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Rhone-Alpes and Inria Lyon, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_exp10m1; + +/* awaiting for exp10m1 in MPFR + mpfi_fun_init_II (&i_exp10m1, mpfi_exp10m1, mpfr_exp10m1); +*/ + mpfi_fun_init_II (&i_exp10m1, mpfi_exp10m1, mpfr_exp10); + test_start (); + + check_data (&i_exp10m1, "exp10m1.dat"); +/* awaiting for exp10m1 in MPFR + check_random (&i_exp10m1, 2, 1000, 10); +*/ + + test_end (); + mpfi_fun_clear (&i_exp10m1); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/texp2.c b/Build/source/libs/mpfi/mpfi-src/tests/texp2.c new file mode 100644 index 00000000000..af3361daafb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/texp2.c @@ -0,0 +1,44 @@ +/* texp2.c -- Test mpfi_exp2. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_exp2; + + mpfi_fun_init_II (&i_exp2, mpfi_exp2, mpfr_exp2); + test_start (); + + check_data (&i_exp2, "exp2.dat"); + check_random (&i_exp2, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_exp2); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/texp2m1.c b/Build/source/libs/mpfi/mpfi-src/tests/texp2m1.c new file mode 100644 index 00000000000..9d1ebe8d2c9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/texp2m1.c @@ -0,0 +1,50 @@ +/* texp2m1.c -- Test mpfi_exp2m1. + +Copyright 2009, 2010, 2022 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and AriC project, Inria Rhone-Alpes and Inria Lyon, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_exp2m1; + +/* awaiting for exp2m1 in MPFR + mpfi_fun_init_II (&i_exp2m1, mpfi_exp2m1, mpfr_exp2m1); +*/ + mpfi_fun_init_II (&i_exp2m1, mpfi_exp2m1, mpfr_exp2); + test_start (); + + check_data (&i_exp2m1, "exp2m1.dat"); +/* + check_random (&i_exp2m1, 2, 1000, 10); +*/ + + test_end (); + mpfi_fun_clear (&i_exp2m1); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/texpm1.c b/Build/source/libs/mpfi/mpfi-src/tests/texpm1.c new file mode 100644 index 00000000000..88e57af2fb0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/texpm1.c @@ -0,0 +1,44 @@ +/* texpm1.c -- Test mpfi_expm1. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_expm1; + + mpfi_fun_init_II (&i_expm1, mpfi_expm1, mpfr_expm1); + test_start (); + + check_data (&i_expm1, "expm1.dat"); + check_random (&i_expm1, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_expm1); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tfr_div.c b/Build/source/libs/mpfi/mpfi-src/tests/tfr_div.c new file mode 100644 index 00000000000..0b5dee1f7ac --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tfr_div.c @@ -0,0 +1,143 @@ +/* tfr_div.c -- Test mpfi_fr_div. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t interval; + mpfi_t got; + mpfr_t x; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + mpfr_init2 (x, 53); + + /* right overflow: 1023 / [epsilon, 1] = [1023, +oo] */ + mpfr_set_ui (x, 1023, MPFI_RNDD); + mpfr_set_ui (&(interval->left), 0, MPFI_RNDD); + mpfr_nextabove (&(interval->left)); /* tiny left endpoint x0 */ + mpfr_set_ui (&(interval->right), 1, MPFI_RNDU); + + inex = mpfi_fr_div (got, x, interval); + + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp (&(got->left), x) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_d_div (rop, x, op) does not correctly handle " + "overflow.\n x = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: 1023 / [-1, -epsilon] = [-oo, -1023] */ + mpfi_neg (interval, interval); + + inex = mpfi_fr_div (got, x, interval); + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -1023) != 0) { + printf ("Error: mpfi_d_div (rop, x, op) does not correctly handle " + "overflow.\n x = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpfr_clear (x); + mpfi_clear (interval); + mpfi_clear (got); +} + +void +check_underflow (void) +{ + mpfi_t interval; + mpfi_t got; + mpfr_t x; + int inex; + + mpfr_init2 (x, 128); + mpfi_init2 (got, 128); + mpfi_init2 (interval, 128); + + mpfr_set_ui (x, 0, MPFI_RNDD); + mpfr_nextabove (x); + mpfi_interv_ui (interval, 1, 1024); + + inex = mpfi_fr_div (got, x, interval); + + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_zero_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp (&(got->right), x) != 0) { + printf ("Error: mpfi_fr_div (rop, x, op) does not correctly handle " + "overflow.\n x = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + exit (1); + } + + mpfr_clear (x); + mpfi_clear (got); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_fr_div; + + mpfi_fun_init_IRI (&i_fr_div, mpfi_fr_div, mpfr_div); + test_start (); + + check_data (&i_fr_div, "fr_div.dat"); + check_random (&i_fr_div, 2, 1000, 10); + check_overflow (); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_fr_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tfr_sub.c b/Build/source/libs/mpfi/mpfi-src/tests/tfr_sub.c new file mode 100644 index 00000000000..4688ed61ea3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tfr_sub.c @@ -0,0 +1,104 @@ +/* tfr_sub.c -- Test mpfi_fr_sub. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t interval; + mpfi_t got; + mpfr_t x; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + mpfr_init2 (x, 53); + + /* right overflow: 1023 - [-Max, 0] = [1023, +oo] */ + mpfr_set_ui (x, 1023, MPFI_RNDD); + mpfr_set_inf (&(interval->left), -1); + mpfr_nextabove (&(interval->left)); + mpfr_set_ui (&(interval->right), 0, MPFI_RNDU); + + inex = mpfi_fr_sub (got, x, interval); + + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp (&(got->left), x) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_fr_sub (rop, x, op) does not correctly handle " + "overflow.\n x = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: -1023 - [0, Max] = [-oo, -1023] */ + mpfr_neg (x, x, MPFI_RNDD); + mpfi_neg (interval, interval); + + inex = mpfi_fr_sub (got, x, interval); + + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -1023) != 0) { + printf ("Error: mpfi_fr_sub (rop, x, op) does not correctly handle " + "overflow.\n x = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpfr_clear (x); + mpfi_clear (interval); + mpfi_clear (got); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_fr_sub; + + mpfi_fun_init_IRI (&i_fr_sub, mpfi_fr_sub, mpfr_sub); + test_start (); + + check_data (&i_fr_sub, "fr_sub.dat"); + check_random (&i_fr_sub, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_fr_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tget_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tget_d.c new file mode 100644 index 00000000000..48f2c66bdbb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tget_d.c @@ -0,0 +1,138 @@ +/* tget_d.c -- Test mpfi_get_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include +#include "mpfi-tests.h" + +#ifndef isnan +# define isnan(x) ((x) != (x)) +#endif + +#ifndef isinf +# define isinf(x) (!isnan (x) && isnan ((x) - (x))) +#endif + +void +error_message (mpfi_srcptr i, double got, const char *expected) +{ + printf ("Error: mpfi_get_d(x, I) returns wrong value.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\ngot : %f\nexpected: %s\n", got, expected); + exit (1); +} + +void +test_special () +{ + double got; + mpfi_t i; + + mpfi_init2 (i, 53); + + /* [nan, nan] */ + mpfr_set_nan (&(i->left)); + mpfr_set_nan (&(i->right)); + got = mpfi_get_d (i); + if (!isnan (got)) + error_message (i, got, "NaN"); + + /* [-17, nan] */ + mpfr_set_si (&(i->left), -17, MPFI_RNDD); + got = mpfi_get_d (i); + if (!isnan (got)) + error_message (i, got, "NaN"); + + /* [-inf, -inf] */ + mpfr_set_inf (&(i->left), -1); + mpfr_set_inf (&(i->right), -1); + got = mpfi_get_d (i); + if (!isinf (got) || got > 0) + error_message (i, got, "-infinity"); + + /* [-inf, 17] */ + mpfr_set_ui (&(i->right), 17, MPFI_RNDD); + got = mpfi_get_d (i); + if (!isinf (got) || got > 0) + error_message (i, got, "-infinity"); + + /* [+0, +inf] */ + mpfr_set_ui (&(i->left), 0, MPFI_RNDD); + mpfr_set_inf (&(i->right), +1); + got = mpfi_get_d (i); + if (!isinf (got) || got < 0) + error_message (i, got, "+infinity"); + + /* [+inf, +inf] */ + mpfr_set_inf (&(i->left), +1); + got = mpfi_get_d (i); + if (!isinf (got) || got < 0) + error_message (i, got, "+infinity"); + + /* [-inf, +inf] */ + mpfr_set_inf (&(i->left), -1); + mpfr_set_inf (&(i->right), +1); + got = mpfi_get_d (i); + if (!isnan (got)) + error_message (i, got, "NaN"); + + /* [+0, -0] */ + mpfr_set_ui (&(i->left), 0, MPFI_RNDU); + mpfr_neg (&(i->right), &(i->left), MPFI_RNDD); + got = mpfi_get_d (i); + if (got != 0) + error_message (i, got, "0"); + + mpfi_clear (i); +} + +void +test_regular () +{ + double x; + mpfi_t i; + + /* assume IEEE-754 double */ + mpfi_init2 (i, 100); + + mpfr_set_ui_2exp (&(i->left), 1, -1, MPFI_RNDD); + mpfr_set_ui_2exp (&(i->right), 1, 53, MPFI_RNDU); + mpfr_add_ui (&(i->right), &(i->right), 1, MPFI_RNDU); + x = mpfi_get_d (i); + + if (x != 0x10000000000001P+0) + error_message (i, x, "4503599627370497"); + + mpfi_clear (i); +} + +int +main (int argc, char **argv) +{ + test_special (); + test_regular (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tget_endpoints.c b/Build/source/libs/mpfi/mpfi-src/tests/tget_endpoints.c new file mode 100644 index 00000000000..5b8d5038905 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tget_endpoints.c @@ -0,0 +1,209 @@ +/* tget_endpoints.c -- Test mpfi_get_left and mpfi_get_right. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +error_message (int side, mpfi_srcptr i, mpfr_ptr got) +{ + unsigned long pi, pgot; + pi = mpfi_get_prec (i); + pgot = mpfr_get_prec (got); + + printf ("Error: mpfi_get_%s(x, I) returns wrong value.\n" + "Precision_I = %lu. I = ", side ? "right" : "left", pi); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nPrecision_got = %lu. Got: ", pgot); + mpfr_out_str (stdout, 10, 0, got, MPFI_RNDD); + printf ("\n"); + exit (1); +} + +void +test_special () +{ + mpfi_t i; + mpfr_t l, r; + mpfr_t expected; + + mpfi_init2 (i, 53); + mpfr_init2 (l, 53); + mpfr_init2 (r, 53); + mpfr_init2 (expected, 53); + + /* [nan, nan] */ + mpfr_set_nan (expected); + mpfi_set_fr (i, expected); + mpfi_get_left (l, i); + if (!same_mpfr_value (l, expected)) + error_message (0, i, l); + mpfi_get_right (r, i); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + /* [-17, nan] */ + mpfr_set_si (expected, -17, MPFI_RNDD); + mpfr_set (&(i->left), expected, MPFI_RNDD); + mpfi_get_right (r, i); + if (!same_mpfr_value (r, l)) + error_message (1, i, r); + mpfi_get_left (l, i); + if (!same_mpfr_value (l, expected)) + error_message (0, i, l); + + /* [-inf, -inf] */ + mpfr_set_inf (expected, -1); + mpfi_set_fr (i, expected); + mpfi_get_left (l, i); + if (!same_mpfr_value (l, expected)) + error_message (0, i, l); + mpfi_get_right (r, i); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + /* [-inf, 17] */ + mpfr_set_ui (expected, 17, MPFI_RNDU); + mpfr_set (&(i->right), expected, MPFI_RNDU); + mpfi_get_left (l, i); + if (!same_mpfr_value (l, r)) + error_message (0, i, l); + mpfi_get_right (r, i); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + /* [+0, +inf] */ + mpfr_set_ui (&(i->left), 0, MPFI_RNDD); + mpfr_set_inf (expected, +1); + mpfr_set (&(i->right), expected, MPFI_RNDU); + mpfi_get_left (l, i); + if (mpfr_cmp_ui (l, 0) != 0) + error_message (0, i, l); + mpfi_get_right (r, i); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + /* [+inf, +inf] */ + mpfi_set_fr (i, expected); + mpfi_get_left (l, i); + if (!same_mpfr_value (l, expected)) + error_message (0, i, l); + mpfi_get_right (r, i); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + /* [-inf, +inf] */ + mpfr_set_inf (&(i->left), -1); + mpfr_set_inf (&(i->right), +1); + mpfi_get_left (l, i); + mpfr_set_inf (expected, -1); + if (!same_mpfr_value (l, expected)) + error_message (0, i, l); + mpfi_get_right (r, i); + mpfr_set_inf (expected, +1); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + /* [+0, -0] */ + mpfr_set_ui (expected, 0, MPFI_RNDU); + mpfi_set_fr (i, expected); + mpfi_get_left (l, i); + if (!same_mpfr_value (l, expected)) + error_message (0, i, l); + mpfi_get_right (r, i); + mpfr_neg (expected, expected, MPFI_RNDD); + if (!same_mpfr_value (r, expected)) + error_message (1, i, r); + + mpfi_clear (i); + mpfr_clear (l); + mpfr_clear (r); + mpfr_clear (expected); +} + +void +test_regular () +{ + mpfi_t i; + mpfr_t got, expected; + + mpfi_init2 (i, 53); + mpfr_init2 (got, 500); + mpfr_init2 (expected, 53); + + mpfi_interv_ui (i, 3, 5); + mpfi_inv (i, i); + + mpfr_set_ui (expected, 5, MPFI_RNDU); + mpfr_ui_div (expected, 1, expected, MPFI_RNDD); + mpfi_get_left (got, i); + if (!same_mpfr_value (got, expected)) + error_message (0, i, got); + + mpfr_set_prec (got, 53); + mpfi_get_left (got, i); + if (!same_mpfr_value (got, expected)) + error_message (0, i, got); + + mpfr_set_prec (expected, 3); + mpfr_set_prec (got, 3); + mpfr_set_ui (expected, 5, MPFI_RNDU); + mpfr_ui_div (expected, 1, expected, MPFI_RNDD); + mpfi_get_left (got, i); + if (!same_mpfr_value (got, expected)) + error_message (0, i, got); + + mpfr_set_ui (expected, 3, MPFI_RNDD); + mpfr_ui_div (expected, 1, expected, MPFI_RNDU); + mpfi_get_right (got, i); + if (!same_mpfr_value (got, expected)) + error_message (1, i, got); + + mpfr_set_prec (expected, 53); + mpfr_set_prec (got, 53); + mpfr_set_ui (expected, 3, MPFI_RNDD); + mpfr_ui_div (expected, 1, expected, MPFI_RNDU); + mpfi_get_right (got, i); + if (!same_mpfr_value (got, expected)) + error_message (1, i, got); + + mpfr_set_prec (got, 500); + mpfi_get_right (got, i); + if (!same_mpfr_value (got, expected)) + error_message (1, i, got); + + mpfi_clear (i); + mpfr_clear (got); + mpfr_clear (expected); +} + +int +main (int argc, char **argv) +{ + test_special (); + test_regular (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tget_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tget_fr.c new file mode 100644 index 00000000000..36480473251 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tget_fr.c @@ -0,0 +1,157 @@ +/* tget_fr.c -- Test mpfi_get_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +error_message (mpfi_srcptr i, mpfr_ptr got, mpfr_ptr expected) +{ + printf ("Error: mpfi_get_fr(x, I) returns wrong value.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nGot: "); + mpfr_out_str (stdout, 10, 0, got, MPFI_RNDD); + printf ("\nExpected: "); + mpfr_out_str (stdout, 10, 0, expected, MPFI_RNDD); + printf ("\n"); + exit (1); +} + +void +test_special () +{ + mpfr_t expected, got; + mpfi_t i; + + mpfr_init2 (expected, 53); + mpfr_init2 (got, 53); + mpfi_init2 (i, 53); + + /* [nan, nan] */ + mpfr_set_nan (expected); + mpfi_set_fr (i, expected); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [-17, nan] */ + mpfr_set_si (&(i->left), -17, MPFI_RNDD); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [-inf, -inf] */ + mpfr_set_inf (expected, -1); + mpfi_set_fr (i, expected); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [-inf, 17] */ + mpfr_set_ui (&(i->right), 17, MPFI_RNDD); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [+0, +inf] */ + mpfr_set_ui (&(i->left), 0, MPFI_RNDD); + mpfr_set_inf (expected, +1); + mpfr_set (&(i->right), expected, MPFI_RNDU); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [+inf, +inf] */ + mpfi_set_fr (i, expected); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [-inf, +inf] */ + mpfr_set_inf (&(i->left), -1); + mpfr_set_inf (&(i->right), +1); + mpfr_set_nan (expected); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + /* [+0, -0] */ + mpfr_set_ui (expected, 0, MPFI_RNDU); + mpfi_set_fr (i, expected); + mpfi_get_fr (got, i); + if (!same_mpfr_value (expected, got)) + error_message (i, got, expected); + + mpfr_clear (expected); + mpfr_clear (got); + mpfi_clear (i); +} + +void +test_random (mpfr_prec_t prec_min, mpfr_prec_t prec_max) +{ + mpfr_t x; + mpfi_t i; + mpfr_prec_t prec; + unsigned long pi, px; + + mpfr_init2 (x, prec_max); + mpfi_init2 (i, prec_max); + + for (prec = prec_min; prec < prec_max; prec++) { + mpfi_set_prec (i, prec); + mpfr_set_prec (x, prec); + do { + random_interval (i); + } while (MPFI_INF_P (i)); + mpfi_get_fr (x, i); + if (mpfi_is_inside_fr (x, i) == 0) { + pi = mpfi_get_prec (i); + px = mpfr_get_prec (x); + printf ("Error: mpfi_get_fr (x, I) returns a value x outside the " + "initial interval I, while the precisions are the same.\n" + "precision_I: %lu, I = ", pi); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nprecision_x: %lu, x = ", px); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + } + + mpfr_clear (x); + mpfi_clear (i); +} + +int +main (int argc, char **argv) +{ + test_start (); + test_special (); + test_random (2, 1023); + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tget_version.c b/Build/source/libs/mpfi/mpfi-src/tests/tget_version.c new file mode 100644 index 00000000000..9c377768e42 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tget_version.c @@ -0,0 +1,44 @@ +/* tget_version.c -- Test mpfi_get_version. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + if (strcmp (mpfi_get_version (), PACKAGE_VERSION) != 0) { + printf ("Error: The value return by mpfi_get_version (\"%s\") and the " + "one of the VERSION symbol (" QUOTE(PACKAGE_VERSION) ") differ.\n", + mpfi_get_version ()); + exit (1); + } + + printf ("MPFI version: %s\n", mpfi_get_version ()); + printf ("MPFR version: %s\n", mpfr_get_version ()); + printf ("GMP version: %s\n", gmp_version); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/thas_zero.c b/Build/source/libs/mpfi/mpfi-src/tests/thas_zero.c new file mode 100644 index 00000000000..6587f68a142 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/thas_zero.c @@ -0,0 +1,67 @@ +/* thas_zero.c -- Test mpfi_has_zero. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr i) +{ + printf ("Error: mpfi_has_zero(I) returns wrong value.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n%d", mpfi_has_zero (i)); + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("bounded_p.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_bounded_p (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/thypot.c b/Build/source/libs/mpfi/mpfi-src/tests/thypot.c new file mode 100644 index 00000000000..a967e3f096a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/thypot.c @@ -0,0 +1,45 @@ +/* thypot.c -- Test mpfi_hypot. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_hypot; + + mpfi_fun_init_III (&i_hypot, mpfi_hypot, mpfr_hypot); + + test_start (); + + check_data (&i_hypot, "hypot.dat"); + check_random (&i_hypot, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_hypot); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tincrease.c b/Build/source/libs/mpfi/mpfi-src/tests/tincrease.c new file mode 100644 index 00000000000..0a6d1717139 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tincrease.c @@ -0,0 +1,43 @@ +/* tincrease.c -- Test mpfi_increase. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_increase; + + mpfi_fun_init_IR (&i_increase, mpfi_increase, mpfr_add); + test_start (); + + check_data (&i_increase, "increase.dat"); + + test_end (); + mpfi_fun_clear (&i_increase); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinf_p.c b/Build/source/libs/mpfi/mpfi-src/tests/tinf_p.c new file mode 100644 index 00000000000..7cf309b64a1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinf_p.c @@ -0,0 +1,69 @@ +/* tinf_p.c -- Test mpfi_inf_p. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_inf_p (A) returns %d\nA = ", + mpfi_inf_p (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("inf_p.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_inf_p (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinit.c b/Build/source/libs/mpfi/mpfi-src/tests/tinit.c new file mode 100644 index 00000000000..97a88e64a1a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinit.c @@ -0,0 +1,58 @@ +/* tinit.c -- Test mpfi_init. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + mpfi_t a; + + mpfi_init (a); + if (mpfi_get_prec (a) != mpfr_get_default_prec ()) { + printf ("Error: mpfi_init does not use the default precision of MPFR." + "\nDefault precision in MPFI: %lu" + "\nDefault precision in MPFR: %lu\n", + mpfi_get_prec (a), mpfr_get_default_prec ()); + + exit (1); + } + mpfi_clear (a); + + mpfr_set_default_prec (111); + mpfi_init (a); + if (mpfi_get_prec (a) != mpfr_get_default_prec ()) { + printf ("Error: mpfi_init does not use the default precision of MPFR." + "\nDefault precision in MPFI: %lu" + "\nDefault precision in MPFR: %lu\n", + mpfi_get_prec (a), mpfr_get_default_prec ()); + + exit (1); + } + mpfi_clear (a); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinit_set.c b/Build/source/libs/mpfi/mpfi-src/tests/tinit_set.c new file mode 100644 index 00000000000..31452b49d73 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinit_set.c @@ -0,0 +1,437 @@ +/* tinit_set.c -- Test file for mpfi_init_set functions. + +Copyright 2009, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include +#include "mpfi-tests.h" + +void +check_endpoints (mpfi_ptr i, const char *left, const char *right, + const char *function_name) +{ + mpfr_t l,r; + + mpfr_inits2 (mpfi_get_prec (i), l, r, (mpfr_ptr)0); + + mpfr_set_str (l, left, 0, MPFI_RNDD); + mpfr_set_str (r, right, 0, MPFI_RNDU); + + if (!mpfr_equal_p (&(i->left), l) || !mpfr_equal_p (&(i->right), r)) { + printf ("Error in %s\nexpected [%s, %s]\n got ", + function_name, left, right); + mpfi_out_str (stdout, 16, 0, i); + putchar ('\n'); + exit (1); + } + + mpfr_clears (l, r, (mpfr_ptr)0); +} + +void +check_ui (unsigned long ui, int expected_inex, + const char *left, const char *right) +{ + int inex; + mpfi_t fi; + + inex = mpfi_init_set_ui (fi, ui); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set_ui returns unexpected value with input=%lu and " + "output precision=%lu\nexpected return value: %u, got: %u\n", + ui, mpfi_get_prec (fi), expected_inex, inex); + exit (1); + } + check_endpoints (fi, left, right, "mpfi_init_set_ui"); + if (ui == 0 && (mpfr_signbit (&(fi->left)) || !mpfr_signbit (&(fi->right)))) { + printf ("Error: mpfi_init_set_ui does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + mpfi_clear (fi); +} + +void +check_si (long si, int expected_inex, + const char *left, const char *right) +{ + mpfi_t fi; + int inex; + inex = mpfi_init_set_si (fi, si); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set_si returns unexpected value with input=%lu and " + "output precision=%lu\nexpected return value: %u, got: %u\n", + si, mpfi_get_prec (fi), expected_inex, inex); + exit (1); + } + check_endpoints (fi, left, right, "mpfi_init_set_si"); + if (si == 0 && (mpfr_signbit (&(fi->left)) || !mpfr_signbit (&(fi->right)))) { + printf ("Error: mpfi_init_set_si does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + mpfi_clear(fi); +} + +void +check_d (double d, int expected_inex, + const char *left, const char *right) +{ + mpfi_t fi; + int inex; + inex = mpfi_init_set_d (fi, d); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set_d returns unexpected value with input=%g and " + "output precision=%lu\nexpected return value: %u, got: %u\n", + d, mpfi_get_prec (fi), expected_inex, inex); + exit (1); + } + check_endpoints (fi, left, right, "mpfi_init_set_d"); + if (d == 0.0 + && (mpfr_signbit (&(fi->left)) || !mpfr_signbit (&(fi->right)))) { + printf ("Error: mpfi_init_set_d does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + mpfi_clear(fi); +} + +void +check_z (const char *value, int expected_inex, + const char *left, const char *right) +{ + mpfi_t fi; + int inex; + mpz_t z; + mpz_init (z); + + mpz_set_str (z, value, 0); + inex = mpfi_init_set_z (fi, z); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set_z returns unexpected value with input="); + mpz_out_str (stdout, 10, z); + printf (" and output precision=%lu\nexpected return value: %u, got: %u\n", + mpfi_get_prec (fi), expected_inex, inex); + exit (1); + } + check_endpoints (fi, left, right, "mpfi_init_set_z"); + + if (mpz_cmp_ui (z,0) == 0 + && (mpfr_signbit (&(fi->left)) || !mpfr_signbit (&(fi->right)))) { + printf ("Error: mpfi_init_set_z does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + + mpz_clear (z); + mpfi_clear(fi); +} + +void +check_q (const char *value, int expected_inex, + const char *left, const char *right) +{ + mpfi_t fi; + int inex; + mpq_t q; + mpq_init (q); + + mpq_set_str (q, value, 0); + inex = mpfi_init_set_q (fi, q); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set_q returns unexpected value with input="); + mpq_out_str (stdout, 10, q); + printf (" and output precision=%lu\nexpected return value: %u, got: %u\n", + mpfi_get_prec (fi), expected_inex, inex); + exit (1); + } + check_endpoints (fi, left, right, "mpfi_init_set_q"); + + if (mpq_cmp_ui (q, 0, 1) == 0 + && (mpfr_signbit (&(fi->left)) || !mpfr_signbit (&(fi->right)))) { + printf ("Error: mpfi_init_set_q does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + + mpq_clear (q); + mpfi_clear(fi); +} + +void +check_fr (mpfr_ptr fr, int expected_inex, + const char *left, const char *right) +{ + mpfi_t fi; + int inex; + + inex = mpfi_init_set_fr (fi, fr); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set_fr returns unexpected value with input="); + mpfr_out_str (stdout, 10, 0, fr, MPFI_RNDD); + printf (" and output precision=%lu\nexpected return value: %u, got: %u\n", + mpfi_get_prec (fi), expected_inex, inex); + exit (1); + } + check_endpoints (fi, left, right, "mpfi_init_set_fr"); + + if (mpfr_zero_p (fr) + && (mpfr_signbit (&(fi->left)) || !mpfr_signbit (&(fi->right)))) { + printf ("Error: mpfi_init_set_fr does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + + mpfi_clear(fi); +} + +void +check_fi (mpfi_ptr in, int expected_inex, + const char *left, const char *right) +{ + mpfi_t out; + int inex; + + inex = mpfi_init_set (out, in); + if (inex != expected_inex) { + printf ("Error: mpfi_init_set returns unexpected value with input="); + mpfi_out_str (stdout, 10, 0, in); + printf (" and output precision=%lu\nexpected return value: %u, got: %u\n", + mpfi_get_prec (out), expected_inex, inex); + exit (1); + } + if (!MPFI_NAN_P (in)) { + check_endpoints (out, left, right, "mpfi_init_set"); + } + else if (!mpfr_nan_p (&(out->left)) || !mpfr_nan_p (&(out->right))) { + printf ("Error: mpfi_init_set_fr does not accept NAN\ngot: "); + mpfi_out_str (stdout, 10, 0, out); + putchar ('\n'); + exit (1); + } + + mpfi_clear(out); +} + +int +main (int argc, char **argv) +{ + int inex; + double d; + mpfr_t fr; + mpfi_t fi; + + /* check mpfi_init_set_ui */ + mpfr_set_default_prec(2); + check_ui (0x87654321L, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0b1p+31", "0b11p+30"); + mpfr_set_default_prec(16); + check_ui (0x87654321L, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0x8765@+4", "0x8766@+4"); + mpfr_set_default_prec(64); + check_ui (0x87654321L, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0x87654321", "0x87654321"); + check_ui (0, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + + + /* check mpfi_init_set_si */ + mpfr_set_default_prec(2); + check_si (0x80001L, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0b10p+18", "0b11p+18"); + check_si (-0x80001L, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "-0b11p+18", "-0b10p+18"); + mpfr_set_default_prec(16); + check_si (0x80001L, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0x8000@+1", "0x8001@+1"); + check_si (-0x80001L, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "-0x8001@+1", "-0x8000@+1"); + mpfr_set_default_prec(20); + check_si (0x80001L, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0x80001", "0x80001"); + check_si (-0x80001L, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "-0x80001", "-0x80001"); + check_si (0, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + + + /* check mpfi_init_set_d */ + mpfr_set_default_prec(53); + check_d (1.0e6, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "1.0e6", "1.0e6"); + mpfr_set_default_prec(12); + check_d (0.1, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0x1999@-4", "0x199A@-4"); + check_d (-0.1, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "-0x199A@-4", "-0x1999@-4"); + check_d (+0.0, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + check_d (-0.0, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + + /* NAN, INFINITY, and DBL_MANT_DIG are symbols defined in math.h or float.h + in C99 mode */ +#ifdef NAN + d = NAN; + mpfi_init_set_d (fi, d); + if (!mpfr_nan_p (&(fi->left)) || !mpfr_nan_p (&(fi->right))) { + printf ("Error: mpfi_init_set_d does not accept NAN\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + mpfi_clear (fi); +#endif /* NAN */ + +#ifdef INFINITY + d = INFINITY; + inex = mpfi_init_set_d (fi, d); + if (!MPFI_INF_P (fi)) { + printf ("Error: mpfi_init_set_d does not accept INFINITY\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + if (!MPFI_BOTH_ARE_EXACT (inex)) { + printf ("Error: mpfi_init_set_d(INF) returns unexpected value, " + "expected: %u, got: %u\n", MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, inex); + exit (1); + } + mpfi_clear (fi); +#endif /* INFINITY */ + +#ifdef DBL_MANT_DIG + d = 0.1; + mpfr_set_default_prec (DBL_MANT_DIG); + inex = mpfi_init_set_d (fi, d); + if (!MPFI_BOTH_ARE_EXACT (inex)) { + printf ("Error: mpfi_init_set_d(%g) returns unexpected value, expected: %u, " + "got: %u\n", d, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, inex); + exit (1); + } + +# if DBL_MANT_DIG == 53 + check_endpoints (fi, "0x1999999999999A@-14", "0x1999999999999A@-14", "mpfi_init_set_d"); +# endif + mpfi_clear (fi); +#endif /* DBL_MANT_DIG */ + + + /* check mpfi_init_set_z */ + mpfr_set_default_prec(12); + check_z ("0xffffffffffffff", + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0xffff@+10", "0x10000@+10"); + check_z ("-0xfeffffffffffff", + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "-0xff00@+10", "-0xfeff@+10"); + mpfr_set_default_prec(56); + check_z ("0xffffffffffffff", + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0xffffffffffffff", "0xffffffffffffff"); + check_z ("-0xfeffffffffffff", + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "-0xfeffffffffffff", "-0xfeffffffffffff"); + check_z ("0", + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + + + /* check mpfi_init_set_q */ + mpfr_set_default_prec(2); + check_q ("1/2", + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0x1p-1", "0x1p-1"); + check_q ("5/2", + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "2", "3"); + mpfr_set_default_prec(53); + check_q ("-1/2", + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "-0x1p-1", "-0x1p-1"); + check_q ("-1/3", + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "-0xAAAAAAAAAAAABP-53", "-0x15555555555555P-54"); + check_q ("0/1", + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + + + /* check mpfi_init_set_fr */ + mpfr_init2 (fr, 53); + + mpfr_set_default_prec(2); + mpfr_set_str (fr, "0.5", 10, MPFI_RNDD); + check_fr (fr, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0x8@-1", "0x8@-1"); + mpfr_set_str (fr, "0.1", 10, MPFI_RNDU); + check_fr (fr, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0b11p-5", "0b10p-4"); + + mpfr_set_default_prec(53); + check_fr (fr, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, + "0x1999999999999A@-14", "0x1999999999999A@-14"); + + mpfr_set_ui (fr, 0, MPFI_RNDD); + check_fr (fr, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + mpfr_neg (fr, fr, MPFI_RNDD); + check_fr (fr, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + mpfr_set_inf (fr, -1); + check_fr (fr, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "-@inf@", "-@inf@"); + + mpfr_set_nan (fr); + mpfi_init_set_fr (fi, fr); + if (!mpfr_nan_p (&(fi->left)) || !mpfr_nan_p (&(fi->right))) { + printf ("Error: mpfi_init_set_fr does not accept NAN\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + mpfi_clear (fi); + mpfr_clear (fr); + + + /* check mpfi_init_set */ + mpfi_init2 (fi, 53); + + mpfr_set_default_prec(2); + mpfi_set_str (fi, "0.5", 10); + check_fi (fi, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0x8@-1", "0x8@-1"); + mpfi_set_str (fi, "0.1", 10); + check_fi (fi, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, "0b11p-5", "0b10p-4"); + + mpfr_set_default_prec(53); + check_fi (fi, + MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "0x19999999999999@-14", "0x1999999999999A@-14"); + + mpfr_set_inf (&(fi->left), -1); + mpfr_set_inf (&(fi->right), +1); + check_fi (fi, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "-@inf@", "+@inf@"); + + mpfr_set_ui (&(fi->left), 0, MPFI_RNDD); + mpfr_neg (&(fi->right), &(fi->left), MPFI_RNDU); + check_fi (fi, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "+0", "-0"); + + mpfr_set_nan (&(fi->left)); + mpfr_set_nan (&(fi->right)); + check_fi (fi, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, "@nan@", "@nan@"); + + mpfi_clear (fi); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinits.c b/Build/source/libs/mpfi/mpfi-src/tests/tinits.c new file mode 100644 index 00000000000..3f5e4e9edf9 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinits.c @@ -0,0 +1,76 @@ +/* Test file for mpfi_init2, mpfi_inits, mpfi_inits2 and mpfi_clears. + +Copyright 2018 Free Software Foundation, Inc. +Contributed by the AriC project, INRIA. + +This file is part of the GNU MPFI Library. + +The GNU MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 3 of the License, or (at your +option) any later version. + +The GNU MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the GNU MPFI Library; see the file COPYING.LESSER. If not, see +http://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc., +51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (void) +{ + mpfi_t a, b, c; + long large_prec; + + + mpfi_inits (a, b, c, (mpfi_ptr) 0); + mpfi_clears (a, b, c, (mpfi_ptr) 0); + mpfi_inits2 (200, a, b, c, (mpfi_ptr) 0); + mpfi_clears (a, b, c, (mpfi_ptr) 0); + + /* test for precision 2^31-1, see + https://gforge.inria.fr/tracker/index.php?func=detail&aid=13918 */ +/* this belongs to MPFR, no need to test this here? XXX + large_prec = 2147483647; + if (getenv ("MPFR_CHECK_LARGEMEM") != NULL) + { + size_t min_memory_limit; +*/ + + /* We assume that the precision won't be increased internally. */ +/* this belongs to MPFR, no need to test this here? XXX + if (large_prec > MPFR_PREC_MAX) + large_prec = MPFR_PREC_MAX; +*/ + + /* Increase tests_memory_limit if need be in order to avoid an + obvious failure due to insufficient memory, by choosing a bit + more than the memory used for the variables a and b. Note + that such an increase is necessary, but is not guaranteed to + be sufficient in all cases (e.g. with logging activated). */ +/* this belongs to MPFR, no need to test this here? XXX + min_memory_limit = 2 * (large_prec / MPFR_BYTES_PER_MP_LIMB) + 65536; + if (tests_memory_limit > 0 && tests_memory_limit < min_memory_limit) + tests_memory_limit = min_memory_limit; + + mpfr_inits2 (large_prec, a, b, (mpfr_ptr) 0); + mpfr_set_ui (a, 17, MPFR_RNDN); + mpfr_set (b, a, MPFR_RNDN); + if (mpfr_get_ui (a, MPFR_RNDN) != 17) + { + printf ("Error in mpfr_init2 with precision 2^31-1\n"); + exit (1); + } + mpfr_clears (a, b, (mpfr_ptr) 0); + } +*/ + + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tintersect.c b/Build/source/libs/mpfi/mpfi-src/tests/tintersect.c new file mode 100644 index 00000000000..5d98bc75f06 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tintersect.c @@ -0,0 +1,41 @@ +/* tintersect.c -- Test mpfi_intersect. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_intersect; + + mpfi_fun_init_III (&i_intersect, mpfi_intersect, NULL); + + check_data (&i_intersect, "intersect.dat"); + + mpfi_fun_clear (&i_intersect); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinterv_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_d.c new file mode 100644 index 00000000000..7868baf8305 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_d.c @@ -0,0 +1,126 @@ +/* tinterv_d.c -- Test mpfi_interv_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, double a, double b, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_interv_d (i, a, b); + if (inex != expected_inex) { + printf ("Error: mpfi_interv_d (i, a, b) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision(i) = %lu\na = %g\nb = %g\n", mpfi_get_prec (i), a, b); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_interv_d (i, a, b) failed.\n"); + printf ("\na = %g\nb = %g\ngot i = ", a, b); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 10, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 10, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + mpfr_t x, y; + + double a, b; + mpfi_t i; + + mpfi_init2 (i, 53); + mpfr_init2 (x, 53); + mpfr_init2 (y, 53); + + a = -1; + b = +1; + mpfr_set_d (x, -1, MPFI_RNDD); + mpfr_set_d (y, +1, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 4); + mpfr_set_prec (x, 4); + mpfr_set_prec (y, 4); + a = -1; + b = +40; + mpfr_set_d (x, -1, MPFI_RNDD); + mpfr_set_d (y, +40, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + a = -1; + b = +42.35; + mpfr_set_d (x, -1, MPFI_RNDD); + mpfr_set_d (y, +42.35, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + + a = -0.1; + mpfr_set_d (x, -0.1, MPFI_RNDD); + mpfr_set_d (y, +42.35, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + a = -1e-4; + b = +16; + mpfr_set_d (x, -1e-4, MPFI_RNDD); + mpfr_set_d (y, +16, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + + mpfr_set_nan (x); + a = mpfr_get_d (x, MPFI_RNDD); /* a = NaN, if supported */ + check (i, a, b, y, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfr_set_ui (x, 0, MPFI_RNDD); + mpfr_neg (x, x, MPFI_RNDD); + a = mpfr_get_d (x, MPFI_RNDD); /* a = -0, if supported */ + mpfr_neg (x, x, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_clear (i); + mpfr_clear (x); + mpfr_clear (y); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinterv_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_fr.c new file mode 100644 index 00000000000..88a282d1c6c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_fr.c @@ -0,0 +1,194 @@ +/* tinterv_fr.c -- Test mpfi_interv_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, mpfr_srcptr a, mpfr_srcptr b, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_interv_fr (i, a, b); + if (inex != expected_inex) { + printf ("Error: mpfi_interv_fr (i, a, b) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision(i) = %lu\na =", mpfi_get_prec (i)); + mpfr_out_str (stdout, 10, 0, a, MPFI_RNDD); + printf ("\nb = "); + mpfr_out_str (stdout, 10, 0, b, MPFI_RNDU); + printf ("\n"); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_interv_fr (i, a, b) failed.\n"); + printf ("\na = "); + mpfr_out_str (stdout, 10, 0, a, MPFI_RNDD); + printf ("\nb = "); + mpfr_out_str (stdout, 10, 0, b, MPFI_RNDU); + printf ("\ngot i = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 10, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 10, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + mpfr_t minf, pinf; + mpfr_t mzero, pzero; + mpfr_t nan; + mpfr_t x, y; + mpfr_t xx, yy; + + mpfi_t i; + + mpfi_init2 (i, 53); + mpfr_init2 (x, 53); + mpfr_init2 (y, 53); + mpfr_init2 (xx, 53); + mpfr_init2 (yy, 53); + mpfr_init2 (minf, 53); + mpfr_init2 (pinf, 53); + mpfr_init2 (mzero, 53); + mpfr_init2 (pzero, 53); + mpfr_init2 (nan, 53); + + mpfr_set_nan (nan); + mpfr_set_inf (minf, -1); + mpfr_set_inf (pinf, +1); + mpfr_set_ui (pzero, 0, MPFI_RNDU); + mpfr_neg (mzero, pzero, MPFI_RNDD); + + /* special values */ + check (i, minf, minf, minf, minf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, minf, mzero, minf, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, mzero, minf, minf, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, minf, pzero, minf, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, minf, minf, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, minf, pinf, minf, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pinf, minf, minf, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, minf, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, minf, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + check (i, mzero, mzero, pzero, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, mzero, pzero, pzero, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, mzero, pzero, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, mzero, pinf, pzero, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pinf, mzero, pzero, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, mzero, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, mzero, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + check (i, pzero, pzero, pzero, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, pzero, pzero, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, pinf, pzero, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pinf, pzero, pzero, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, pzero, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + check (i, pinf, pinf, pinf, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pinf, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, pinf, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + check (i, nan, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + /* regular values */ + mpfr_set_si (x, -456789, MPFI_RNDD); + mpfr_set_si (y, 123456, MPFI_RNDU); + check (i, x, y, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, y, x, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, x, minf, minf, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, minf, x, minf, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, x, mzero, x, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, mzero, x, x, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, y, mzero, pzero, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, mzero, y, pzero, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, x, pzero, x, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, x, x, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, y, pzero, pzero, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pzero, y, pzero, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, x, pinf, x, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pinf, x, x, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, y, pinf, y, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, pinf, y, y, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, x, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, x, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, y, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, x, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfr_set_si (x, -400009, MPFI_RNDD); + mpfr_set_si (y, 100007, MPFI_RNDU); + mpfi_set_prec (i, 12); + mpfr_set_prec (xx, 12); + mpfr_set_prec (yy, 12); + mpfr_set (xx, x, MPFI_RNDD); + mpfr_set (yy, y, MPFI_RNDU); + check (i, x, y, xx, yy, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + check (i, y, x, xx, yy, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + mpfr_set (xx, x, MPFI_RNDU); + check (i, x, minf, minf, xx, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, minf, x, minf, xx, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, y, minf, minf, yy, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, minf, y, minf, yy, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + mpfr_set (xx, x, MPFI_RNDD); + check (i, x, mzero, xx, mzero, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, mzero, x, xx, mzero, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, y, mzero, pzero, yy, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, mzero, y, pzero, yy, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, x, pzero, xx, mzero, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, pzero, x, xx, mzero, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, y, pzero, pzero, yy, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, pzero, y, pzero, yy, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, x, pinf, xx, pinf, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, pinf, x, xx, pinf, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + mpfr_set (yy, y, MPFI_RNDD); + check (i, y, pinf, yy, pinf, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, pinf, y, yy, pinf, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, x, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, x, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, y, nan, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, nan, y, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_clear (i); + mpfr_clear (x); + mpfr_clear (y); + mpfr_clear (xx); + mpfr_clear (yy); + mpfr_clear (minf); + mpfr_clear (pinf); + mpfr_clear (mzero); + mpfr_clear (pzero); + mpfr_clear (nan); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinterv_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_q.c new file mode 100644 index 00000000000..c01e67ee09d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_q.c @@ -0,0 +1,96 @@ +/* tinterv_q.c -- Test mpfi_interv_q. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, mpq_srcptr a, mpq_srcptr b, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_interv_q (i, a, b); + if (inex != expected_inex) { + printf ("Error: mpfi_interv_q (i, a, b) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision(i) = %lu\na =", mpfi_get_prec (i)); + mpq_out_str (stdout, 10, a); + printf ("\nb = "); + mpq_out_str (stdout, 10, b); + printf ("\n"); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_interv_q (i, a, b) failed.\n"); + printf ("\na = "); + mpq_out_str (stdout, 10, a); + printf ("\nb = "); + mpq_out_str (stdout, 10, b); + printf ("\ngot i = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 10, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 10, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + mpfr_t x, y; + + mpq_t a, b; + mpfi_t i; + + mpq_init (a); + mpq_init (b); + mpfi_init2 (i, 53); + mpfr_init2 (x, 53); + mpfr_init2 (y, 53); + + mpq_set_si (a, -1, 3); + mpq_set_ui (b, +1, 1024); + mpfr_set_q (x, a, MPFI_RNDD); + mpfr_set_q (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + check (i, b, b, y, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + mpfr_set_q (y, a, MPFI_RNDU); + check (i, a, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + mpq_clear (a); + mpq_clear (b); + mpfi_clear (i); + mpfr_clear (x); + mpfr_clear (y); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinterv_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_si.c new file mode 100644 index 00000000000..53b5cdb2807 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_si.c @@ -0,0 +1,113 @@ +/* tinterv_si.c -- Test mpfi_interv_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, long a, long b, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_interv_si (i, a, b); + if (inex != expected_inex) { + printf ("Error: mpfi_interv_si (i, a, b) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision(i) = %lu\na = %ld\nb = %ld\n", mpfi_get_prec (i), a, + b); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_interv_si (i, a, b) failed.\n"); + printf ("precision(i) = %lu\n", mpfi_get_prec (i)); + printf ("a = %ld\nb = %ld\ngot i = ", a, b); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 10, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 10, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + mpfr_t x, y; + + long a, b; + mpfi_t i; + + mpfi_init2 (i, 53); + mpfr_init2 (x, 53); + mpfr_init2 (y, 53); + + a = 0; + b = 42; + mpfr_set_ui (x, a, MPFI_RNDD); + mpfr_set_ui (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, b, y, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + mpfr_neg (y, x, MPFI_RNDD); + check (i, a, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + a = +1; + b = +123456; + mpfr_set_si (x, a, MPFI_RNDD); + mpfr_set_si (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + a = -1920; + b = -17; + mpfr_set_si (x, a, MPFI_RNDD); + mpfr_set_si (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 4); + mpfr_set_prec (x, 4); + mpfr_set_prec (y, 4); + mpfr_set_si (x, a, MPFI_RNDD); + mpfr_set_si (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + mpfr_set_si (x, b, MPFI_RNDD); + check (i, b, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + mpfi_clear (i); + mpfr_clear (x); + mpfr_clear (y); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinterv_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_ui.c new file mode 100644 index 00000000000..beccf994a18 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_ui.c @@ -0,0 +1,104 @@ +/* tinterv_ui.c -- Test mpfi_interv_ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, unsigned long a, unsigned long b, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_interv_ui (i, a, b); + if (inex != expected_inex) { + printf ("Error: mpfi_interv_ui (i, a, b) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision(i) = %lu\na = %lu\nb = %lu\n", mpfi_get_prec (i), a, + b); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_interv_ui (i, a, b) failed.\n"); + printf ("\na = %lu\nb = %lu\ngot i = ", a, b); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 10, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 10, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + mpfr_t x, y; + + unsigned long a, b; + mpfi_t i; + + mpfi_init2 (i, 53); + mpfr_init2 (x, 53); + mpfr_init2 (y, 53); + + a = 0; + b = 42; + mpfr_set_ui (x, a, MPFI_RNDD); + mpfr_set_ui (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, b, y, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + mpfr_neg (y, x, MPFI_RNDD); + check (i, a, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + a = 1; + b = 123456; + mpfr_set_ui (x, a, MPFI_RNDD); + mpfr_set_ui (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, b, a, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 4); + mpfr_set_prec (x, 4); + mpfr_set_prec (y, 4); + mpfr_set_ui (x, a, MPFI_RNDD); + mpfr_set_ui (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + mpfr_set_ui (x, b, MPFI_RNDD); + check (i, b, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + mpfi_clear (i); + mpfr_clear (x); + mpfr_clear (y); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinterv_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_z.c new file mode 100644 index 00000000000..70a22b0f84d --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinterv_z.c @@ -0,0 +1,96 @@ +/* tinterv_z.c -- Test mpfi_interv_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, mpz_srcptr a, mpz_srcptr b, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_interv_z (i, a, b); + if (inex != expected_inex) { + printf ("Error: mpfi_interv_z (i, a, b) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision(i) = %lu\na =", mpfi_get_prec (i)); + mpz_out_str (stdout, 10, a); + printf ("\nb = "); + mpz_out_str (stdout, 10, b); + printf ("\n"); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_interv_z (i, a, b) failed.\n"); + printf ("\na = "); + mpz_out_str (stdout, 10, a); + printf ("\nb = "); + mpz_out_str (stdout, 10, b); + printf ("\ngot i = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 10, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 10, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + mpfr_t x, y; + + mpz_t a, b; + mpfi_t i; + + mpz_init (a); + mpz_init (b); + mpfi_init2 (i, 53); + mpfr_init2 (x, 53); + mpfr_init2 (y, 53); + + mpz_set_si (a, -10000); + mpz_fac_ui (b, 53); + mpfr_set_z (x, a, MPFI_RNDD); + mpfr_set_z (y, b, MPFI_RNDU); + check (i, a, b, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, b, a, x, y, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + check (i, a, a, x, x, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + mpfr_set_z (x, b, MPFI_RNDD); + check (i, b, b, x, y, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + mpz_clear (a); + mpz_clear (b); + mpfi_clear (i); + mpfr_clear (x); + mpfr_clear (y); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tinv.c b/Build/source/libs/mpfi/mpfi-src/tests/tinv.c new file mode 100644 index 00000000000..a9f1df3ab50 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tinv.c @@ -0,0 +1,50 @@ +/* tinv.c -- Test mpfi_inv. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +fr_inv (mpfr_ptr y, mpfr_srcptr x, mpfr_rnd_t rnd) +{ + return mpfr_ui_div (y, 1, x, rnd); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_inv; + + mpfi_fun_init_II (&i_inv, mpfi_inv, fr_inv); + test_start (); + + check_data (&i_inv, "inv.dat"); + check_random (&i_inv, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_inv); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tio_str.c b/Build/source/libs/mpfi/mpfi-src/tests/tio_str.c new file mode 100644 index 00000000000..a966e0b5753 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tio_str.c @@ -0,0 +1,220 @@ +/* tio_str.c -- Test mpfi_inp_str and mpfi_out_str. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi_io.h" +#include "mpfi-tests.h" + +#define TMP_FILENAME "io_str.tmp" + +void +check_random_interval (mpfr_prec_t prec_min, mpfr_prec_t prec_max, mpfr_prec_t step) +{ + FILE *tmp_file; + size_t n_written, n_read; + int base; + mpfi_t i; + mpfi_t read; + mpfr_prec_t p; + + mpfi_init2 (i, prec_max); + mpfi_init2 (read, prec_max); + + for (p = prec_min; p < prec_max; p += step) { + mpfi_set_prec (i, p); + mpfi_set_prec (read, p); + random_interval (i); + + for (base = 2; base < 63; ++base) { + tmp_file = fopen (TMP_FILENAME, "w"); + if (tmp_file == NULL) { + printf ("Internal error: cannot open temporary file.\n"); + + exit (1); + } + n_written = mpfi_out_str (tmp_file, base, 0, i); + if (n_written == 0) { + printf ("Error: mpfi_out_str (\""TMP_FILENAME"\", base, 0, I) " + "failed.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nbase = %d\n", base); + + exit (1); + } + if (fclose (tmp_file)) { + printf ("Internal error: cannot close temporary file.\n"); + + exit (1); + } + + tmp_file = fopen (TMP_FILENAME, "r"); + if (tmp_file == NULL) { + printf ("Internal error: cannot open temporary file.\n"); + + exit (1); + } + n_read = mpfi_inp_str (read, tmp_file, base); + /* Note: there is a bug in mpfr_out_str (used by mpfi_out_str): it does + not return the correct number of written characters for a special + values */ + if (mpfi_is_inside (i, read) == 0 + || (!MPFI_NAN_P (i) && !MPFI_INF_P (i) && n_read != n_written)) { + printf ("Error: mpfi_inp_str (I, \""TMP_FILENAME"\", base) did not " + "read correctly the output of mpfi_out_str.\n interval " + "read: \'"); + mpfi_out_str (stdout, 16, 0, read); + printf ("\'\ninterval written: \'"); + mpfi_out_str (stdout, 16, 0, i); + printf ("\'\nbase: %u\n", base); + + if (!MPFI_NAN_P (i) && !MPFI_INF_P (i) && n_read != n_written) { + printf ("mpfi_inp_str did not read the complete output of " + "mpfi_out_str.\nnumber of read characters: %zu\n" + "expected: %zu\n", n_read, n_written); + } + + exit (1); + } + if (fclose (tmp_file)) { + printf ("Internal error: cannot close temporary file.\n"); + exit (1); + } + + } + } + + mpfi_clear (i); + mpfi_clear (read); +} + +void +check_file (const char *datafile) +{ + FILE *stream_mpfr; + FILE *stream_mpfi; + int c; + + int base; + mpfr_prec_t p; + mpfr_t r; + mpfi_t i; + size_t n_mpfr, n_mpfi; + + mpfr_init2 (r, 1024); + mpfi_init2 (i, 1024); + + stream_mpfr = open_file (datafile); + stream_mpfi = open_file (datafile); + + for (p = 2; p < 1024; p += 17) { + mpfr_set_prec (r, p); + mpfi_set_prec (i, p); + for (base = 2; base < 63 ; ++base) { + if (fseek (stream_mpfr, 0, SEEK_SET)) { + printf ("Internal error: cannot reset position to the start of the " + "file \"%s\"\n", datafile); + + exit (1); + } + if (fseek (stream_mpfi, 0, SEEK_SET)) { + printf ("Internal error: cannot reset position to the start of the " + "file \"%s\"\n", datafile); + + exit (1); + } + n_mpfr = mpfr_inp_str (r, stream_mpfr, base, MPFR_RNDN); + n_mpfi = mpfi_inp_str (i, stream_mpfi, base); + + if (n_mpfr != n_mpfi) { + printf ("Error: mpfi_inp_str does not read the same number of " + "characters as mpfr_inp_str in file \"%s\" line 1.\n" + " read: %zu\nexpected: %zu\n", datafile, n_mpfi, n_mpfr); + + exit (1); + } + + if (!mpfi_is_inside_fr (r, i)) { + printf ("Error: when reading the file \"%s\" line 1, the number R " + "read with\nmpfr_inp_str (R, \"%s\", %u, MPFR_RNDN)\nis not " + "included in the interval I read with\nmpfi_inp_str " + "(I, \"%s\", %u)\nR = ", datafile, datafile, base, datafile, + base); + mpfr_out_str (stdout, base, 0, r, MPFR_RNDN); + printf ("(in base %u)\nI = ", base); + mpfi_out_str (stdout, base, 0, i); + printf ("(in base %u)\n", base); + + exit (1); + } + } + + while ((c = getc (stream_mpfr)) != EOF) { + ungetc (c, stream_mpfr); + + n_mpfr = mpfr_inp_str (r, stream_mpfr, 10, MPFR_RNDN); + n_mpfi = mpfi_inp_str (i, stream_mpfi, 10); + + if (n_mpfr != n_mpfi) { + printf ("Error: mpfi_inp_str does not read the same number of " + "characters as mpfr_inp_str in file \"%s\" line 1.\n" + " read: %zu\nexpected: %zu\n", datafile, n_mpfi, n_mpfr); + + exit (1); + } + + if (!mpfi_is_inside_fr (r, i)) { + printf ("Error: when reading the file \"%s\" line 1, the number R " + "read with\nmpfr_inp_str (R, \"%s\", 10, MPFR_RNDN)\nis not " + "included in the interval I read with\nmpfi_inp_str " + "(I, \"%s\", 10)\nR = ", datafile, datafile, datafile); + mpfr_out_str (stdout, 16, 0, r, MPFR_RNDN); + printf ("(in base 16)\nI = "); + mpfi_out_str (stdout, 16, 0, i); + printf ("(in base 16)\n"); + + exit (1); + } + } + } + + fclose (stream_mpfr); + fclose (stream_mpfi); + + mpfr_clear (r); + mpfi_clear (i); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check_random_interval (2, 1000, 43); + check_file ("inp_str.dat"); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_empty.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_empty.c new file mode 100644 index 00000000000..9e3e0f712b5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_empty.c @@ -0,0 +1,64 @@ +/* tis_empty.c -- Test mpfi_is_empty. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + mpfr_prec_t prec_min = 2; + mpfr_prec_t prec_max = 1000; + mpfr_prec_t prec; + int step = 10; + + mpfi_t i; + + test_start (); + mpfi_init2 (i, 1024); + + for (prec = prec_min; prec <= prec_max; prec += step) { + mpfi_set_prec (i, prec); + random_interval (i); + if (mpfi_is_empty (i)) { + printf ("Error: mpfi_is_empty claims that the interval I = "); + mpfi_out_str (stdout, 10, 0, i); + printf (" is empty.\n"); + exit (1); + } + mpfr_swap (&(i->left), &(i->right)); + if (!mpfi_is_empty (i) && !mpfr_equal_p (&(i->left), &(i->right))) { + printf ("Error: mpfi_is_empty claims that the interval I = "); + mpfi_out_str (stdout, 10, 0, i); + printf (" is not empty.\n"); + exit (1); + } + } + + mpfi_clear (i); + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside.c new file mode 100644 index 00000000000..9b68a7ec4ad --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside.c @@ -0,0 +1,136 @@ +/* tis_inside.c -- Test mpfi_is_inside. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpfr_cmp ((min), (max)) > 0) \ + mpfr_swap ((min), (max)); \ + } while (0) + +void +print_error (mpfi_srcptr a, mpfi_srcptr b) +{ + printf ("Error: mpfi_is_inside (A, B) returns %d\nA = ", + mpfi_is_inside (a, b)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nB = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t i1, i2; + mpfr_t a, b, c, d; + int i; + + mpfr_init2 (a, 53); + mpfr_init2 (b, 53); + mpfr_init2 (c, 53); + mpfr_init2 (d, 53); + mpfi_init2 (i1, 53); + mpfi_init2 (i2, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpfr (a); + random_mpfr (b); + random_mpfr (c); + random_mpfr (d); + ORDER (a, b); + ORDER (a, c); + ORDER (a, d); + ORDER (b, c); + ORDER (b, d); + ORDER (c, d); + + mpfi_interv_fr (i1, a, b); + mpfi_interv_fr (i2, c, d); + if (mpfi_is_inside (i1, i2) && !mpfr_equal_p (b, c)) { + print_error (i1, i2); + } + if (mpfi_is_inside (i2, i1) && !mpfr_equal_p (b, c)) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_is_inside (i1, i2)) { + print_error (i1, i2); + } + + mpfi_interv_fr (i1, a, c); + mpfi_interv_fr (i2, b, d); + if (mpfi_is_inside (i1, i2) && !mpfr_equal_p (a, b) + && !mpfr_equal_p (b, c) && !mpfr_equal_p (c, d)) { + print_error (i1, i2); + } + if (mpfi_is_inside (i2, i1) && !mpfr_equal_p (a, b) + && !mpfr_equal_p (b, c) && !mpfr_equal_p (c, d)) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_is_inside (i1, i2)) { + print_error (i1, i2); + } + + mpfi_interv_fr (i1, a, d); + mpfi_interv_fr (i2, b, c); + if (!(mpfr_equal_p (a, b) && mpfr_equal_p (c, d)) + && mpfi_is_inside (i1, i2)) { + print_error (i1, i2); + } + if (!mpfi_is_inside (i2, i1)) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_is_inside (i2, i1)) { + print_error (i2, i1); + } + } + + mpfr_clear (a); + mpfr_clear (b); + mpfr_clear (c); + mpfr_clear (d); + mpfi_clear (i1); + mpfi_clear (i2); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_d.c new file mode 100644 index 00000000000..3222f9d6b87 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_d.c @@ -0,0 +1,105 @@ +/* tis_inside_d.c -- Test mpfi_is_inside_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_FLOAT_H +#include +#endif + +/* Warning: DBL_MANT_DIG is not necessary a number of bits */ +#ifndef DBL_MANT_DIG +#define DBL_MANT_DIG 53 +#endif + +#define ORDER(min, max) \ + do { \ + if (min > max) { \ + double tmp; \ + tmp = min; \ + min = max; \ + max = tmp;} \ + } while (0) + +void +print_error (double x, mpfi_srcptr i) +{ + printf ("Error: mpfi_is_inside_d (x, I) returns %d\nx = %g\nI = ", + mpfi_is_inside_d (x, i), x); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check_regular () +{ + mpfi_t interval; + double a, b, c; + int i; + + mpfi_init2 (interval, DBL_MANT_DIG); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + a = random_double (); + b = random_double (); + c = random_double (); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_d (interval, b, c); + if (a != b && mpfi_is_inside_d (a, interval)) { + print_error (a, interval); + } + + mpfi_interv_d (interval, a, c); + if (!mpfi_is_inside_d (b, interval)) { + print_error (b, interval); + } + + mpfi_interv_d (interval, a, b); + if (c != b && mpfi_is_inside_d (c, interval)) { + print_error (c, interval); + } + } + + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check_regular (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_fr.c new file mode 100644 index 00000000000..fe5b787c8ac --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_fr.c @@ -0,0 +1,102 @@ +/* tis_inside_fr.c -- Test mpfi_is_inside_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +print_error (mpfr_srcptr x, mpfi_srcptr i) +{ + printf ("Error: mpfi_is_inside_fr (x, I) returns %d\nx = ", + mpfi_is_inside_fr (x, i)); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + mpfr_t a, b, c; + int i; + + mpfr_init2 (a, 53); + mpfr_init2 (b, 53); + mpfr_init2 (c, 53); + mpfi_init2 (interval, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_interval (interval); + mpfi_alea (b, interval); + mpfr_set (a, &(interval->left), MPFI_RNDD); + mpfr_set (c, &(interval->right), MPFI_RNDU); + + if (!mpfi_is_inside_fr (b, interval)) { + print_error (b, interval); + } + + mpfr_set_nan (&(interval->right)); + if (mpfi_is_inside_fr (b, interval)) { + print_error (b, interval); + } + + mpfi_interv_fr (interval, b, c); + if (!mpfr_equal_p (a, b) && mpfi_is_inside_fr (a, interval)) { + print_error (a, interval); + } + + mpfr_set_nan (&(interval->left)); + if (mpfi_is_inside_fr (a, interval)) { + print_error (a, interval); + } + + mpfi_interv_fr (interval, a, b); + if (!mpfr_equal_p (c, b) && mpfi_is_inside_fr (c, interval)) { + print_error (c, interval); + } + } + + mpfr_clear (a); + mpfr_clear (b); + mpfr_clear (c); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_q.c new file mode 100644 index 00000000000..1aa5020daef --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_q.c @@ -0,0 +1,111 @@ +/* tis_inside_q.c -- Test mpfi_is_inside_q. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpq_cmp ((min), (max)) > 0) \ + mpq_swap ((min), (max)); \ + } while (0) + +void +print_error (mpq_ptr x, mpfi_srcptr i) +{ + printf ("Error: mpfi_is_inside_q (x, I) returns %d\nx = ", + mpfi_is_inside_q (x, i)); + mpq_out_str (stdout, 10, x); + printf ("\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + mpq_t a, b, c; + int i; + + mpq_init (a); + mpq_init (b); + mpq_init (c); + mpfi_init2 (interval, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpq (a); + random_mpq (b); + random_mpq (c); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_q (interval, a, c); + if (!mpfi_is_inside_q (b, interval)) { + print_error (b, interval); + } + + mpfr_set_nan (&(interval->right)); + if (mpfi_is_inside_q (b, interval)) { + print_error (b, interval); + } + + mpfi_interv_q (interval, b, c); + if (mpq_cmp (a, b) != 0 && mpfi_is_inside_q (a, interval)) { + print_error (a, interval); + } + + mpfr_set_nan (&(interval->left)); + if (mpfi_is_inside_q (a, interval)) { + print_error (a, interval); + } + + mpfi_interv_q (interval, a, b); + if (mpq_cmp (c, b) != 0 && mpfi_is_inside_q (c, interval)) { + print_error (c, interval); + } + } + + mpq_clear (a); + mpq_clear (b); + mpq_clear (c); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_si.c new file mode 100644 index 00000000000..ceab2bdd1da --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_si.c @@ -0,0 +1,117 @@ +/* tis_inside_si.c -- Test mpfi_is_inside_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_LIMITS_H +#include +#endif +#ifndef LONG_MAX +# define LONG_MAX +2147483647 +#endif + +#define ORDER(min, max) \ + do { \ + if (min > max) { \ + long tmp; \ + tmp = min; \ + min = max; \ + max = tmp;} \ + } while (0) + +void +print_error (long x, mpfi_srcptr i) +{ + printf ("Error: mpfi_is_inside_si (x, I) returns %d\nx = %ld\nI = ", + mpfi_is_inside_si (x, i), x); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + long a, b, c; + int i; + + i = 1; + a = LONG_MAX; + while (a >>= 1) i++; + + mpfi_init2 (interval, i); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + a = random_si (); + b = random_si (); + c = random_si (); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_si (interval, b, c); + if (a != b && mpfi_is_inside_si (a, interval)) { + print_error (a, interval); + } + + mpfr_set_nan (&(interval->left)); + if (mpfi_is_inside_si (a, interval)) { + print_error (a, interval); + } + + mpfi_interv_si (interval, a, c); + if (!mpfi_is_inside_si (b, interval)) { + print_error (b, interval); + } + + mpfr_set_nan (&(interval->right)); + if (mpfi_is_inside_si (b, interval)) { + print_error (b, interval); + } + + mpfi_interv_si (interval, a, b); + if (c != b && mpfi_is_inside_si (c, interval)) { + print_error (c, interval); + } + } + + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_ui.c new file mode 100644 index 00000000000..700c5f2703b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_ui.c @@ -0,0 +1,117 @@ +/* tis_inside_ui.c -- Test mpfi_is_inside_ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#ifdef HAVE_LIMITS_H +#include +#endif +#ifndef ULONG_MAX +# define ULONG_MAX 4294967295 +#endif + +#define ORDER(min, max) \ + do { \ + if (min > max) { \ + unsigned long tmp; \ + tmp = min; \ + min = max; \ + max = tmp;} \ + } while (0) + +void +print_error (unsigned long x, mpfi_srcptr i) +{ + printf ("Error: mpfi_is_inside_ui (x, I) returns %d\nx = %lu\nI = ", + mpfi_is_inside_ui (x, i), x); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + unsigned long a, b, c; + int i; + + i = 1; + a = ULONG_MAX; + while (a >>= 1) i++; + + mpfi_init2 (interval, i); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + a = random_ui (); + b = random_ui (); + c = random_ui (); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_ui (interval, b, c); + if (a != b && mpfi_is_inside_ui (a, interval)) { + print_error (a, interval); + } + + mpfr_set_nan (&(interval->left)); + if (mpfi_is_inside_ui (a, interval)) { + print_error (a, interval); + } + + mpfi_interv_ui (interval, a, c); + if (!mpfi_is_inside_ui (b, interval)) { + print_error (b, interval); + } + + mpfr_set_nan (&(interval->right)); + if (mpfi_is_inside_ui (b, interval)) { + print_error (b, interval); + } + + mpfi_interv_ui (interval, a, b); + if (c != b && mpfi_is_inside_ui (c, interval)) { + print_error (c, interval); + } + } + + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_z.c new file mode 100644 index 00000000000..329d7f18573 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_inside_z.c @@ -0,0 +1,111 @@ +/* tis_inside_z.c -- Test mpfi_is_inside_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpz_cmp ((min), (max)) > 0) \ + mpz_swap ((min), (max)); \ + } while (0) + +void +print_error (mpz_ptr x, mpfi_srcptr i) +{ + printf ("Error: mpfi_is_inside_z (x, I) returns %d\nx = ", + mpfi_is_inside_z (x, i)); + mpz_out_str (stdout, 10, x); + printf ("\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t interval; + mpz_t a, b, c; + int i; + + mpz_init (a); + mpz_init (b); + mpz_init (c); + mpfi_init2 (interval, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpz (a, 100000); + random_mpz (b, 100000); + random_mpz (c, 100000); + ORDER (a, b); + ORDER (a, c); + ORDER (b, c); + + mpfi_interv_z (interval, a, c); + if (!mpfi_is_inside_z (b, interval)) { + print_error (b, interval); + } + + mpfr_set_nan (&(interval->right)); + if (mpfi_is_inside_z (b, interval)) { + print_error (b, interval); + } + + mpfi_interv_z (interval, b, c); + if (mpz_cmp (a, b) != 0 && mpfi_is_inside_z (a, interval)) { + print_error (a, interval); + } + + mpfr_set_nan (&(interval->left)); + if (mpfi_is_inside_z (a, interval)) { + print_error (a, interval); + } + + mpfi_interv_z (interval, a, b); + if (mpz_cmp (c, b) != 0 && mpfi_is_inside_z (c, interval)) { + print_error (c, interval); + } + } + + mpz_clear (a); + mpz_clear (b); + mpz_clear (c); + mpfi_clear (interval); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_neg.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_neg.c new file mode 100644 index 00000000000..6eab10d2c4a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_neg.c @@ -0,0 +1,69 @@ +/* tis_neg.c -- Test mpfi_is_neg. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_neg (A) returns %d\nA = ", + mpfi_is_neg (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("is_neg.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_is_neg (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_nonneg.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_nonneg.c new file mode 100644 index 00000000000..66b794991bb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_nonneg.c @@ -0,0 +1,69 @@ +/* tis_nonneg.c -- Test mpfi_is_nonneg. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_nonneg (A) returns %d\nA = ", + mpfi_is_nonneg (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("is_nonneg.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_is_nonneg (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_nonpos.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_nonpos.c new file mode 100644 index 00000000000..ef0c8c0d763 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_nonpos.c @@ -0,0 +1,69 @@ +/* tis_nonpos.c -- Test mpfi_is_nonpos. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_nonpos (A) returns %d\nA = ", + mpfi_is_nonpos (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("is_nonpos.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_is_nonpos (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_pos.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_pos.c new file mode 100644 index 00000000000..9736afd969f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_pos.c @@ -0,0 +1,69 @@ +/* tis_pos.c -- Test mpfi_is_pos. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_pos (A) returns %d\nA = ", + mpfi_is_pos (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("is_pos.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_is_pos (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_inside.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_inside.c new file mode 100644 index 00000000000..90163829877 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_inside.c @@ -0,0 +1,134 @@ +/* tis_strictly_inside.c -- Test mpfi_is_strictly_inside. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +#define ORDER(min, max) \ + do { \ + if (mpfr_cmp ((min), (max)) > 0) \ + mpfr_swap ((min), (max)); \ + } while (0) + +void +print_error (mpfi_srcptr a, mpfi_srcptr b) +{ + printf ("Error: mpfi_is_strictly_inside (A, B) returns %d\nA = ", + mpfi_is_strictly_inside (a, b)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nB = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\n"); + + exit (1); +} + +void +check () +{ + mpfi_t i1, i2; + mpfr_t a, b, c, d; + int i; + + mpfr_init2 (a, 53); + mpfr_init2 (b, 53); + mpfr_init2 (c, 53); + mpfr_init2 (d, 53); + mpfi_init2 (i1, 53); + mpfi_init2 (i2, 53); + + for (i = 0; i <= 1000; ++i) { + /* random numbers a < b < c */ + random_mpfr (a); + random_mpfr (b); + random_mpfr (c); + random_mpfr (d); + ORDER (a, b); + ORDER (a, c); + ORDER (a, d); + ORDER (b, c); + ORDER (b, d); + ORDER (c, d); + + mpfi_interv_fr (i1, a, b); + mpfi_interv_fr (i2, c, d); + if (mpfi_is_strictly_inside (i1, i2)) { + print_error (i1, i2); + } + if (mpfi_is_strictly_inside (i2, i1)) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_is_strictly_inside (i1, i2)) { + print_error (i1, i2); + } + + mpfi_interv_fr (i1, a, c); + mpfi_interv_fr (i2, b, d); + if (mpfi_is_strictly_inside (i1, i2)) { + print_error (i1, i2); + } + if (mpfi_is_strictly_inside (i2, i1)) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_is_strictly_inside (i1, i2)) { + print_error (i1, i2); + } + + mpfi_interv_fr (i1, a, d); + mpfi_interv_fr (i2, b, c); + if (mpfi_is_strictly_inside (i1, i2)) { + print_error (i1, i2); + } + if (!mpfi_is_strictly_inside (i2, i1) && !mpfr_equal_p (a, b) + && !mpfr_equal_p (b, c) && !mpfr_equal_p (c, d)) { + print_error (i2, i1); + } + mpfr_set_nan (&(i1->right)); + if (mpfi_is_strictly_inside (i2, i1)) { + print_error (i2, i1); + } + } + + mpfr_clear (a); + mpfr_clear (b); + mpfr_clear (c); + mpfr_clear (d); + mpfi_clear (i1); + mpfi_clear (i2); +} + +int +main (int argc, char **argv) +{ + test_start (); + + check (); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_neg.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_neg.c new file mode 100644 index 00000000000..90a6cc74ffa --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_neg.c @@ -0,0 +1,69 @@ +/* tis_strictly_neg.c -- Test mpfi_is_strictly_neg. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_strictly_neg (A) returns %d\nA = ", + mpfi_is_strictly_neg (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("is_strictly_neg.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_is_strictly_neg (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_pos.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_pos.c new file mode 100644 index 00000000000..1e8b08f7bde --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_strictly_pos.c @@ -0,0 +1,69 @@ +/* tis_strictly_pos.c -- Test mpfi_is_strictly_pos. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_strictly_pos (A) returns %d\nA = ", + mpfi_is_strictly_pos (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("is_strictly_pos.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_is_strictly_pos (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tis_zero.c b/Build/source/libs/mpfi/mpfi-src/tests/tis_zero.c new file mode 100644 index 00000000000..6a8c9233c2b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tis_zero.c @@ -0,0 +1,90 @@ +/* tis_zero.c -- Test mpfi_is_zero. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_is_zero (A) returns %d\nA = ", + mpfi_is_zero (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + mpfr_t x; + mpfi_t interval; + mpfr_prec_t p; + + test_start (); + + mpfr_init2 (x, 1024); + mpfi_init2 (interval, 1024); + + mpfi_set_ui (interval, 0); + if (!mpfi_is_zero (interval)) { + print_error (interval); + } + + for (p = 2; p < 1024; ++p) { + mpfr_set_prec (x, p); + mpfi_set_prec (interval, p); + + random_mpfr (x); + mpfi_set_fr (interval, x); + if (mpfi_is_zero (interval) && !mpfr_zero_p (x)) { + print_error (interval); + } + + random_mpfr (x); + if (mpfr_zero_p (x)) + mpfr_nextabove (x); + /* x != 0*/ + mpfi_put_fr (interval, x); + if (mpfi_is_zero (interval)) { + print_error (interval); + } + + mpfr_set_nan (&(interval->left)); + if (mpfi_is_zero (interval)) { + print_error (interval); + } + } + + mpfr_clear (x); + mpfi_clear (interval); + + test_end (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tlog.c b/Build/source/libs/mpfi/mpfi-src/tests/tlog.c new file mode 100644 index 00000000000..d3cfada61f1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tlog.c @@ -0,0 +1,44 @@ +/* tlog.c -- Test mpfi_log. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_log; + + mpfi_fun_init_II (&i_log, mpfi_log, mpfr_log); + test_start (); + + check_data (&i_log, "log.dat"); + check_random (&i_log, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_log); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tlog10.c b/Build/source/libs/mpfi/mpfi-src/tests/tlog10.c new file mode 100644 index 00000000000..b930a91fa5c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tlog10.c @@ -0,0 +1,61 @@ +/* tlog10.c -- Test mpfi_log10. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -100) < 0 + || mpfr_cmp_si (&(a->left), +100) > 0) { + mpfr_set_si (&(a->left), -100, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -100) < 0 + || mpfr_cmp_si (&(a->right), +100) > 0) { + mpfr_set_si (&(a->right), 100, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_log10; + + mpfi_fun_init_II (&i_log10, mpfi_log10, mpfr_log10); + mpfi_restrict_random (&i_log10, restrict_domain); + + test_start (); + + check_data (&i_log10, "log10.dat"); + check_random (&i_log10, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_log10); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tlog1p.c b/Build/source/libs/mpfi/mpfi-src/tests/tlog1p.c new file mode 100644 index 00000000000..7404c125071 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tlog1p.c @@ -0,0 +1,44 @@ +/* tlog1p.c -- Test mpfi_log1p. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_log1p; + + mpfi_fun_init_II (&i_log1p, mpfi_log1p, mpfr_log1p); + test_start (); + + check_data (&i_log1p, "log1p.dat"); + check_random (&i_log1p, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_log1p); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tlog2.c b/Build/source/libs/mpfi/mpfi-src/tests/tlog2.c new file mode 100644 index 00000000000..fa1162d184f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tlog2.c @@ -0,0 +1,44 @@ +/* tlog2.c -- Test mpfi_log2. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_log2; + + mpfi_fun_init_II (&i_log2, mpfi_log2, mpfr_log2); + test_start (); + + check_data (&i_log2, "log2.dat"); + check_random (&i_log2, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_log2); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmag.c b/Build/source/libs/mpfi/mpfi-src/tests/tmag.c new file mode 100644 index 00000000000..6a7dba7564b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmag.c @@ -0,0 +1,107 @@ +/* tmag.c -- Test mpfi_mag. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +test_random (mpfr_prec_t prec_min, mpfr_prec_t prec_max) +{ + mpfr_t x; + mpfi_t i; + mpfr_prec_t prec; + int dl, dr, d0; + int ret; + + mpfr_init2 (x, prec_max); + mpfi_init2 (i, prec_max); + + for (prec = prec_min; prec < prec_max; prec++) { + mpfi_set_prec (i, prec); + mpfr_set_prec (x, prec); + random_interval (i); + ret = mpfi_mag (x, i); + dl = mpfr_cmp_abs (x, &(i->left)); + dr = mpfr_cmp_abs (x, &(i->right)); + if (dl < 0 || dr < 0) { + printf ("Error: mpfi_mag(x, I) returns a value x less than some " + "elements in I.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + d0 = mpfr_cmp_ui (x, 0); + if (d0 < 0) { + printf ("Error: mpfi_mag(x, I) returns a negative value.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + if (dl != 0 && dr != 0 && d0 != 0) { + printf ("Error: mpfi_mag(x, I) returns a value x that is not an " + "endpoint of abs(I).\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + if (ret != 0) { + printf ("Error: mpfi_mag(x, I) returns a nonexact value x while the " + "precisions of x and I are equal.\nprecision(I) = %lu, I = ", + mpfi_get_prec (i)); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nprecision(x) = %lu, x = ", mpfr_get_prec (x)); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + } + + mpfr_clear (x); + mpfi_clear (i); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mag; + + mpfi_fun_init_RI (&i_mag, mpfi_mag, NULL); + + test_start (); + + check_data (&i_mag, "mag.dat"); + test_random (2, 1023); + + test_end (); + mpfi_fun_clear (&i_mag); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmid.c b/Build/source/libs/mpfi/mpfi-src/tests/tmid.c new file mode 100644 index 00000000000..7cc0232884f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmid.c @@ -0,0 +1,118 @@ +/* tmid.c -- Test mpfi_mid. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t i; + mpfr_t expected; + mpfr_t got; + int inex; + + mpfr_init2 (expected, 128); + mpfr_init2 (got, 128); + mpfi_init2 (i, 128); + + mpfr_set_inf (&(i->right), +1); + mpfr_nextbelow (&(i->right)); + mpfr_set (expected, &(i->right), MPFI_RNDD); + mpfr_nextbelow (expected); + mpfr_set (&(i->left), expected, MPFI_RNDD); + mpfr_nextbelow (&(i->left)); + + inex = mpfi_mid (got, i); + + if (mpfr_cmp (got, expected) != 0 || inex != 0) { + printf ("Error: mpfi_mid(I) does not return correct value.\nI ="); + mpfi_out_str (stdout, 16, 0, i); + printf (" result: "); + mpfr_out_str (stdout, 16, 0, got, MPFI_RNDU); + if (inex >= 0) { + printf ("return value: %d\n expected: 0\n", inex); + } + else { + printf ("\nexpected: "); + mpfr_out_str (stdout, 16, 0, expected, MPFI_RNDU); + printf ("\n"); + } + + exit (1); + } + + mpfr_clear (expected); + mpfr_clear (got); + mpfi_clear (i); +} + +void +check_underflow (void) +{ + mpfi_t i; + mpfr_t m; + int inex; + + mpfr_init2 (m, 128); + mpfi_init2 (i, 128); + mpfi_set_ui (i, 0); + mpfr_nextabove (&(i->right)); + + inex = mpfi_mid (m, i); + + if (!mpfr_zero_p (m) || inex >= 0) { + printf ("Error: mpfi_mid(I) does not return correct value.\nI ="); + mpfi_out_str (stdout, 10, 0, i); + printf (" result: "); + mpfr_out_str (stdout, 10, 0, m, MPFI_RNDU); + if (inex >= 0) { + printf ("return value: %d\n expected: -1\n", inex); + } + else { + printf ("\nexpected: 0\n"); + } + exit (1); + } + + mpfr_clear (m); + mpfi_clear (i); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mid; + + mpfi_fun_init_RI (&i_mid, mpfi_mid, NULL); + + check_data (&i_mid, "mid.dat"); + check_overflow (); + check_underflow (); + + mpfi_fun_clear (&i_mid); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmig.c b/Build/source/libs/mpfi/mpfi-src/tests/tmig.c new file mode 100644 index 00000000000..3c915cf7553 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmig.c @@ -0,0 +1,107 @@ +/* tmig.c -- Test mpfi_mig. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +test_random (mpfr_prec_t prec_min, mpfr_prec_t prec_max) +{ + mpfr_t x; + mpfi_t i; + mpfr_prec_t prec; + int dl, dr, d0; + int ret; + + mpfr_init2 (x, prec_max); + mpfi_init2 (i, prec_max); + + for (prec = prec_min; prec < prec_max; prec++) { + mpfi_set_prec (i, prec); + mpfr_set_prec (x, prec); + random_interval (i); + ret = mpfi_mig (x, i); + dl = mpfr_cmp_abs (x, &(i->left)); + dr = mpfr_cmp_abs (x, &(i->right)); + if (dl > 0 || dr > 0) { + printf ("Error: mpfi_mig (x, I) returns a value x greater than some " + "elements in I.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + d0 = mpfr_cmp_ui (x, 0); + if (d0 < 0) { + printf ("Error: mpfi_mig (x, I) returns a negative value.\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + if (dl != 0 && dr != 0 && d0 != 0) { + printf ("Error: mpfi_mig(x, I) returns a value x that is not an " + "endpoint of abs(I).\nI = "); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + if (ret != 0) { + printf ("Error: mpfi_mig(x, I) returns a nonexact value x while the " + "precisions of x and I are equal.\nprecision(I) = %lu, I = ", + mpfi_get_prec (i)); + mpfi_out_str (stdout, 10, 0, i); + printf ("\nprecision(x) = %lu, x = ", mpfr_get_prec (x)); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDD); + printf ("\n"); + exit (1); + } + } + + mpfr_clear (x); + mpfi_clear (i); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mig; + + mpfi_fun_init_RI (&i_mig, mpfi_mig, NULL); + + test_start (); + + check_data (&i_mig, "mig.dat"); + test_random (2, 1023); + + test_end (); + mpfi_fun_clear (&i_mig); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul.c new file mode 100644 index 00000000000..6406b6d118c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul.c @@ -0,0 +1,44 @@ +/* tmul.c -- Test mpfi_mul. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul; + + mpfi_fun_init_III (&i_mul, mpfi_mul, mpfr_mul); + test_start (); + + check_data (&i_mul, "mul.dat"); + check_random (&i_mul, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_mul); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_2exp.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_2exp.c new file mode 100644 index 00000000000..d9b7bd11de7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_2exp.c @@ -0,0 +1,45 @@ +/* tmul_2exp.c -- Test mpfi_mul_2exp. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_2exp; + + mpfi_fun_init_IIU (&i_mul_2exp, mpfi_mul_2exp, mpfr_mul_2exp); + + test_start (); + + check_data (&i_mul_2exp, "mul_2ui.dat"); + check_random (&i_mul_2exp, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_mul_2exp); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_2si.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_2si.c new file mode 100644 index 00000000000..e4a28f55ccc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_2si.c @@ -0,0 +1,45 @@ +/* tmul_2si.c -- Test mpfi_mul_2si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_2si; + + mpfi_fun_init_IIS (&i_mul_2si, mpfi_mul_2si, mpfr_mul_2si); + + test_start (); + + check_data (&i_mul_2si, "mul_2si.dat"); + check_random (&i_mul_2si, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_mul_2si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_2ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_2ui.c new file mode 100644 index 00000000000..3ebec44a292 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_2ui.c @@ -0,0 +1,45 @@ +/* tmul_2ui.c -- Test mpfi_mul_2ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_2ui; + + mpfi_fun_init_IIU (&i_mul_2ui, mpfi_mul_2ui, mpfr_mul_2ui); + + test_start (); + + check_data (&i_mul_2ui, "mul_2ui.dat"); + check_random (&i_mul_2ui, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_mul_2ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_d.c new file mode 100644 index 00000000000..9c3fef71bd2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_d.c @@ -0,0 +1,182 @@ +/* tmul_d.c -- Test mpfi_mul_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr got, mpfi_srcptr a, double d, mpfi_srcptr expected, + int expected_retval) +{ + int ret; + + ret = mpfi_mul_d (got, a, d); + if (ret != expected_retval) { + printf ("Error: mpfi_mul does not return expected value.\ninterval: "); + mpfi_out_str (stdout, 16, 0, a); + printf ("\n factor: %g\n got: %d\nexpected: %d\n", + d, ret, expected_retval); + exit (1); + } + if (!same_value (got, expected)) { + printf ("Error: mpfi_mul does not return expected value.\n" + "interval:"); + mpfi_out_str (stdout, 16, 0, a); + printf ("\n factor: %g\n got:", d); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected:"); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + exit (1); + } +} + +void +check_overflow () +{ + mpfi_t a, b, c; + + mpfi_init2 (a, 53); + mpfi_init2 (b, 53); + mpfi_init2 (c, 53); + + mpfr_set_ui (&(a->left), 10, MPFI_RNDD); + mpfr_set_inf (&(a->right), +1); + mpfr_nextbelow (&(a->right)); + mpfr_set_ui (&(c->left), 15, MPFI_RNDD); + mpfr_set_inf (&(c->right), +1); + check (b, a, 1.5, c, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + + mpfr_set_inf (&(a->left), -1); + mpfr_nextabove (&(a->left)); + mpfr_set_ui (&(a->right), 10, MPFI_RNDU); + mpfr_set_inf (&(c->left), -1); + mpfr_set_ui (&(c->right), 15, MPFI_RNDD); + check (b, a, 1.5, c, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + + mpfr_set_inf (&(a->left), -1); + mpfr_nextabove (&(a->left)); + mpfr_set_str (&(a->right), "0x123456789abcdfp-53", 0, MPFI_RNDU); + mpfr_set_inf (&(c->left), -1); + mpfr_set_str (&(c->right), "0x1b4e81b4e81b4fp-53", 0, MPFI_RNDU); + check (b, a, 1.5, c, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + + mpfi_clear (a); + mpfi_clear (b); + mpfi_clear (c); +} + +void +check_underflow () +{ + mpfi_t a, b, c; + + mpfi_init2 (a, 53); + mpfi_init2 (b, 53); + mpfi_init2 (c, 53); + + mpfr_set_si (&(a->left), 0, MPFI_RNDD); + mpfr_nextabove (&(a->left)); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + mpfi_interv_d (c, 0, 0.5); + check (b, a, 0.5, c, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + + mpfi_interv_d (c, -0.25, 0); + check (b, a, -0.25, c, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + + mpfi_neg (a, a); + mpfi_interv_d (c, -0.125, 0); + check (b, a, 0.125, c, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + + mpfi_interv_d (c, 0.625, 0); + check (b, a, -0.625, c, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + + mpfr_set_si (&(a->left), -1, MPFI_RNDD); + mpfr_set_ui (&(a->right), 0, MPFI_RNDU); + mpfr_nextabove (&(a->right)); + mpfr_set_d (&(c->left), -0.5, MPFI_RNDD); + mpfr_set (&(c->right), &(a->right), MPFI_RNDU); + check (b, a, 0.5, c, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + + mpfi_neg (c, c); + mpfr_set_d (&(c->right), 0.25, MPFI_RNDU); + check (b, a, -0.25, c, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + + mpfi_neg (a, a); + mpfr_set_d (&(c->right), 0.125, MPFI_RNDU); + check (b, a, 0.125, c, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + + mpfi_neg (c, c); + mpfr_set_d (&(c->left), -0.625, MPFI_RNDU); + check (b, a, -0.625, c, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + + mpfi_clear (a); + mpfi_clear (b); + mpfi_clear (c); +} + +void +check_nan () +{ + double nan; + mpfi_t a, b, c; + + nan = 0.0/0.0; + if (nan == nan) + return; + + mpfi_init2 (a, 53); + mpfi_init2 (b, 53); + mpfi_init2 (c, 53); + + mpfi_set_ui (a, 10); + mpfr_set_nan (&(c->left)); + mpfr_set_nan (&(c->right)); + check (b, a, nan, c, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_clear (a); + mpfi_clear (b); + mpfi_clear (c); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_d; + + mpfi_fun_init_IID (&i_mul_d, mpfi_mul_d, mpfr_mul_d); + test_start (); + + check_data (&i_mul_d, "mul_d.dat"); + check_random (&i_mul_d, 2, 1000, 10); + check_overflow (); + check_underflow (); + check_nan (); + + test_end (); + mpfi_fun_clear (&i_mul_d); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_fr.c new file mode 100644 index 00000000000..640a28119ce --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_fr.c @@ -0,0 +1,145 @@ +/* tmul_fr.c -- Test mpfi_mul_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfr_t x; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_init2 (x, 53); + mpfr_set_ui_2exp (x, 1, 1024, MPFI_RNDD); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_mul_fr (a, a, x); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_mul_fr does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_fr does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_mul_fr (a, a, x); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_mul_fr does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_fr does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); + mpfr_clear (x); +} + +void +check_underflow (void) +{ + mpfi_t got, expected; + mpfr_t x; + int inex; + + mpfr_init2 (x, 128); + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpfr_set_ui_2exp (x, 1, -1024, MPFI_RNDD); + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_mul_fr (got, expected, x); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_mul_fr (rop, op, x) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\nx = "); + mpfr_out_str (stdout, 16, 0, x, MPFI_RNDD); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpfr_clear (x); + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_fr; + + mpfi_fun_init_IIR (&i_mul_fr, mpfi_mul_fr, mpfr_mul); + test_start (); + + check_data (&i_mul_fr, "mul_fr.dat"); + check_random (&i_mul_fr, 2, 1000, 10); + check_overflow (); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_mul_fr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_q.c new file mode 100644 index 00000000000..5f36a7757ad --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_q.c @@ -0,0 +1,182 @@ +/* tmul_q.c -- Test mpfi_mul_q. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpq_t q; + int inexact; + + mpq_init (q); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + + /* [3, Max] * 4096/3 = [4096, +oo] */ + mpq_set_ui (q, 4096, 3); + mpfr_set_ui (&(a->left), 3, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_mul_q (a, a, q); + if (!mpfr_inf_p (&(a->right))) { + printf ("Error[1]: mpfi_mul_q does not correctly handle positive " + "overflow.\n"); + exit (1); + } + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error[1]: mpfi_mul_q does not return correct value in positive " + "overflow.\nGot: %d, expected: %d\n", inexact, + MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + exit (1); + } + + /* [3, Max] * -4096/3 = [-oo, -4096] */ + mpfr_set_ui (&(a->left), 3, MPFI_RNDD); + mpfr_set (&(a->right), max, MPFI_RNDU); + mpq_neg (q, q); + + inexact = mpfi_mul_q (a, a, q); + if (!mpfr_inf_p (&(a->left))) { + printf ("Error[1]: mpfi_mul_q does not correctly handle negative " + "overflow.\n"); + exit (1); + } + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error[1]: mpfi_mul_q does not return correct value in negative " + "overflow.\nGot: %d, expected: %d\n", inexact, + MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + exit (1); + } + + /* [-Max, 3] * -4096/3 = [-4096, +oo] */ + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 3, MPFI_RNDU); + + inexact = mpfi_mul_q (a, a, q); + if (!mpfr_inf_p (&(a->right))) { + printf ("Error[2]: mpfi_mul_q does not correctly handle positive " + "overflow.\n"); + exit (1); + } + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error[2]: mpfi_mul_q does not return correct value in positive " + "overflow.\nGot: %d, expected: %d\n", inexact, + MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + exit (1); + } + + /* [-Max, 3] * 4096/3 = [-oo, 4096] */ + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 3, MPFI_RNDU); + mpq_neg (q, q); + + inexact = mpfi_mul_q (a, a, q); + if (!mpfr_inf_p (&(a->left))) { + printf ("Error[2]: mpfi_mul_q does not correctly handle negative " + "overflow.\n"); + exit (1); + } + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error[2]: mpfi_mul_q does not return correct value in negative " + "overflow.\nGot: %d, expected: %d\n", inexact, + MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + exit (1); + } + + mpq_clear (q); + mpfi_clear (a); + mpfr_clear (max); +} + +void +check_underflow (void) +{ + mpfi_t got, expected; + mpq_t q; + int inex; + + mpq_init (q); + mpfi_init2 (got, 128); + mpfi_init2 (expected, 128); + + mpq_set_ui (q, 1, 1024); + mpfi_set_ui (expected, 0); + mpfr_nextbelow (&(expected->left)); + mpfr_nextabove (&(expected->right)); + + inex = mpfi_mul_q (got, expected, q); + if (!MPFI_BOTH_ARE_INEXACT(inex) + || !same_mpfr_value (&(got->left), &(expected->left)) + || !same_mpfr_value (&(got->right), &(expected->right))) { + printf ("Error: mpfi_mul_q (rop, op, q) does not return correct value\n" + "op = "); + mpfi_out_str (stdout, 10, 0, expected); + printf ("\nq = "); + mpq_out_str (stdout, 10, q); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + printf ("\n"); + + if (!MPFI_BOTH_ARE_INEXACT(inex)) { + printf ("return value = %d\nexpected = %d\n", inex, + MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT); + } + + exit (1); + } + + mpq_clear (q); + mpfi_clear (got); + mpfi_clear (expected); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_q; + + mpfi_fun_init_IIQ (&i_mul_q, mpfi_mul_q, mpfr_mul_q); + test_start (); + + check_data (&i_mul_q, "mul_q.dat"); + check_random (&i_mul_q, 2, 1000, 10); + check_overflow (); + check_underflow (); + + test_end (); + mpfi_fun_clear (&i_mul_q); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_si.c new file mode 100644 index 00000000000..5d20d425cc6 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_si.c @@ -0,0 +1,97 @@ +/* tmul_si.c -- Test mpfi_mul_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_mul_si (a, a, 1024); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_mul_si does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_si does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_mul_si (a, a, 1024); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_mul_si does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_si does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_si; + + mpfi_fun_init_IIS (&i_mul_si, mpfi_mul_si, mpfr_mul_si); + + test_start (); + + check_data (&i_mul_si, "mul_si.dat"); + check_random (&i_mul_si, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_mul_si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_ui.c new file mode 100644 index 00000000000..93ec936b2aa --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_ui.c @@ -0,0 +1,97 @@ +/* tmul_ui.c -- Test mpfi_mul_ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_mul_ui (a, a, 1024); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_mul_ui does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_ui does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_mul_ui (a, a, 1024); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_mul_ui does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_ui does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_ui; + + mpfi_fun_init_IIU (&i_mul_ui, mpfi_mul_ui, mpfr_mul_ui); + + test_start (); + + check_data (&i_mul_ui, "mul_ui.dat"); + check_random (&i_mul_ui, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_mul_ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tmul_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tmul_z.c new file mode 100644 index 00000000000..18d423b8335 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tmul_z.c @@ -0,0 +1,100 @@ +/* tmul_z.c -- Test mpfi_mul_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpz_t z; + int inexact; + + mpz_init (z); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpz_set_ui (z, 4096); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_mul_z (a, a, z); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_mul_z does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_z does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_mul_z (a, a, z); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_mul_z does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_mul_z does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpz_clear (z); + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_mul_z; + + mpfi_fun_init_IIZ (&i_mul_z, mpfi_mul_z, mpfr_mul_z); + test_start (); + + check_data (&i_mul_z, "mul_z.dat"); + check_random (&i_mul_z, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_mul_z); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tnan_p.c b/Build/source/libs/mpfi/mpfi-src/tests/tnan_p.c new file mode 100644 index 00000000000..53bb84cb1e5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tnan_p.c @@ -0,0 +1,69 @@ +/* tnan_p.c -- Test mpfi_nan_p. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern int nextchar; + +void +print_error (mpfi_srcptr a) +{ + printf ("Error: mpfi_nan_p (A) returns %d\nA = ", + mpfi_nan_p (a)); + mpfi_out_str (stdout, 10, 0, a); + printf ("\n"); + + exit (1); +} + +int +main (int argc, char **argv) +{ + FILE *stream; + mpfi_t interval; + int expected; + int got; + + mpfi_init2 (interval, 1024); + + stream = open_file ("nan_p.dat"); + + init_reading (stream); + + while (nextchar != EOF) { + read_sign (stream, &expected); + read_mpfi (stream, interval); + + got = mpfi_nan_p (interval); + if (got != expected || got * expected < 0) + print_error (interval); + } + + close_file (stream); + mpfi_clear (interval); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tneg.c b/Build/source/libs/mpfi/mpfi-src/tests/tneg.c new file mode 100644 index 00000000000..caa2b81c111 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tneg.c @@ -0,0 +1,44 @@ +/* tneg.c -- Test mpfi_neg. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_neg; + + mpfi_fun_init_II (&i_neg, mpfi_neg, mpfr_neg); + test_start (); + + check_data (&i_neg, "neg.dat"); + check_random (&i_neg, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_neg); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tput_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tput_d.c new file mode 100644 index 00000000000..a8a02c0cc83 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tput_d.c @@ -0,0 +1,41 @@ +/* tput_d.c -- Test mpfi_put_d. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_put_d; + + mpfi_fun_init_ID (&i_put_d, mpfi_put_d, NULL); + + check_data (&i_put_d, "put_d.dat"); + + mpfi_fun_clear (&i_put_d); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tput_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tput_fr.c new file mode 100644 index 00000000000..77058ff99d3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tput_fr.c @@ -0,0 +1,41 @@ +/* tput_fr.c -- Test mpfi_put_fr. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_put_fr; + + mpfi_fun_init_IR (&i_put_fr, mpfi_put_fr, NULL); + + check_data (&i_put_fr, "put_fr.dat"); + + mpfi_fun_clear (&i_put_fr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tput_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tput_q.c new file mode 100644 index 00000000000..add1113fd57 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tput_q.c @@ -0,0 +1,41 @@ +/* tput_q.c -- Test mpfi_put_q. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_put_q; + + mpfi_fun_init_IQ (&i_put_q, mpfi_put_q, NULL); + + check_data (&i_put_q, "put_q.dat"); + + mpfi_fun_clear (&i_put_q); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tput_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tput_si.c new file mode 100644 index 00000000000..2986d504019 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tput_si.c @@ -0,0 +1,41 @@ +/* tput_si.c -- Test mpfi_put_si. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_put_si; + + mpfi_fun_init_IS (&i_put_si, mpfi_put_si, NULL); + + check_data (&i_put_si, "put_si.dat"); + + mpfi_fun_clear (&i_put_si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tput_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tput_ui.c new file mode 100644 index 00000000000..6e7a2298d3f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tput_ui.c @@ -0,0 +1,41 @@ +/* tput_ui.c -- Test mpfi_put_ui. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_put_ui; + + mpfi_fun_init_IU (&i_put_ui, mpfi_put_ui, NULL); + + check_data (&i_put_ui, "put_ui.dat"); + + mpfi_fun_clear (&i_put_ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tput_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tput_z.c new file mode 100644 index 00000000000..9ea4d00753a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tput_z.c @@ -0,0 +1,41 @@ +/* tput_z.c -- Test mpfi_put_z. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_put_z; + + mpfi_fun_init_IZ (&i_put_z, mpfi_put_z, NULL); + + check_data (&i_put_z, "put_z.dat"); + + mpfi_fun_clear (&i_put_z); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tq_div.c b/Build/source/libs/mpfi/mpfi-src/tests/tq_div.c new file mode 100644 index 00000000000..cd824856212 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tq_div.c @@ -0,0 +1,119 @@ +/* tq_div.c -- Test mpfi_q_div. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +error_message (int inex, int expected_inex, mpfi_ptr got, + mpq_ptr op1, mpfi_ptr op2, mpfi_ptr expected) +{ + printf ("Failed when checking overflow.\nop1 = "); + mpq_out_str (stdout, 10, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 10, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + exit (1); +} + +void +check_overflow (struct mpfi_function_t *i_q_div) +{ + mpfi_ptr got = MPFI_FUN_ARG (*i_q_div, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*i_q_div, 2, mpfi); + mpq_ptr op1 = MPFI_FUN_ARG (*i_q_div, 3, mpq); + mpfi_ptr op2 = MPFI_FUN_ARG (*i_q_div, 4, mpfi); + int inex; + mpfr_exp_t emin; + mpfr_exp_t emax; + + emin = mpfr_get_emin (); + emax = mpfr_get_emax (); + if (-emax < emin - 1) + return; + + mpfi_set_prec (got, 53); + mpfi_set_prec (expected, 53); + mpfi_set_prec (op2, 53); + + /* op2 = [2^-emax, 1] */ + mpfr_set_ui_2exp (&(op2->left), 1, -emax, MPFI_RNDD); + mpfr_set_ui (&(op2->right), 1, MPFI_RNDD); + /* op1 = 6 */ + mpq_set_ui (op1, 6, 1); + inex = mpfi_q_div (got, op1, op2); + mpfr_set_ui (&(expected->left), 6, MPFI_RNDD); + mpfr_set_inf (&(expected->right), +1); + if (inex != 2 || !same_value (got, expected)) { + error_message (inex, 2, got, op1, op2, expected); + } + + /* op1 = 17/3 ~ 6 */ + mpq_set_ui (op1, 17, 3); + inex = mpfi_q_div (got, op1, op2); + mpfr_set_q (&(expected->left), op1, MPFI_RNDD); + if (inex != 3 || !same_value (got, expected)) { + error_message (inex, 3, got, op1, op2, expected); + } + + /* op2 = [-1, -2^-emax] */ + mpfi_neg (op2, op2); + inex = mpfi_q_div (got, op1, op2); + mpfr_set_inf (&(expected->left), -1); + mpq_neg (op1, op1); + mpfr_set_q (&(expected->right), op1, MPFI_RNDU); + if (inex != 3 || !same_value (got, expected)) { + error_message (inex, 3, got, op1, op2, expected); + } + + /* op1 = 6 */ + mpq_set_ui (op1, 6, 1); + inex = mpfi_q_div (got, op1, op2); + mpfr_set_si (&(expected->right), -6, MPFI_RNDU); + if (inex != 1 || !same_value (got, expected)) { + error_message (inex, 1, got, op1, op2, expected); + } +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_q_div; + + mpfi_fun_init_IQI (&i_q_div, mpfi_q_div, NULL); + + check_data (&i_q_div, "q_div.dat"); + check_overflow (&i_q_div); + + mpfi_fun_clear (&i_q_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tq_sub.c b/Build/source/libs/mpfi/mpfi-src/tests/tq_sub.c new file mode 100644 index 00000000000..894e7927d57 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tq_sub.c @@ -0,0 +1,121 @@ +/* tq_sub.c -- Test mpfi_q_sub. + +Copyright 2010, 2012, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfi_t interval; + mpfi_t got; + mpq_t q; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + mpq_init (q); + + /* right overflow: 1023 - [-Max, 0] = [1023, +oo] */ + mpq_set_ui (q, 1023, 1); + mpfr_set_inf (&(interval->left), -1); + mpfr_nextabove (&(interval->left)); + mpfr_set_ui (&(interval->right), 0, MPFI_RNDU); + + inex = mpfi_q_sub (got, q, interval); + + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp_q (&(got->left), q) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_q_sub (rop, q, op) does not correctly handle " + "overflow.\n q = "); + mpq_out_str (stdout, 16, q); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: -1023 - [0, Max] = [-oo, -1023] */ + mpq_neg (q, q); + mpfi_neg (interval, interval); + + inex = mpfi_q_sub (got, q, interval); + + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -1023) != 0) { + printf ("Error: mpfi_q_sub (rop, q, op) does not correctly handle " + "overflow.\n q = "); + mpq_out_str (stdout, 16, q); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpq_clear (q); + mpfi_clear (interval); + mpfi_clear (got); +} + +#ifndef HAVE_MPFR_Q_SUB +/* fake non-existing function */ +int +mpfr_q_sub (mpfr_ptr x, mpq_srcptr q, mpfr_srcptr y, mpfr_rnd_t rnd) +{ + int ret; + + /* invert rounding mode */ + if (rnd == MPFI_RNDU) + rnd = MPFI_RNDD; + else if (rnd == MPFI_RNDD) + rnd = MPFI_RNDU; + ret = mpfr_sub_q (x, y, q, rnd); + mpfr_neg (x, x, MPFI_RNDU); + return -ret; +} +#endif /* HAVE_MPFR_Q_SUB */ + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_q_sub; + + mpfi_fun_init_IQI (&i_q_sub, mpfi_q_sub, mpfr_q_sub); + test_start (); + + check_data (&i_q_sub, "q_sub.dat"); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_q_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/trec_sqrt.c b/Build/source/libs/mpfi/mpfi-src/tests/trec_sqrt.c new file mode 100644 index 00000000000..8ca276ffabc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/trec_sqrt.c @@ -0,0 +1,44 @@ +/* tsqrt.c -- Test mpfi_sqrt. + +Copyright 2009, 2010, 2019 + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Aric, former Arenaire, project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_rec_sqrt; + + mpfi_fun_init_I (&i_rec_sqrt, mpfr_rec_sqrt, mpfr_rec_sqrt); + test_start (); + + check_data (&i_rec_sqrt, "rec_sqrt.dat"); + check_random (&i_rec_sqrt, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_rec_sqrt); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tround_prec.c b/Build/source/libs/mpfi/mpfi-src/tests/tround_prec.c new file mode 100644 index 00000000000..fd9c0811f66 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tround_prec.c @@ -0,0 +1,183 @@ +/* tround_prec.c -- Test mpfi_round_prec. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check (mpfi_ptr i, mpfr_prec_t new_prec, + mpfr_srcptr expected_left, mpfr_srcptr expected_right, + int expected_inex) +{ + int inex; + + inex = mpfi_round_prec (i, new_prec); + if (inex != expected_inex) { + printf ("Error: mpfi_round_prec (i, p) returns %d instead of %d\n", + inex, expected_inex); + printf ("precision of i before function call = %lu\np = %lu\n", + mpfi_get_prec (i), new_prec); + exit (1); + } + if (!same_mpfr_value (&(i->left), expected_left) + || !same_mpfr_value (&(i->right), expected_right)) { + printf ("Error: mpfi_round_prec (i, p) failed.\n"); + printf ("precision of i before function call = %lu\np = %lu\n", + mpfi_get_prec (i), new_prec); + printf ("\ngot i = "); + mpfi_out_str (stdout, 2, 0, i); + printf ("\nexpected = ["); + mpfr_out_str (stdout, 2, 0, expected_left, MPFI_RNDD); + printf (", "); + mpfr_out_str (stdout, 2, 0, expected_right, MPFI_RNDU); + printf ("]\n"); + exit (1); + } +} + +void +special (void) +{ + mpfr_t minf, pinf; + mpfr_t mzero, pzero; + mpfr_t nan; + mpfi_t i; + + mpfi_init2 (i, 53); + mpfr_init2 (minf, 53); + mpfr_init2 (pinf, 53); + mpfr_init2 (mzero, 53); + mpfr_init2 (pzero, 53); + mpfr_init2 (nan, 53); + + mpfr_set_nan (nan); + mpfr_set_inf (minf, -1); + mpfr_set_inf (pinf, +1); + mpfr_set_ui (pzero, 0, MPFI_RNDU); + mpfr_neg (mzero, pzero, MPFI_RNDD); + + mpfr_set (&(i->left), minf, MPFI_RNDD); + mpfr_set (&(i->right), minf, MPFI_RNDU); + check (i, 2, minf, minf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), minf, MPFI_RNDD); + mpfr_set (&(i->right), mzero, MPFI_RNDU); + check (i, 3, minf, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), minf, MPFI_RNDD); + mpfr_set (&(i->right), pinf, MPFI_RNDU); + check (i, 4, minf, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), minf, MPFI_RNDD); + mpfr_set_nan (&(i->right)); + check (i, 5, minf, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), pzero, MPFI_RNDD); + mpfr_set (&(i->right), mzero, MPFI_RNDU); + check (i, 6, pzero, mzero, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), pzero, MPFI_RNDD); + mpfr_set (&(i->right), pinf, MPFI_RNDU); + check (i, 7, pzero, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), pzero, MPFI_RNDD); + mpfr_set_nan (&(i->right)); + check (i, 8, pzero, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), pinf, MPFI_RNDD); + mpfr_set (&(i->right), pinf, MPFI_RNDU); + check (i, 9, pinf, pinf, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_set_prec (i, 53); + mpfr_set_nan (&(i->left)); + mpfr_set_nan (&(i->right)); + check (i, 10, nan, nan, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + mpfi_clear (i); + mpfr_clear (minf); + mpfr_clear (pinf); + mpfr_clear (mzero); + mpfr_clear (pzero); + mpfr_clear (nan); +} + +void +swing (void) +{ + mpfr_prec_t p; + mpfi_t i; + mpfr_t left, right, tmp; + int inex [2] = { + MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT, + MPFI_FLAGS_LEFT_ENDPOINT_INEXACT + }; + + mpfi_init2 (i, 1024); + mpfr_init2 (left, 53); + mpfr_init2 (right, 53); + mpfr_init (tmp); + + mpfr_set_str (left, "0x35555555555555p-54", 0, MPFI_RNDD); + mpfr_set_str (right, "0x35555555555555p-54", 0, MPFI_RNDU); + + mpfi_set_prec (i, 53); + mpfr_set (&(i->left), left, MPFI_RNDD); + mpfr_set (&(i->right), right, MPFI_RNDU); + + check (i, 1024, left, right, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT); + + for (p = 52; p > 2; --p) { + mpfr_set_prec (tmp, p); + mpfr_set (tmp, left, MPFI_RNDD); + mpfr_swap (tmp, left); /* Warning: precisions are swap too */ + + mpfr_set_prec (tmp, p); + mpfr_set (tmp, right, MPFI_RNDU); + mpfr_swap (tmp, right); + + check (i, p, left, right, inex[p % 2]); + } + + mpfi_clear (i); + mpfr_clear (left); + mpfr_clear (right); + mpfr_clear (tmp); +} + +int +main (int argc, char **argv) +{ + special (); + swing (); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsec.c b/Build/source/libs/mpfi/mpfi-src/tests/tsec.c new file mode 100644 index 00000000000..1737021954b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsec.c @@ -0,0 +1,60 @@ +/* tsec.c -- Test mpfi_sec. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -7) < 0 || mpfr_cmp_si (&(a->left), +7) > 0) { + mpfr_set_si (&(a->left), -7, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -7) < 0 + || mpfr_cmp_si (&(a->right), +7) > 0) { + mpfr_set_si (&(a->right), 7, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sec; + + mpfi_fun_init_II (&i_sec, mpfi_sec, mpfr_sec); + mpfi_restrict_random (&i_sec, restrict_domain); + + test_start (); + + check_data (&i_sec, "sec.dat"); + check_random (&i_sec, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_sec); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsech.c b/Build/source/libs/mpfi/mpfi-src/tests/tsech.c new file mode 100644 index 00000000000..20fba185206 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsech.c @@ -0,0 +1,45 @@ +/* tsech.c -- Test mpfi_sech. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sech; + + mpfi_fun_init_II (&i_sech, mpfi_sech, mpfr_sech); + + test_start (); + + check_data (&i_sech, "sech.dat"); + check_random (&i_sech, 2, 512, 10); + + test_end (); + mpfi_fun_clear (&i_sech); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset.c b/Build/source/libs/mpfi/mpfi-src/tests/tset.c new file mode 100644 index 00000000000..9029fb5abd0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset.c @@ -0,0 +1,132 @@ +/* tset.c -- Test file for mpfi_set functions. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_endpoints (mpfi_t i, const char *left, const char *right, + const char *function_name) +{ + mpfr_t l,r; + + mpfr_inits2 (mpfi_get_prec (i), l, r, (mpfr_ptr)0); + + mpfr_set_str (l, left, 0, MPFI_RNDD); + mpfr_set_str (r, right, 0, MPFI_RNDU); + + if (!mpfr_equal_p (&(i->left), l) || !mpfr_equal_p (&(i->right), r)) { + printf ("Error in %s\nexpected [%s, %s]\n got ", + function_name, left, right); + mpfi_out_str (stdout, 16, 0, i); + putchar ('\n'); + exit (1); + } + + mpfr_clears (l, r, (mpfr_ptr)0); +} + +void +check_fi (mpfi_ptr out, mpfi_ptr in, int expected_inex, + const char *left, const char *right) +{ + int inex; + + inex = mpfi_set (out, in); + if (inex != expected_inex) { + printf ("Error: mpfi_set returns unexpected value with input="); + mpfi_out_str (stdout, 10, 0, in); + printf (" and output precision=%lu\nexpected return value: %u, got: %u\n", + mpfi_get_prec (out), expected_inex, inex); + exit (1); + } + check_endpoints (out, left, right, "mpfi_set"); +} + +int +main (int argc, char **argv) +{ + mpfi_t fi1; + mpfi_t fi2; + + mpfi_init2 (fi1, 1024); + mpfi_init2 (fi2, 1024); + + mpfi_set_prec (fi1, 2); + mpfi_set_prec (fi2, 53); + mpfr_set_str (&(fi1->left), "0.1", 0, MPFI_RNDD); + mpfr_set_str (&(fi1->right), "0.1", 0, MPFI_RNDU); + check_fi (fi2, fi1, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, + "0b11p-5", "0b10p-4"); + + mpfr_set_nan (&(fi1->left)); + mpfr_set_nan (&(fi1->right)); + mpfi_set (fi2, fi1); + if (!mpfr_nan_p (&(fi2->left)) || !mpfr_nan_p (&(fi2->right))) { + printf ("Error: mpfi_set does not handle NAN correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi2); + putchar ('\n'); + exit (1); + } + + mpfi_set_prec (fi1, 53); + mpfi_set_prec (fi2, 2); + mpfr_set_str (&(fi1->left), "0.1", 0, MPFI_RNDD); + mpfr_set_str (&(fi1->right), "0.1", 0, MPFI_RNDU); + check_fi (fi2, fi1, MPFI_FLAGS_BOTH_ENDPOINTS_INEXACT, + "0x18@-2", "0x2@-1"); + + mpfr_set_str (&(fi1->left), "0.1", 0, MPFI_RNDD); + mpfr_set_str (&(fi1->right), "0.5", 0, MPFI_RNDU); + check_fi (fi2, fi1, MPFI_FLAGS_LEFT_ENDPOINT_INEXACT, + "0x18@-2", "0x8@-1"); + + mpfr_set_str (&(fi1->left), "-0.5", 0, MPFI_RNDD); + mpfr_set_str (&(fi1->right), "-0.1", 0, MPFI_RNDU); + check_fi (fi2, fi1, MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT, + "-0x8@-1", "-0x18@-2"); + + mpfr_set_inf (&(fi1->left), -1); + mpfr_set_inf (&(fi1->right), -1); + check_fi (fi2, fi1, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, + "-@inf@", "-@inf@"); + + /* signed zeros */ + mpfr_set_ui (&(fi1->left), 0, MPFI_RNDU); + mpfr_neg (&(fi1->right), &(fi1->left), MPFI_RNDD); + check_fi (fi2, fi1, MPFI_FLAGS_BOTH_ENDPOINTS_EXACT, + "+0", "-0"); + if (mpfr_signbit (&(fi2->left)) || !mpfr_signbit (&(fi2->right))) { + printf ("Error: mpfi_set does not handle signed zeros correctly\ngot: "); + mpfi_out_str (stdout, 10, 0, fi2); + putchar ('\n'); + exit (1); + } + + mpfi_clear (fi1); + mpfi_clear (fi2); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_d.c new file mode 100644 index 00000000000..98bca5b6dab --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_d.c @@ -0,0 +1,41 @@ +/* tset_d.c -- Test mpfi_set_d. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_d; + + mpfi_fun_init_ID (&i_set_d, mpfi_set_d, NULL); + + check_data (&i_set_d, "set_d.dat"); + + mpfi_fun_clear (&i_set_d); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_flt.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_flt.c new file mode 100644 index 00000000000..87c7b777fda --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_flt.c @@ -0,0 +1,38 @@ +/* tset_flt.c -- Test mpfi_set_flt. + +Copyright 2018 + AriC project, Inria Grenoble - Rhone-Alpes, France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_flt; + + mpfi_fun_init_IF (&i_set_flt, mpfi_set_flt, NULL); + + check_data (&i_set_flt, "set_flt.dat"); + + mpfi_fun_clear (&i_set_flt); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_fr.c new file mode 100644 index 00000000000..28656646e67 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_fr.c @@ -0,0 +1,41 @@ +/* tset_fr.c -- Test mpfi_set_fr. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_fr; + + mpfi_fun_init_IR (&i_set_fr, mpfi_set_fr, NULL); + + check_data (&i_set_fr, "set_fr.dat"); + + mpfi_fun_clear (&i_set_fr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_ld.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_ld.c new file mode 100644 index 00000000000..4228d403657 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_ld.c @@ -0,0 +1,38 @@ +/* tset_ld.c -- Test mpfi_set_ld. + +Copyright 2018 + AriC project, Inria Grenoble - Rhone-Alpes, France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_ld; + + mpfi_fun_init_IL (&i_set_ld, mpfi_set_ld, NULL); + + check_data (&i_set_ld, "set_ld.dat"); + + mpfi_fun_clear (&i_set_ld); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_q.c new file mode 100644 index 00000000000..9739ee62675 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_q.c @@ -0,0 +1,41 @@ +/* tset_q.c -- Test mpfi_set_q. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_q; + + mpfi_fun_init_IQ (&i_set_q, mpfi_set_q, NULL); + + check_data (&i_set_q, "set_q.dat"); + + mpfi_fun_clear (&i_set_q); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_si.c new file mode 100644 index 00000000000..95dd939c980 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_si.c @@ -0,0 +1,41 @@ +/* tset_si.c -- Test mpfi_set_si. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_si; + + mpfi_fun_init_IS (&i_set_si, mpfi_set_si, NULL); + + check_data (&i_set_si, "set_si.dat"); + + mpfi_fun_clear (&i_set_si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_str.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_str.c new file mode 100644 index 00000000000..9346d2f8498 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_str.c @@ -0,0 +1,235 @@ +/* tset_str.c -- Test file for mpfi_set_str. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_endpoints (mpfi_ptr i, const char *left, const char *right) +{ + mpfr_t l,r; + + mpfr_inits2 (mpfi_get_prec (i), l, r, (mpfr_ptr)0); + + mpfr_set_str (l, left, 0, MPFI_RNDD); + mpfr_set_str (r, right, 0, MPFI_RNDU); + + if (!mpfr_equal_p (&(i->left), l) || !mpfr_equal_p (&(i->right), r)) { + printf ("Error in mpfi_set_str\nexpected [%s, %s]\n got ", + left, right); + mpfi_out_str (stdout, 16, 0, i); + putchar ('\n'); + exit (1); + } + + mpfr_clears (l, r, (mpfr_ptr)0); +} + +void +check_str (mpfi_ptr fi, const char *value, const char *left, const char *right) +{ + int ret; + ret = mpfi_set_str (fi, value, 0); + if (ret) { + printf ("Error when parsing \"%s\"\n", value); + exit (1); + } + check_endpoints (fi, left, right); +} + +void +check_base (mpfi_ptr fi, const char *value, int base, + const char *left, const char *right) +{ + int ret; + ret = mpfi_set_str (fi, value, base); + if (ret) { + printf ("Error when parsing \"%s\"\n", value); + exit (1); + } + check_endpoints (fi, left, right); +} + +void +check_invalid_string (mpfi_ptr fi, const char* s, int base) +{ + int ret; + + ret = mpfi_set_str (fi, s, base); + if (ret != 1) { + printf ("Error when parsing \"%s\":" + " the input string should be considered invalid\n", s); + exit (1); + } +} + +int +main (int argc, char **argv) +{ + int ret; + mpfi_t fi; + + mpfi_init2 (fi, 1024); + + fclose (stderr); /* mute (internal) error messages */ + + /* invalid inputs */ + check_invalid_string (fi, "", 10); + check_invalid_string (fi, " ", 10); + check_invalid_string (fi, ",", 10); + check_invalid_string (fi, "[]", 10); + check_invalid_string (fi, "[,]", 10); + check_invalid_string (fi, "[ ", 10); + check_invalid_string (fi, "[0 ", 10); + check_invalid_string (fi, "[1 , ", 10); + check_invalid_string (fi, "[ 2,", 10); + check_invalid_string (fi, "[3,3.21", 10); + check_invalid_string (fi, "[+4, 44 ", 10); + check_invalid_string (fi, "[-5,5[", 10); + check_invalid_string (fi, "[-6,6 [", 10); + + check_invalid_string (fi, "[0]", 10); + check_invalid_string (fi, "[-1,1,1]", 10); + check_invalid_string (fi, "[2e+2,]", 10); + check_invalid_string (fi, "[,300]", 10); + check_invalid_string (fi, "[+-4,4]", 10); + check_invalid_string (fi, "[5e+,-5]", 10); + check_invalid_string (fi, "[+,6]", 10); + check_invalid_string (fi, "7[1,1]", 10); + check_invalid_string (fi, "[8 8]", 10); + check_invalid_string (fi, "[-0x9,9]", 10); + check_invalid_string (fi, "17 invalid-string", 10); + + check_invalid_string (fi, "[1, 2]", 2); + check_invalid_string (fi, "[1, 3]", 3); + check_invalid_string (fi, "[1, 4]", 4); + check_invalid_string (fi, "[1, 5]", 5); + check_invalid_string (fi, "[1, 6]", 6); + check_invalid_string (fi, "[1, 7]", 7); + check_invalid_string (fi, "[1, 8]", 8); + check_invalid_string (fi, "[1, 9]", 9); + check_invalid_string (fi, "[1, a]", 10); + check_invalid_string (fi, "[1, b]", 11); + check_invalid_string (fi, "[1, c]", 12); + check_invalid_string (fi, "[1, d]", 13); + check_invalid_string (fi, "[1, e]", 14); + check_invalid_string (fi, "[1, f]", 15); + check_invalid_string (fi, "[1, g]", 16); + check_invalid_string (fi, "[1, h]", 17); + check_invalid_string (fi, "[1, i]", 18); + check_invalid_string (fi, "[1, j]", 19); + check_invalid_string (fi, "[1, k]", 20); + check_invalid_string (fi, "[1, l]", 21); + check_invalid_string (fi, "[1, m]", 22); + check_invalid_string (fi, "[1, n]", 23); + check_invalid_string (fi, "[1, o]", 24); + check_invalid_string (fi, "[1, p]", 25); + check_invalid_string (fi, "[1, q]", 26); + check_invalid_string (fi, "[1, r]", 27); + check_invalid_string (fi, "[1, s]", 28); + check_invalid_string (fi, "[1, t]", 29); + check_invalid_string (fi, "[1, u]", 30); + check_invalid_string (fi, "[1, v]", 31); + check_invalid_string (fi, "[1, w]", 32); + check_invalid_string (fi, "[1, x]", 33); + check_invalid_string (fi, "[1, y]", 34); + check_invalid_string (fi, "[1, z]", 35); + + + /* real number inputs */ + check_str (fi, "0", "0", "0"); + check_str (fi, "-1", "-1", "-1"); + check_str (fi, "2e-1", "2e-1", "2e-1"); + + /* special values */ + ret = mpfi_set_str (fi, " [@nan@,@nan@]", 0); + if (ret) { + printf ("Error when parsing \"[@nan@,@nan@]\"\n"); + exit (1); + } + if (!mpfr_nan_p (&(fi->left)) || !mpfr_nan_p (&(fi->right))) { + printf ("Error: mpfi_set_str does not accept NAN\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + ret = mpfi_set_str (fi, "[ 10 , @nan@ ] ", 0); + if (ret) { + printf ("Error when parsing \" [ 10 , @nan@ ] \"\n"); + exit (1); + } + if (!mpfr_nan_p (&(fi->right))) { + printf ("Error: mpfi_set_str does not accept NAN\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + ret = mpfi_set_str (fi, "[@nan@, 20]", 0); + if (ret) { + printf ("Error when parsing \"[ @nan@, 20]\"\n"); + exit (1); + } + if (!mpfr_nan_p (&(fi->left))) { + printf ("Error: mpfi_set_str does not accept NAN\ngot: "); + mpfi_out_str (stdout, 10, 0, fi); + putchar ('\n'); + exit (1); + } + check_str (fi, "[-@inf@, +@inf@]", "-@inf@", "+@inf@"); + check_str (fi, "[+@inf@, -@inf@]", "+@inf@", "-@inf@"); + check_str (fi, "[+0, -0]", "+0", "-0"); + /* no guarantee on the validity of the returned interval */ + check_str (fi, "[-0,+0]", "-0", "+0"); + + + /* check regular values */ + mpfi_set_prec (fi, 2); + check_str (fi, "[0x80001,0x80001]", "0b10p+18", "0b11p+18"); + check_str (fi, "[-0x80001, 0x80001]", "-0b11p+18", "0b11p+18"); + mpfi_set_prec (fi, 16); + check_str (fi, " [0x80001,0xA2310]", "0x8000@+1", "0xa2310"); + check_str (fi, "[ -0xfffff , -0x80001 ] ", "-0x100000", "-0x80000"); + mpfi_set_prec (fi, 20); + check_str (fi, "[-0x80001, 0x80001]", "-0x80001", "0x80001"); + + + /* check bases */ + mpfi_set_prec (fi, 53); + check_base (fi, "101010101010101010101010101010101010101010101010101010101", + 2, "0x155555555555550", "0x155555555555560"); + check_base (fi, "[-10, 10] -ignored-", 3, "-0x3", "+0x3"); + check_base (fi, "[-1@4, 1@40]", 4, "-0x100", "0x1@20"); + check_base (fi, "[-1@53, -1@10]", 5, "-0x85A36366EB71F8@17", "-0x9502F9"); + check_base (fi, "[-1@53, 10]", 6, "-0x20111FB4CE3C18@21", "0x6"); + check_base (fi, "[-1@53, 10]", 7, "-0x1BA95C5079317E@24", "0x7"); + check_base (fi, "[-1@53, 17]", 8, "-0x8@39", "0xf"); + check_base (fi, "[-1@53, 17]", 9, "-0x10112449B5FECD@29", "0x10"); + check_base (fi, "[-1@53, 17]", 16, "-0x1@53", "0x17"); + check_base (fi, "[-baba, zaza]", 36, "-0x808f6", "0x192256"); + + mpfi_clear (fi); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_ui.c new file mode 100644 index 00000000000..656b00500ee --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_ui.c @@ -0,0 +1,41 @@ +/* tset_ui.c -- Test mpfi_set_ui. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_ui; + + mpfi_fun_init_IU (&i_set_ui, mpfi_set_ui, NULL); + + check_data (&i_set_ui, "set_ui.dat"); + + mpfi_fun_clear (&i_set_ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tset_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tset_z.c new file mode 100644 index 00000000000..2665429df2e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tset_z.c @@ -0,0 +1,41 @@ +/* tset_z.c -- Test mpfi_set_z. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_set_z; + + mpfi_fun_init_IZ (&i_set_z, mpfi_set_z, NULL); + + check_data (&i_set_z, "set_z.dat"); + + mpfi_fun_clear (&i_set_z); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsi_div.c b/Build/source/libs/mpfi/mpfi-src/tests/tsi_div.c new file mode 100644 index 00000000000..7c5f09a00bb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsi_div.c @@ -0,0 +1,95 @@ +/* tdiv_si.c -- Test mpfi_si_div. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t interval; + mpfi_t got; + long si = 1024.0; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + + /* right overflow: 1024 / [epsilon, 1] = [1024, +oo] */ + mpfr_set_ui (&(interval->left), 0, MPFI_RNDD); + mpfr_nextabove (&(interval->left)); /* tiny left endpoint x0 */ + mpfr_set_ui (&(interval->right), 1, MPFI_RNDU); + + inex = mpfi_si_div (got, si, interval); + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp_si (&(got->left), si) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_si_div (rop, %ld, op) does not correctly handle " + "overflow.\nop = ", si); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: 1024.0 / [-1, -epsilon] = [-oo, -1024] */ + mpfi_neg (interval, interval); + + inex = mpfi_si_div (got, si, interval); + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -si) != 0) { + printf ("Error: mpfi_si_div (rop, %ld, op) does not correctly handle " + "overflow.\nop = ", si); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpfi_clear (interval); + mpfi_clear (got); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_si_div; + + mpfi_fun_init_ISI (&i_si_div, mpfi_si_div, mpfr_si_div); + + test_start (); + + check_data (&i_si_div, "si_div.dat"); + check_random (&i_si_div, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_si_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsi_sub.c b/Build/source/libs/mpfi/mpfi-src/tests/tsi_sub.c new file mode 100644 index 00000000000..23f1053989c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsi_sub.c @@ -0,0 +1,44 @@ +/* tsi_sub.c -- Test mpfi_si_sub. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_si_sub; + + mpfi_fun_init_ISI (&i_si_sub, mpfi_si_sub, mpfr_si_sub); + test_start (); + + check_data (&i_si_sub, "si_sub.dat"); + check_random (&i_si_sub, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_si_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsin.c b/Build/source/libs/mpfi/mpfi-src/tests/tsin.c new file mode 100644 index 00000000000..dd15db8ad36 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsin.c @@ -0,0 +1,60 @@ +/* tsin.c -- Test mpfi_sin. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -7) < 0 || mpfr_cmp_si (&(a->left), +7) > 0) { + mpfr_set_si (&(a->left), -7, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -7) < 0 + || mpfr_cmp_si (&(a->right), +7) > 0) { + mpfr_set_si (&(a->right), 7, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sin; + + mpfi_fun_init_II (&i_sin, mpfi_sin, mpfr_sin); + mpfi_restrict_random (&i_sin, restrict_domain); + + test_start (); + + check_data (&i_sin, "sin.dat"); + check_random (&i_sin, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_sin); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsinh.c b/Build/source/libs/mpfi/mpfi-src/tests/tsinh.c new file mode 100644 index 00000000000..15729d3282b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsinh.c @@ -0,0 +1,45 @@ +/* tsinh.c -- Test mpfi_sinh. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sinh; + + mpfi_fun_init_II (&i_sinh, mpfi_sinh, mpfr_sinh); + + test_start (); + + check_data (&i_sinh, "sinh.dat"); + check_random (&i_sinh, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_sinh); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsqr.c b/Build/source/libs/mpfi/mpfi-src/tests/tsqr.c new file mode 100644 index 00000000000..ff2d32f7af8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsqr.c @@ -0,0 +1,44 @@ +/* tsqr.c -- Test mpfi_sqr. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sqr; + + mpfi_fun_init_II (&i_sqr, mpfi_sqr, mpfr_sqr); + test_start (); + + check_data (&i_sqr, "sqr.dat"); + check_random (&i_sqr, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_sqr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsqrt.c b/Build/source/libs/mpfi/mpfi-src/tests/tsqrt.c new file mode 100644 index 00000000000..ffabaa54cbe --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsqrt.c @@ -0,0 +1,44 @@ +/* tsqrt.c -- Test mpfi_sqrt. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sqrt; + + mpfi_fun_init_II (&i_sqrt, mpfi_sqrt, mpfr_sqrt); + test_start (); + + check_data (&i_sqrt, "sqrt.dat"); + check_random (&i_sqrt, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_sqrt); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub.c new file mode 100644 index 00000000000..d16a4ebc52e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub.c @@ -0,0 +1,45 @@ +/* tsub.c -- Test mpfi_sub. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub; + + mpfi_fun_init_III (&i_sub, mpfi_sub, mpfr_sub); + + test_start (); + + check_data (&i_sub, "sub.dat"); + check_random (&i_sub, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub_d.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub_d.c new file mode 100644 index 00000000000..a0e60d5157c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub_d.c @@ -0,0 +1,97 @@ +/* tsub_d.c -- Test mpfi_sub_d. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_sub_d (a, a, -1024.5); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_sub_d does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_d does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_sub_d (a, a, 1024.5); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_sub_d does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_d does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub_d; + + mpfi_fun_init_IID (&i_sub_d, mpfi_sub_d, mpfr_sub_d); + + test_start (); + + check_data (&i_sub_d, "sub_d.dat"); + check_random (&i_sub_d, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_sub_d); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub_fr.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub_fr.c new file mode 100644 index 00000000000..65e06839042 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub_fr.c @@ -0,0 +1,106 @@ +/* tsub_fr.c -- Test mpfi_sub_fr. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfr_t x; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_init2 (x, 53); + + /* right overflow: [1, max] - (-2^50) = [2^50 + 1, +oo] */ + mpfr_set_si_2exp (x, -1, 50, MPFI_RNDD); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_sub_fr (a, a, x); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_sub_fr does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact) || MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_fr does not return correct value when positive " + "overflow.\n got = %d\nexpected = %d\n", inexact, + MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + exit (1); + } + + /* left overflow: [-max, 1] - (2^50) = [-oo, -2^50 + 1] */ + mpfr_neg (x, x, MPFI_RNDU); + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_sub_fr (a, a, x); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_sub_fr does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact) || MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_fr does not return correct value when negative " + "overflow.\n got = %d\nexpected = %d\n", inexact, + MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); + mpfr_clear (x); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub_fr; + + mpfi_fun_init_IIR (&i_sub_fr, mpfi_sub_fr, mpfr_sub); + test_start (); + + check_data (&i_sub_fr, "sub_fr.dat"); + check_random (&i_sub_fr, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_sub_fr); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub_q.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub_q.c new file mode 100644 index 00000000000..b409127626e --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub_q.c @@ -0,0 +1,100 @@ +/* tsub_q.c -- Test mpfi_sub_q. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpq_t q; + int inexact; + + mpq_init (q); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpq_set_si (q, -1024, 1); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_sub_q (a, a, q); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_sub_q does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact) || MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_q does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpq_set_si (q, 1024, 1); + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_sub_q (a, a, q); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_sub_q does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact) || MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_q does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpq_clear (q); + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub_q; + + mpfi_fun_init_IIQ (&i_sub_q, mpfi_sub_q, mpfr_sub_q); + test_start (); + + check_data (&i_sub_q, "sub_q.dat"); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_sub_q); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub_si.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub_si.c new file mode 100644 index 00000000000..9ee58c89eee --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub_si.c @@ -0,0 +1,97 @@ +/* tsub_si.c -- Test mpfi_sub_si. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_sub_si (a, a, -1024); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_sub_si does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact) || MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_si does not return correct value when positive " + "overflow.\n"); + exit (1); + } + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_sub_si (a, a, 1024); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_sub_si does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact) || MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_si does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub_si; + + mpfi_fun_init_IIS (&i_sub_si, mpfi_sub_si, mpfr_sub_si); + + test_start (); + + check_data (&i_sub_si, "sub_si.dat"); + check_random (&i_sub_si, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_sub_si); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub_ui.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub_ui.c new file mode 100644 index 00000000000..a1cb48f2fc1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub_ui.c @@ -0,0 +1,79 @@ +/* tsub_ui.c -- Test mpfi_sub_ui. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + int inexact; + + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_sub_si (a, a, 1024); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_sub_si does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact) || MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_si does not return correct value when negative " + "overflow.\n"); + exit (1); + } + + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub_ui; + + mpfi_fun_init_IIU (&i_sub_ui, mpfi_sub_ui, mpfr_sub_ui); + + test_start (); + + check_data (&i_sub_ui, "sub_ui.dat"); + check_random (&i_sub_ui, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_sub_ui); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tsub_z.c b/Build/source/libs/mpfi/mpfi-src/tests/tsub_z.c new file mode 100644 index 00000000000..12eea1f41b3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tsub_z.c @@ -0,0 +1,103 @@ +/* tsub_z.c -- Test mpfi_sub_z. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfr_t max; + mpfi_t a; + mpz_t z; + int inexact; + + mpz_init (z); + mpfi_init2 (a, 53); + mpfr_init2 (max, 53); + mpz_set_si (z, -4096); + mpfr_set_ui (&(a->left), 1, MPFI_RNDD); + mpfr_set_inf (max, +1); + mpfr_nextbelow (max); + mpfr_set (&(a->right), max, MPFI_RNDU); + + inexact = mpfi_sub_z (a, a, z); + + if (!mpfr_inf_p (&(a->right))) { + printf ("Error: mpfi_sub_z does not correctly handle positive " + "overflow.\n"); + exit (1); + } + + if (!MPFI_RIGHT_IS_INEXACT (inexact) || MPFI_LEFT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_z does not return correct value when positive " + "overflow.\n got = %d\nexpected = %d\n", inexact, + MPFI_FLAGS_RIGHT_ENDPOINT_INEXACT); + exit (1); + } + + mpz_neg (z, z); + mpfr_set_inf (max, -1); + mpfr_nextabove (max); + mpfr_set (&(a->left), max, MPFI_RNDD); + mpfr_set_ui (&(a->right), 1, MPFI_RNDU); + + inexact = mpfi_sub_z (a, a, z); + + if (!mpfr_inf_p (&(a->left))) { + printf ("Error: mpfi_sub_z does not correctly handle negative " + "overflow.\n"); + exit (1); + } + + if (!MPFI_LEFT_IS_INEXACT (inexact) || MPFI_RIGHT_IS_INEXACT (inexact)) { + printf ("Error: mpfi_sub_z does not return correct value when negative " + "overflow.\n got = %d\nexpected = %d\n", inexact, + MPFI_FLAGS_LEFT_ENDPOINT_INEXACT); + exit (1); + } + + mpz_clear (z); + mpfi_clear (a); + mpfr_clear (max); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_sub_z; + + mpfi_fun_init_IIZ (&i_sub_z, mpfi_sub_z, mpfr_sub_z); + test_start (); + + check_data (&i_sub_z, "sub_z.dat"); + check_random (&i_sub_z, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_sub_z); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tswap.c b/Build/source/libs/mpfi/mpfi-src/tests/tswap.c new file mode 100644 index 00000000000..2f99a4c62fb --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tswap.c @@ -0,0 +1,65 @@ +/* tget_swap.c -- Test mpfi_swap. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + mpfi_t a, b; + unsigned long pa, pb; + + mpfi_init2 (a, 53); + mpfi_init2 (b, 2); + + mpfr_set_ui (&(a->left), 4, MPFI_RNDD); + mpfr_set_ui (&(a->right), 7, MPFI_RNDU); + mpfr_set_ui (&(b->left), 0, MPFI_RNDD); + mpfr_set_ui (&(b->right), 2, MPFI_RNDU); + mpfi_swap (a, b); + if (mpfr_cmp_ui (&(b->left), 4) != 0 + || mpfr_cmp_ui (&(b->right), 7) != 0 + || mpfr_cmp_ui (&(a->left), 0) != 0 + || mpfr_cmp_ui (&(a->right), 2) != 0) { + printf ("Error: mpfi_swap (a, b) does not swap values.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\n"); + exit (1); + } + if (mpfi_get_prec (a) != 2 || mpfi_get_prec (b) != 53) { + pa = mpfi_get_prec (a); + pb = mpfi_get_prec (b); + printf ("Error: mpfi_swap(a, b) does not swap precisions.\n" + "precision of a = %lu\nprecision of b = %lu", pa, pb); + exit (1); + } + + mpfi_clear (a); + mpfi_clear (b); + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/ttan.c b/Build/source/libs/mpfi/mpfi-src/tests/ttan.c new file mode 100644 index 00000000000..eec764a1e2b --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/ttan.c @@ -0,0 +1,60 @@ +/* ttan.c -- Test mpfi_tan. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +restrict_domain (mpfi_ptr a) +{ + /* speedup some tests restricting the possible random values */ + if (mpfr_cmp_si (&(a->left), -7) < 0 || mpfr_cmp_si (&(a->left), +7) > 0) { + mpfr_set_si (&(a->left), -7, MPFI_RNDD); + } + if (mpfr_cmp_si (&(a->right), -7) < 0 + || mpfr_cmp_si (&(a->right), +7) > 0) { + mpfr_set_si (&(a->right), 7, MPFI_RNDU); + } + return 0; +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_tan; + + mpfi_fun_init_II (&i_tan, mpfi_tan, mpfr_tan); + mpfi_restrict_random (&i_tan, restrict_domain); + + test_start (); + + check_data (&i_tan, "tan.dat"); + check_random (&i_tan, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_tan); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/ttanh.c b/Build/source/libs/mpfi/mpfi-src/tests/ttanh.c new file mode 100644 index 00000000000..7c798e134da --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/ttanh.c @@ -0,0 +1,45 @@ +/* ttanh.c -- Test mpfi_tanh. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_tanh; + + mpfi_fun_init_II (&i_tanh, mpfi_tanh, mpfr_tanh); + + test_start (); + + check_data (&i_tanh, "tanh.dat"); + check_random (&i_tanh, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_tanh); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tui_div.c b/Build/source/libs/mpfi/mpfi-src/tests/tui_div.c new file mode 100644 index 00000000000..6da0dc9db34 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tui_div.c @@ -0,0 +1,95 @@ +/* tui_div.c -- Test mpfi_ui_div. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t interval; + mpfi_t got; + unsigned long ui = 1024.0; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + + /* right overflow: 1024 / [epsilon, 1] = [1024, +oo] */ + mpfr_set_ui (&(interval->left), 0, MPFI_RNDD); + mpfr_nextabove (&(interval->left)); /* tiny left endpoint x0 */ + mpfr_set_ui (&(interval->right), 1, MPFI_RNDU); + + inex = mpfi_ui_div (got, ui, interval); + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp_ui (&(got->left), ui) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_ui_div (rop, %lu, op) does not correctly handle " + "overflow.\nop = ", ui); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: 1024.0 / [-1, -epsilon] = [-oo, -1024] */ + mpfi_neg (interval, interval); + + inex = mpfi_ui_div (got, ui, interval); + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -(long)ui) != 0) { + printf ("Error: mpfi_ui_div (rop, %lu, op) does not correctly handle " + "overflow.\nop = ", ui); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpfi_clear (interval); + mpfi_clear (got); +} + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_ui_div; + + mpfi_fun_init_IUI (&i_ui_div, mpfi_ui_div, mpfr_ui_div); + + test_start (); + + check_data (&i_ui_div, "ui_div.dat"); + check_random (&i_ui_div, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_ui_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tui_sub.c b/Build/source/libs/mpfi/mpfi-src/tests/tui_sub.c new file mode 100644 index 00000000000..81fa0e3d793 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tui_sub.c @@ -0,0 +1,44 @@ +/* tui_sub.c -- Test mpfi_ui_sub. + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_ui_sub; + + mpfi_fun_init_IUI (&i_ui_sub, mpfi_ui_sub, mpfr_ui_sub); + test_start (); + + check_data (&i_ui_sub, "ui_sub.dat"); + check_random (&i_ui_sub, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_ui_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tunion.c b/Build/source/libs/mpfi/mpfi-src/tests/tunion.c new file mode 100644 index 00000000000..e2e8bd5c278 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tunion.c @@ -0,0 +1,68 @@ +/* tunion.c -- Test mpfi_union. + +Copyright 2009, 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +/* the middle of two points is in their convex hull */ +int +middle (mpfr_ptr m, mpfr_srcptr a, mpfr_srcptr b, mpfr_rnd_t rnd) +{ + mpfr_t min, max; + + if (mpfr_cmp (a, b) < 0) { + min[0] = a[0]; + max[0] = b[0]; + } + else { + min[0] = b[0]; + max[0] = a[0]; + } + mpfr_sub (m, max, min, rnd); + mpfr_div_2exp (m, m, 1, rnd); + mpfr_add (m, min, m, rnd); + + return 0; +} + + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_union; + + mpfi_fun_init_III (&i_union, mpfi_union, middle); + + test_start (); + + + check_data (&i_union, "union.dat"); + check_random (&i_union, 2, 1000, 10); + + test_end (); + mpfi_fun_clear (&i_union); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_i.c b/Build/source/libs/mpfi/mpfi-src/tests/type_i.c new file mode 100644 index 00000000000..f41f147db8c --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_i.c @@ -0,0 +1,152 @@ +/* type_i.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_i (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); +} + +void +check_monotonicity (mpfi_function_ptr this) +{ + mpfr_prec_t precision; + mpfr_prec_t initial_precision; + + /* rename operands for better readability */ + I_fun f_I = MPFI_FUN_GET (*this, I); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + initial_precision = mpfi_get_prec (expected); + + for (precision = initial_precision; precision > 1; precision >>= 2) { + mpfi_set_prec (got, precision); + + f_I (got); + + if (!mpfi_is_inside (expected, got)) { + printf ("Failed at precision %lu.\n", precision); + mpfi_out_str (stdout, 2, 0, got); + printf ("\ndoes not include "); + mpfi_out_str (stdout, 2, 0, expected); + putchar ('\n'); + + exit (1); + } + } +} + +void +check_line_i (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + I_fun f_I = MPFI_FUN_GET (*this, I); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_I (got); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.", test_line_number); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + /* monotonic? */ + if (!MPFI_NAN_P (expected)) { + check_monotonicity (this); + } +} + +void +set_prec_i (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_i (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +void +mpfi_fun_init_I (mpfi_function_ptr this, I_fun mpfi_function, + R_fun mpfr_function) +{ + this->type = I; + this->func.I = mpfi_function; + this->mpfr_func.I = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (3 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_i; + this->read_line = read_line_i; + this->check_line = check_line_i; + this->random = NULL; + this->clear = clear_i; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_id.c b/Build/source/libs/mpfi/mpfi-src/tests/type_id.c new file mode 100644 index 00000000000..94838efe35f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_id.c @@ -0,0 +1,134 @@ +/* type_id.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, double). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_id (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_double (fp, &(MPFI_FUN_ARG (*this, 3, d))); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_id (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + ID_fun f_ID = MPFI_FUN_GET (*this, ID); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + double op = MPFI_FUN_ARG (*this, 3, d); + + inex = f_ID (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = %a", test_line_number, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_id (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_id (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (double), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_ID (mpfi_function_ptr this, ID_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = ID; + this->func.ID = mpfi_function; + this->mpfr_func.ID = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (double), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_id; + this->read_line = read_line_id; + this->check_line = check_line_id; + this->random = NULL; + this->clear = clear_id; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_idi.c b/Build/source/libs/mpfi/mpfi-src/tests/type_idi.c new file mode 100644 index 00000000000..d1492605ff2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_idi.c @@ -0,0 +1,201 @@ +/* type_idi.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, double, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_idi (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] double operand */ + read_double (fp, &(MPFI_FUN_ARG (*this, 3, d))); + /* [4] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_idi (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IDI_fun f_IDI = MPFI_FUN_GET (*this, IDI); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + double op1 = MPFI_FUN_ARG (*this, 3, d); + mpfi_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IDI (got, op1, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = %g\nop2 = ", test_line_number, op1); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + + inex = f_IDI (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = %g\nop2 = ", test_line_number, op1); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_idi (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IDI_fun f_IDI = MPFI_FUN_GET (*this, IDI); + RDR_fun f_RDR = MPFI_FUN_MPFR_FUNCTION (*this, IDI); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + double d; + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + d = random_double (); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IDI (b, d, a); + f_RDR (y, d, x, MPFI_RNDD); + + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (d, a), does not contain the " + "point y, image of (d, x) where x is in a.\nd = %g\na = ", d); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_idi (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_idi (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (double), needs no deallocation */ + /* [4] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IDI (mpfi_function_ptr this, IDI_fun mpfi_function, + RDR_fun mpfr_function) +{ + this->type = IDI; + this->func.IDI = mpfi_function; + this->mpfr_func.IDI = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (double), needs no initialization */ + /* [4] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_idi; + this->read_line = read_line_idi; + this->check_line = check_line_idi; + this->random = random_idi; + this->clear = clear_idi; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_if.c b/Build/source/libs/mpfi/mpfi-src/tests/type_if.c new file mode 100644 index 00000000000..d3b85dcfc37 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_if.c @@ -0,0 +1,131 @@ +/* type_if.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, float). + +Copyright 2018, + AriC project, Inria Grenoble - Rhone-Alpes, France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_if (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_float (fp, &(MPFI_FUN_ARG (*this, 3, f))); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_if (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IF_fun f_IF = MPFI_FUN_GET (*this, IF); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + float op = MPFI_FUN_ARG (*this, 3, f); + + inex = f_IF (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = %a", test_line_number, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_if (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_if (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (float), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IF (mpfi_function_ptr this, IF_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IF; + this->func.IF = mpfi_function; + this->mpfr_func.IF = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (float), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_if; + this->read_line = read_line_if; + this->check_line = check_line_if; + this->random = NULL; + this->clear = clear_if; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_ii.c b/Build/source/libs/mpfi/mpfi-src/tests/type_ii.c new file mode 100644 index 00000000000..6f7bb17c93a --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_ii.c @@ -0,0 +1,283 @@ +/* type_ii.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_ii (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); +} + +/* check_with_different_prec used by both check_line_ii and check_line_iii */ +/* when one (at least) endpoint of the result is exact, it can be + used to check the function at a different precision. */ +void +check_with_different_prec (mpfi_function_ptr function, mpfr_prec_t prec) +{ + mpfr_t x; + + /* rename operands for better readability */ + int type_II = MPFI_FUN_TYPE (*function) == II; + II_fun f_II = MPFI_FUN_GET (*function, II); + III_fun f_III = MPFI_FUN_GET (*function, III); + mpfi_ptr got = MPFI_FUN_ARG (*function, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*function, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*function, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*function, 3, mpfi); + mpfi_ptr op2 = type_II ? NULL : MPFI_FUN_ARG (*function, 4, mpfi); + + + mpfr_init2 (x, prec); + mpfi_set_prec (got, prec); + + if (type_II) + f_II (got, op1); + else + f_III (got, op1, op2); + + if (!MPFI_LEFT_IS_INEXACT (expected_inex)) { + mpfr_set (x, &(expected->left), MPFI_RNDD); + if (!same_mpfr_value (x, &(got->left))) { + printf ("Error at precision = %lu (line %lu).\n", + (unsigned long)prec, test_line_number); + if (type_II) { + printf ("op = "); + mpfi_out_str (stdout, 16, 0, op1); + } + else { + printf ("op1 = "); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + } + printf ("\nleft endpoint: got = "); + mpfr_out_str (stdout, 2, 0, &(got->left), MPFI_RNDD); + printf ("\n expected = "); + mpfr_out_str (stdout, 2, 0, x, MPFI_RNDD); + putchar ('\n'); + + exit (1); + } + } + + if (!MPFI_RIGHT_IS_INEXACT (expected_inex)) { + mpfr_set (x, &(expected->right), MPFI_RNDU); + if (!same_mpfr_value (x, &(got->right))) { + printf ("Error at precision = %lu (line %lu).\n", + (unsigned long)prec, test_line_number); + if (type_II) { + printf ("op = "); + mpfi_out_str (stdout, 16, 0, op1); + } + else { + printf ("op1 = "); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + } + printf ("\nright endpoint: got = "); + mpfr_out_str (stdout, 2, 0, &(got->right), MPFI_RNDU); + printf ("\n expected = "); + mpfr_out_str (stdout, 2, 0, x, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } + } + + mpfr_clear (x); +} + + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_ii (mpfi_function_ptr function) +{ + int inex; + + /* rename operands for better readability + [0]: value set by function + [1]: return value (inexact flag) + [2]: expected value + [3]: first operand */ + II_fun f_II = MPFI_FUN_GET (*function, II); + mpfi_ptr got = MPFI_FUN_ARG (*function, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*function, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*function, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*function, 3, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + inex = f_II (got, op1); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\n", test_line_number); + printf ("op = "); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + exit (1); + } + + /* when one endpoint is exact, compute function at lower and higher + precision */ + if (!MPFI_NAN_P (expected) && !MPFI_BOTH_ARE_INEXACT (inex)) { + check_with_different_prec (function, 2); + check_with_different_prec (function, 2 * mpfi_get_prec (expected)); + mpfi_set_prec (got, mpfi_get_prec (expected)); + } + + /* reuse input variable as output (when they have the same precision) */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + inex = f_II (got, got); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_ii (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + II_fun f_II = MPFI_FUN_GET (*this, II); + RR_fun f_RR = MPFI_FUN_MPFR_FUNCTION (*this, II); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_II (b, a); + f_RR (y, x, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the image b of a does not contain the image y " + "of the point x of a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_ii (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_ii (mpfi_function_ptr this) +{ + /* [0] auxiliary variable (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_II (mpfi_function_ptr this, II_fun mpfi_function, + RR_fun mpfr_function) +{ + this->type = II; + this->func.II = mpfi_function; + this->mpfr_func.II = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] auxiliary variable (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_ii; + this->read_line = read_line_ii; + this->check_line = check_line_ii; + this->random = random_ii; + this->clear = clear_ii; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iid.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iid.c new file mode 100644 index 00000000000..643427af078 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iid.c @@ -0,0 +1,202 @@ +/* type_iid.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, double). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iid (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] double operand */ + read_double (fp, &(MPFI_FUN_ARG (*this, 4, d))); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iid (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IID_fun f_IID = MPFI_FUN_GET (*this, IID); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfi); + double op2 = MPFI_FUN_ARG (*this, 4, d); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IID (got, op1, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = %g", op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IID (got, got, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = %g", op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iid (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IID_fun f_IID = MPFI_FUN_GET (*this, IID); + RRD_fun f_RRD = MPFI_FUN_MPFR_FUNCTION (*this, IID); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + double d; + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + d = random_double (); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IID (b, a, d); + f_RRD (y, x, d, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (a, d), does not contain " + "the point y, image of (x, d) where x is in a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nd = %g\nb = ", d); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iid (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_iid (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] operand (double), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IID (mpfi_function_ptr this, IID_fun mpfi_function, + RRD_fun mpfr_function) +{ + this->type = IID; + this->func.IID = mpfi_function; + this->mpfr_func.IID = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (double), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_iid; + this->read_line = read_line_iid; + this->check_line = check_line_iid; + this->random = random_iid; + this->clear = clear_iid; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iii.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iii.c new file mode 100644 index 00000000000..5a51f906621 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iii.c @@ -0,0 +1,256 @@ +/* type_iii.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iii (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] second operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iii (mpfi_function_ptr function) +{ + int inex; + + /* rename operands for better readability + [0]: value set by function + [1]: return value (inexact flag) + [2]: expected value + [3]: first operand + [4]: second operand */ + III_fun f_III = MPFI_FUN_GET (*function, III); + mpfi_ptr got = MPFI_FUN_ARG (*function, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*function, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*function, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*function, 3, mpfi); + mpfi_ptr op2 = MPFI_FUN_ARG (*function, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_III (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\n", test_line_number); + printf ("op1 = "); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + exit (1); + } + + /* when one endpoint is exact, compute function at lower and higher + precision */ + if (!MPFI_NAN_P (expected) && !MPFI_BOTH_ARE_INEXACT (inex)) { + check_with_different_prec (function, 2); + check_with_different_prec (function, 2 * mpfi_get_prec (expected)); + mpfi_set_prec (got, mpfi_get_prec (expected)); + } + + /* reuse input variable as output (when they have the same precision) */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_III (got, got, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } + + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + inex = f_III (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing second argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of random points chosen in the given intervals is in the + image of these intervals. */ +void +random_iii (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + III_fun f_III = MPFI_FUN_GET (*this, III); + RRR_fun f_RRR = MPFI_FUN_MPFR_FUNCTION (*this, III); + mpfi_ptr c = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr b = MPFI_FUN_ARG (*this, 3, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + mpfr_t z; + + mpfr_init2 (z, mpfi_get_prec (c)); + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + random_interval (b); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (b); + } + mpfi_alea (y, b); + f_III (c, a, b); + f_RRR (z, x, y, MPFI_RNDD); + if (!mpfr_nan_p (z) && !MPFI_NAN_P (c) && !mpfi_is_inside_fr (z, c)) { + printf ("Error: the image c of (a, b) does not contain the image z " + "of (x, y) where x (resp. y) is in a (resp. b).\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nc = "); + mpfi_out_str (stdout, 10, 0, c); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + printf ("\nz = "); + mpfr_out_str (stdout, 10, 0, z, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } + + mpfr_clear (z); +} + +void +set_prec_iii (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_iii (mpfi_function_ptr this) +{ + /* [0] auxiliary variable (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] second operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_III (mpfi_function_ptr this, III_fun mpfi_function, + RRR_fun mpfr_function) +{ + this->type = III; + this->func.III = mpfi_function; + this->mpfr_func.III = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] auxiliary variable (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_iii; + this->read_line = read_line_iii; + this->check_line = check_line_iii; + this->random = random_iii; + this->clear = clear_iii; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iiii.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iiii.c new file mode 100644 index 00000000000..f88ae785cf8 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iiii.c @@ -0,0 +1,310 @@ +/* type_iiii.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, mpfi_t, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iiii (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] second operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); + /* [5] second operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 5, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iiii (mpfi_function_ptr function) +{ + int inex; + + /* rename operands for better readability + [0]: value set by function + [1]: return value (inexact flag) + [2]: expected value + [3]: first operand + [4]: second operand + [5]: third operand */ + IIII_fun f_IIII = MPFI_FUN_GET (*function, IIII); + mpfi_ptr got = MPFI_FUN_ARG (*function, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*function, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*function, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*function, 3, mpfi); + mpfi_ptr op2 = MPFI_FUN_ARG (*function, 4, mpfi); + mpfi_ptr op3 = MPFI_FUN_ARG (*function, 5, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IIII (got, op1, op2, op3); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\n", test_line_number); + printf ("op1 = "); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, op3); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + exit (1); + } + + /* when one endpoint is exact, compute function at lower and higher + precision */ + if (!MPFI_NAN_P (expected) && !MPFI_BOTH_ARE_INEXACT (inex)) { + check_with_different_prec (function, 2); + check_with_different_prec (function, 2 * mpfi_get_prec (expected)); + mpfi_set_prec (got, mpfi_get_prec (expected)); + } + + /* reuse input variable as output (when they have the same precision) */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IIII (got, got, op2, op3); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, op3); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } + + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + inex = f_IIII (got, op1, got, op3); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing second argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, op3); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } + + if (mpfi_get_prec (got) == mpfi_get_prec (op3)) { + mpfi_set (got, op3); + inex = f_IIII (got, op1, op2, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing second argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, op3); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of random points chosen in the given intervals is in the + image of these intervals. */ +void +random_iiii (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IIII_fun f_IIII = MPFI_FUN_GET (*this, IIII); + RRRR_fun f_RRRR = MPFI_FUN_MPFR_FUNCTION (*this, IIII); + mpfi_ptr d = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr c = MPFI_FUN_ARG (*this, 3, mpfi); + mpfi_ptr b = MPFI_FUN_ARG (*this, 4, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 5, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + mpfr_t z; + mpfr_t t; + + mpfr_init2 (z, mpfi_get_prec (c)); + mpfr_init2 (t, mpfi_get_prec (c)); + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + random_interval (b); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (b); + } + mpfi_alea (y, b); + random_interval (c); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (c); + } + mpfi_alea (z, c); + f_IIII (d, a, b, c); + f_RRRR (t, x, y, z, MPFI_RNDD); + if (!mpfr_nan_p (t) && !MPFI_NAN_P (d) && !mpfi_is_inside_fr (t, d)) { + printf ("Error: the image d of (a, b, c) does not contain the image t " + "of (x, y, z) where x (resp. y (resp. z)) is in a (resp. b (resp. c)).\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nc = "); + mpfi_out_str (stdout, 10, 0, c); + printf ("\nx = "); + mpfi_out_str (stdout, 10, 0, d); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + printf ("\nz = "); + mpfr_out_str (stdout, 10, 0, z, MPFI_RNDU); + putchar ('\n'); + mpfr_out_str (stdout, 10, 0, t, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } + + mpfr_clear (z); + mpfr_clear (t); +} + +void +set_prec_iiii (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 5, mpfi), prec); +} + +void +clear_iiii (mpfi_function_ptr this) +{ + /* [0] auxiliary variable (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] second operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + /* [5] third operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 5, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IIII (mpfi_function_ptr this, IIII_fun mpfi_function, + RRRR_fun mpfr_function) +{ + this->type = IIII; + this->func.IIII = mpfi_function; + this->mpfr_func.IIII = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (6 * sizeof (mpfi_fun_operand_t)); + + /* [0] auxiliary variable (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + /* [5] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 5, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_iiii; + this->read_line = read_line_iiii; + this->check_line = check_line_iiii; + this->random = random_iiii; + this->clear = clear_iiii; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iiq.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iiq.c new file mode 100644 index 00000000000..e16d94118e4 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iiq.c @@ -0,0 +1,207 @@ +/* type_iiq.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, mpq_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iiq (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] mpq_t operand */ + read_mpq (fp, MPFI_FUN_ARG (*this, 4, mpq)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ +void +check_line_iiq (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IIQ_fun f_IIQ = MPFI_FUN_GET (*this, IIQ); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfi); + mpq_ptr op2 = MPFI_FUN_ARG (*this, 4, mpq); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IIQ (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfi_out_str (stdout, 10, 0, op1); + printf ("\nop2 = "); + mpq_out_str (stdout, 10, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IIQ (got, got, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 10, 0, op1); + printf ("\nop2 = "); + mpq_out_str (stdout, 10, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iiq (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IIQ_fun f_IIQ = MPFI_FUN_GET (*this, IIQ); + RRQ_fun f_RRQ = MPFI_FUN_MPFR_FUNCTION (*this, IIQ); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + mpq_ptr q = MPFI_FUN_ARG (*this, 4, mpq); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + random_mpq (q); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IIQ (b, a, q); + f_RRQ (y, x, q, MPFI_RNDD); + + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (a, q), does not contain " + "the point y, image of (x, q) where x is in a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nq = "); + mpq_out_str (stdout, 10, q); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iiq (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_iiq (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] operand (mpz_t) */ + mpq_clear (MPFI_FUN_ARG (*this, 4, mpq)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IIQ (mpfi_function_ptr this, IIQ_fun mpfi_function, + RRQ_fun mpfr_function) +{ + this->type = IIQ; + this->func.IIQ = mpfi_function; + this->mpfr_func.IIQ = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (mpq_t) */ + mpq_init (MPFI_FUN_ARG (*this, 4, mpq)); + + /* init methods */ + this->set_prec = set_prec_iiq; + this->read_line = read_line_iiq; + this->check_line = check_line_iiq; + this->random = random_iiq; + this->clear = clear_iiq; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iir.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iir.c new file mode 100644 index 00000000000..c525fdc1dfc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iir.c @@ -0,0 +1,208 @@ +/* type_iir.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, mpfr_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iir (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] mpfr_t operand */ + read_mpfr (fp, MPFI_FUN_ARG (*this, 4, mpfr)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ +void +check_line_iir (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IIR_fun f_IIR = MPFI_FUN_GET (*this, IIR); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfi); + mpfr_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfr); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IIR (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfr_out_str (stdout, 16, 0, op2, MPFI_RNDD); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IIR (got, got, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpfr_out_str (stdout, 16, 0, op2, MPFI_RNDD); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of random points chosen in the given intervals is in the + image of these intervals. */ +void +random_iir (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IIR_fun f_IIR = MPFI_FUN_GET (*this, IIR); + RRR_fun f_RRR = MPFI_FUN_MPFR_FUNCTION (*this, IIR); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + mpfr_ptr x = MPFI_FUN_ARG (*this, 4, mpfr); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr y = &(i->left); + mpfr_ptr z = &(i->right); + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + random_mpfr (x); + mpfi_alea (y, a); + f_IIR (b, a, x); + f_RRR (z, y, x, MPFI_RNDD); + if (!mpfr_nan_p (z) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (z, b)) { + printf ("Error: the image b of (a, x) does not contain the image z " + "of (y, x) where y is in a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + printf ("\nz = "); + mpfr_out_str (stdout, 10, 0, z, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iir (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); + mpfr_set_prec (MPFI_FUN_ARG (*this, 4, mpfr), prec); +} + +void +clear_iir (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] second operand (mpfr_t) */ + mpfr_clear (MPFI_FUN_ARG (*this, 4, mpfr)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IIR (mpfi_function_ptr this, IIR_fun mpfi_function, + RRR_fun mpfr_function) +{ + this->type = IIR; + this->func.IIR = mpfi_function; + this->mpfr_func.IIR = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (mpfr_t) */ + mpfr_init2 (MPFI_FUN_ARG (*this, 4, mpfr), 1024); + + /* init methods */ + this->set_prec = set_prec_iir; + this->read_line = read_line_iir; + this->check_line = check_line_iir; + this->random = random_iir; + this->clear = clear_iir; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iis.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iis.c new file mode 100644 index 00000000000..4a020430a25 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iis.c @@ -0,0 +1,202 @@ +/* type_iis.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, long). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iis (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] signed integral operand */ + read_si (fp, &(MPFI_FUN_ARG (*this, 4, si))); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iis (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IIS_fun f_IIS = MPFI_FUN_GET (*this, IIS); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfi); + long op2 = MPFI_FUN_ARG (*this, 4, si); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IIS (got, op1, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = %ld", op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IIS (got, got, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = %ld", op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iis (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IIS_fun f_IIS = MPFI_FUN_GET (*this, IIS); + RRS_fun f_RRS = MPFI_FUN_MPFR_FUNCTION (*this, IIS); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + long si; + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + si = random_si (); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IIS (b, a, si); + f_RRS (y, x, si, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (a, n), does not contain " + "the point y, image of (x, n) where x is in a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nn = %ld\nb = ", si); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iis (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_iis (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] operand (signed long), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IIS (mpfi_function_ptr this, IIS_fun mpfi_function, + RRS_fun mpfr_function) +{ + this->type = IIS; + this->func.IIS = mpfi_function; + this->mpfr_func.IIS = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (signed long), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_iis; + this->read_line = read_line_iis; + this->check_line = check_line_iis; + this->random = random_iis; + this->clear = clear_iis; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iiu.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iiu.c new file mode 100644 index 00000000000..4068c7eab19 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iiu.c @@ -0,0 +1,202 @@ +/* type_iiu.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, unsigned long). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iiu (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] unsigned integral operand */ + read_ui (fp, &(MPFI_FUN_ARG (*this, 4, ui))); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iiu (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IIU_fun f_IIU = MPFI_FUN_GET (*this, IIU); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfi); + unsigned long op2 = MPFI_FUN_ARG (*this, 4, ui); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IIU (got, op1, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = %lu", op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IIU (got, got, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = %lu", op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iiu (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IIU_fun f_IIU = MPFI_FUN_GET (*this, IIU); + RRU_fun f_RRU = MPFI_FUN_MPFR_FUNCTION (*this, IIU); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + unsigned long ui; + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + ui = random_ui (); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IIU (b, a, ui); + f_RRU (y, x, ui, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (a, n), does not contain " + "the point y, image of (x, n) where x is in a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nn = %lu\nb = ", ui); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iiu (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_iiu (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] operand (unsigned long), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IIU (mpfi_function_ptr this, IIU_fun mpfi_function, + RRU_fun mpfr_function) +{ + this->type = IIU; + this->func.IIU = mpfi_function; + this->mpfr_func.IIU = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (unsigned long), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_iiu; + this->read_line = read_line_iiu; + this->check_line = check_line_iiu; + this->random = random_iiu; + this->clear = clear_iiu; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iiz.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iiz.c new file mode 100644 index 00000000000..280e5b41e46 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iiz.c @@ -0,0 +1,209 @@ +/* type_iiz.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, mpz_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; /* current line */ +static unsigned long test_line_number; /* start line of current test */ + +void +read_line_iiz (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] mpz_t operand */ + read_mpz (fp, MPFI_FUN_ARG (*this, 4, mpz)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iiz (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IIZ_fun f_IIZ = MPFI_FUN_GET (*this, IIZ); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfi); + mpz_ptr op2 = MPFI_FUN_ARG (*this, 4, mpz); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IIZ (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpz_out_str (stdout, 16, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op1)) { + mpfi_set (got, op1); + + inex = f_IIZ (got, got, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op1); + printf ("\nop2 = "); + mpz_out_str (stdout, 16, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iiz (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IIZ_fun f_IIZ = MPFI_FUN_GET (*this, IIZ); + RRZ_fun f_RRZ = MPFI_FUN_MPFR_FUNCTION (*this, IIZ); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 3, mpfi); + mpz_ptr z = MPFI_FUN_ARG (*this, 4, mpz); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + unsigned long n = mpfi_get_prec (a) + 17; + + random_mpz (z, n); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IIZ (b, a, z); + f_RRZ (y, x, z, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (a, n), does not contain " + "the point y, image of (x, n) where x is in a.\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nn = "); + mpz_out_str (stdout, 10, z); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iiz (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_iiz (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + /* [4] operand (mpz_t) */ + mpz_clear (MPFI_FUN_ARG (*this, 4, mpz)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IIZ (mpfi_function_ptr this, IIZ_fun mpfi_function, + RRZ_fun mpfr_function) +{ + this->type = IIZ; + this->func.IIZ = mpfi_function; + this->mpfr_func.IIZ = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + /* [4] second operand (mpz_t) */ + mpz_init (MPFI_FUN_ARG (*this, 4, mpz)); + + /* init methods */ + this->set_prec = set_prec_iiz; + this->read_line = read_line_iiz; + this->check_line = check_line_iiz; + this->random = random_iiz; + this->clear = clear_iiz; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_il.c b/Build/source/libs/mpfi/mpfi-src/tests/type_il.c new file mode 100644 index 00000000000..e354abd95bc --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_il.c @@ -0,0 +1,131 @@ +/* type_il.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, long double). + +Copyright 2018 + AriC project, Inria Grenoble - Rhone-Alpes, France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_il (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_long_double (fp, &(MPFI_FUN_ARG (*this, 3, ld))); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_il (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IL_fun f_IL = MPFI_FUN_GET (*this, IL); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + long double op = MPFI_FUN_ARG (*this, 3, ld); + + inex = f_IL (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = %La", test_line_number, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_il (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_il (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (long double), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IL (mpfi_function_ptr this, IL_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IL; + this->func.IL = mpfi_function; + this->mpfr_func.IL = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (long double), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_il; + this->read_line = read_line_il; + this->check_line = check_line_il; + this->random = NULL; + this->clear = clear_il; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iq.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iq.c new file mode 100644 index 00000000000..7a2f4c7b1ac --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iq.c @@ -0,0 +1,137 @@ +/* type_iq.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpq_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iq (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_mpq (fp, MPFI_FUN_ARG (*this, 3, mpq)); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_iq (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IQ_fun f_IQ = MPFI_FUN_GET (*this, IQ); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpq_ptr op = MPFI_FUN_ARG (*this, 3, mpq); + + inex = f_IQ (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = ", test_line_number); + mpq_out_str (stdout, 10, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_iq (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_iq (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpq_t) */ + mpq_clear (MPFI_FUN_ARG (*this, 3, mpq)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IQ (mpfi_function_ptr this, IQ_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IQ; + this->func.IQ = mpfi_function; + this->mpfr_func.IQ = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (mpq_t) */ + mpq_init (MPFI_FUN_ARG (*this, 3, mpq)); + + /* init methods */ + this->set_prec = set_prec_iq; + this->read_line = read_line_iq; + this->check_line = check_line_iq; + this->random = NULL; + this->clear = clear_iq; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iqi.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iqi.c new file mode 100644 index 00000000000..1bc49ddbc10 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iqi.c @@ -0,0 +1,211 @@ +/* type_iqi.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpq_t, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iqi (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpq_t operand */ + read_mpq (fp, MPFI_FUN_ARG (*this, 3, mpq)); + /* [4] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ +void +check_line_iqi (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IQI_fun f_IQI = MPFI_FUN_GET (*this, IQI); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpq_ptr op1 = MPFI_FUN_ARG (*this, 3, mpq); + mpfi_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IQI (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpq_out_str (stdout, 10, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 10, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + if (mpfi_get_prec (got) != mpfi_get_prec (op2)) { + return; + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + + inex = f_IQI (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing second input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpq_out_str (stdout, 10, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 10, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 10, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iqi (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IQI_fun f_IQI = MPFI_FUN_GET (*this, IQI); + RQR_fun f_RQR = MPFI_FUN_MPFR_FUNCTION (*this, IQI); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpq_ptr q = MPFI_FUN_ARG (*this, 3, mpq); + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + random_mpq (q); + mpfi_alea (x, a); + f_IQI (b, q, a); + f_RQR (y, q, x, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the image b of (q, a) does not contain the image y " + "of (q, x) where x is in a.\nq= "); + mpq_out_str (stdout, 10, q); + printf ("\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iqi (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_iqi (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpq_t) */ + mpq_clear (MPFI_FUN_ARG (*this, 3, mpq)); + /* [4] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IQI (mpfi_function_ptr this, IQI_fun mpfi_function, + RQR_fun mpfr_function) +{ + this->type = IQI; + this->func.IQI = mpfi_function; + this->mpfr_func.IQI = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] second operand (mpq_t) */ + mpq_init (MPFI_FUN_ARG (*this, 3, mpq)); + /* [4] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_iqi; + this->read_line = read_line_iqi; + this->check_line = check_line_iqi; + this->random = random_iqi; + this->clear = clear_iqi; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_ir.c b/Build/source/libs/mpfi/mpfi-src/tests/type_ir.c new file mode 100644 index 00000000000..ab3163e5479 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_ir.c @@ -0,0 +1,137 @@ +/* type_ir.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfr_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_ir (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_mpfr (fp, MPFI_FUN_ARG (*this, 3, mpfr)); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_ir (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IR_fun f_IR = MPFI_FUN_GET (*this, IR); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfr_ptr op = MPFI_FUN_ARG (*this, 3, mpfr); + + inex = f_IR (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = ", test_line_number); + mpfr_out_str (stdout, 16, 0, op, MPFI_RNDD); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_ir (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfr_set_prec (MPFI_FUN_ARG (*this, 3, mpfr), prec); +} + +void +clear_ir (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpfr_t) */ + mpfr_clear (MPFI_FUN_ARG (*this, 3, mpfr)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IR (mpfi_function_ptr this, IR_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IR; + this->func.IR = mpfi_function; + this->mpfr_func.IR = mpfr_function; + this->random_domain = NULL; + + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (mpfr_t) */ + mpfr_init2 (MPFI_FUN_ARG (*this, 3, mpfr), 1024); + + /* init methods */ + this->set_prec = set_prec_ir; + this->read_line = read_line_ir; + this->check_line = check_line_ir; + this->random = NULL; + this->clear = clear_ir; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iri.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iri.c new file mode 100644 index 00000000000..a815ea68aad --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iri.c @@ -0,0 +1,208 @@ +/* type_iri.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpfi_t, mpfr_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iri (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpfr_t operand */ + read_mpfr (fp, MPFI_FUN_ARG (*this, 3, mpfr)); + /* [4] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ +void +check_line_iri (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IRI_fun f_IRI = MPFI_FUN_GET (*this, IRI); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpfr_ptr op1 = MPFI_FUN_ARG (*this, 3, mpfr); + mpfi_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IRI (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpfr_out_str (stdout, 16, 0, op1, MPFI_RNDD); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + + inex = f_IRI (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpfr_out_str (stdout, 16, 0, op1, MPFI_RNDD); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of random points chosen in the given intervals is in the + image of these intervals. */ +void +random_iri (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IRI_fun f_IRI = MPFI_FUN_GET (*this, IRI); + RRR_fun f_RRR = MPFI_FUN_MPFR_FUNCTION (*this, IRI); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfr_ptr x = MPFI_FUN_ARG (*this, 3, mpfr); + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr y = &(i->left); + mpfr_ptr z = &(i->right); + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + random_mpfr (x); + mpfi_alea (y, a); + f_IRI (b, x, a); + f_RRR (z, x, y, MPFI_RNDD); + if (!mpfr_nan_p (z) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (z, b)) { + printf ("Error: the image b of (x, a) does not contain the image z " + "of (x, y) where y is in a.\nx= "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + printf ("\nz = "); + mpfr_out_str (stdout, 10, 0, z, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iri (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfr_set_prec (MPFI_FUN_ARG (*this, 3, mpfr), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_iri (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand (mpfr_t) */ + mpfr_clear (MPFI_FUN_ARG (*this, 3, mpfr)); + /* [4] second operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IRI (mpfi_function_ptr this, IRI_fun mpfi_function, + RRR_fun mpfr_function) +{ + this->type = IRI; + this->func.IRI = mpfi_function; + this->mpfr_func.IRI = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] second operand (mpfr_t) */ + mpfr_init2 (MPFI_FUN_ARG (*this, 3, mpfr), 1024); + /* [4] first operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_iri; + this->read_line = read_line_iri; + this->check_line = check_line_iri; + this->random = random_iri; + this->clear = clear_iri; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_is.c b/Build/source/libs/mpfi/mpfi-src/tests/type_is.c new file mode 100644 index 00000000000..0c2307454a5 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_is.c @@ -0,0 +1,134 @@ +/* type_is.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, long). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_is (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_si (fp, &(MPFI_FUN_ARG (*this, 3, si))); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_is (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IS_fun f_IS = MPFI_FUN_GET (*this, IS); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + long op = MPFI_FUN_ARG (*this, 3, si); + + inex = f_IS (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = %ld", test_line_number, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_is (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_is (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (long), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IS (mpfi_function_ptr this, IS_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IS; + this->func.IS = mpfi_function; + this->mpfr_func.IS = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (signed long), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_is; + this->read_line = read_line_is; + this->check_line = check_line_is; + this->random = NULL; + this->clear = clear_is; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_isi.c b/Build/source/libs/mpfi/mpfi-src/tests/type_isi.c new file mode 100644 index 00000000000..b2702a95aa0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_isi.c @@ -0,0 +1,200 @@ +/* type_isi.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, long, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_isi (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] signed integral operand */ + read_si (fp, &(MPFI_FUN_ARG (*this, 3, si))); + /* [4] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_isi (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + ISI_fun f_ISI = MPFI_FUN_GET (*this, ISI); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + long op1 = MPFI_FUN_ARG (*this, 3, si); + mpfi_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_ISI (got, op1, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = %ld\nop2 = ", test_line_number, op1); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + + inex = f_ISI (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = %ld\nop2 = ", test_line_number, op1); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_isi (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + ISI_fun f_ISI = MPFI_FUN_GET (*this, ISI); + RSR_fun f_RSR = MPFI_FUN_MPFR_FUNCTION (*this, ISI); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + long si; + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + si = random_si (); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_ISI (b, si, a); + f_RSR (y, si, x, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (n, a), does not contain the " + "point y, image of (n, x) where x is in a.\nn = %ld\na = ", si); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_isi (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_isi (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (signed long), needs no deallocation */ + /* [4] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_ISI (mpfi_function_ptr this, ISI_fun mpfi_function, + RSR_fun mpfr_function) +{ + this->type = ISI; + this->func.ISI = mpfi_function; + this->mpfr_func.ISI = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (signed long), needs no initialization */ + /* [4] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_isi; + this->read_line = read_line_isi; + this->check_line = check_line_isi; + this->random = random_isi; + this->clear = clear_isi; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iu.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iu.c new file mode 100644 index 00000000000..1264eadf777 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iu.c @@ -0,0 +1,134 @@ +/* type_iu.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, unsigned long). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iu (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] unsigned integral operand */ + read_ui (fp, &(MPFI_FUN_ARG (*this, 3, ui))); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_iu (mpfi_function_ptr function) +{ + int inex; + + /* rename operands for better readability */ + IU_fun f_IU = MPFI_FUN_GET (*function, IU); + mpfi_ptr got = MPFI_FUN_ARG (*function, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*function, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*function, 2, mpfi); + unsigned long op = MPFI_FUN_ARG (*function, 3, ui); + + inex = f_IU (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = %lu", test_line_number, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_iu (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_iu (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (unsigned long), needs no deallocation */ + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IU (mpfi_function_ptr this, IU_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IU; + this->func.IU = mpfi_function; + this->mpfr_func.IU = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (unsigned long), needs no initialization */ + + /* init methods */ + this->set_prec = set_prec_iu; + this->read_line = read_line_iu; + this->check_line = check_line_iu; + this->random = NULL; + this->clear = clear_iu; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iui.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iui.c new file mode 100644 index 00000000000..f43198f2500 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iui.c @@ -0,0 +1,200 @@ +/* type_iui.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, unsigned long, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iui (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] unsigned integral operand */ + read_ui (fp, &(MPFI_FUN_ARG (*this, 3, ui))); + /* [4] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_iui (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IUI_fun f_IUI = MPFI_FUN_GET (*this, IUI); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + unsigned long op1 = MPFI_FUN_ARG (*this, 3, ui); + mpfi_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IUI (got, op1, op2); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = %lu\nop2 = ", test_line_number, op1); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + + inex = f_IUI (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = %lu\nop2 = ", test_line_number, op1); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_iui (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IUI_fun f_IUI = MPFI_FUN_GET (*this, IUI); + RUR_fun f_RUR = MPFI_FUN_MPFR_FUNCTION (*this, IUI); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + unsigned long ui; + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + + ui = random_ui (); + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + mpfi_alea (x, a); + f_IUI (b, ui, a); + f_RUR (y, ui, x, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the interval b, image of (n, a), does not contain the " + "point y, image of (n, x) where x is in a.\nn = %lu\na = ", ui); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_iui (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_iui (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] first operand (unsigned long), needs no deallocation */ + /* [4] second operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IUI (mpfi_function_ptr this, IUI_fun mpfi_function, + RUR_fun mpfr_function) +{ + this->type = IUI; + this->func.IUI = mpfi_function; + this->mpfr_func.IUI = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (unsigned long), needs no initialization */ + /* [4] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_iui; + this->read_line = read_line_iui; + this->check_line = check_line_iui; + this->random = random_iui; + this->clear = clear_iui; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_iz.c b/Build/source/libs/mpfi/mpfi-src/tests/type_iz.c new file mode 100644 index 00000000000..a1294cc2b4f --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_iz.c @@ -0,0 +1,137 @@ +/* type_iz.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpz_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_iz (mpfi_function_ptr this, FILE* fp) +{ + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + + test_line_number = line_number; + /* [0] initial value */ + read_mpfi (fp, got); + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, expected); + /* [3] integral operand */ + read_mpz (fp, MPFI_FUN_ARG (*this, 3, mpz)); + + /* data validation */ + if (mpfi_get_prec (got) != mpfi_get_prec (expected)) { + printf ("Error in data file %s line %lu\nThe precisions of intervals " + "are different.\n", pathname, test_line_number); + exit (1); + } +} + +void +check_line_iz (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IZ_fun f_IZ = MPFI_FUN_GET (*this, IZ); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpz_ptr op = MPFI_FUN_ARG (*this, 3, mpz); + + inex = f_IZ (got, op); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop = ", test_line_number); + mpz_out_str (stdout, 16, op); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", inex, expected_inex); + + exit (1); + } +} + +void +set_prec_iz (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); +} + +void +clear_iz (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpz_t) */ + mpz_clear (MPFI_FUN_ARG (*this, 3, mpz)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IZ (mpfi_function_ptr this, IZ_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = IZ; + this->func.IZ = mpfi_function; + this->mpfr_func.IZ = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] operand (mpz_t) */ + mpz_init (MPFI_FUN_ARG (*this, 3, mpz)); + + /* init methods */ + this->set_prec = set_prec_iz; + this->read_line = read_line_iz; + this->check_line = check_line_iz; + this->random = NULL; + this->clear = clear_iz; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_izi.c b/Build/source/libs/mpfi/mpfi-src/tests/type_izi.c new file mode 100644 index 00000000000..9087c0397a7 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_izi.c @@ -0,0 +1,209 @@ +/* type_izi.c -- Test functions associated with functions of the type + mpfi_f (mpfi_t, mpz_t, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern unsigned long line_number; /* current line */ +static unsigned long test_line_number; /* start line of current test */ + +void +read_line_izi (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_exactness (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] mpz_t operand */ + read_mpz (fp, MPFI_FUN_ARG (*this, 3, mpz)); + /* [4] mpfi_t operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 4, mpfi)); +} + +/* check function against data at different precisions and test if an + input variable can be reused as output */ + +void +check_line_izi (mpfi_function_ptr this) +{ + int inex; + + /* rename operands for better readability */ + IZI_fun f_IZI = MPFI_FUN_GET (*this, IZI); + mpfi_ptr got = MPFI_FUN_ARG (*this, 0, mpfi); + int expected_inex = MPFI_FUN_ARG (*this, 1, i); + mpfi_ptr expected = MPFI_FUN_ARG (*this, 2, mpfi); + mpz_ptr op1 = MPFI_FUN_ARG (*this, 3, mpz); + mpfi_ptr op2 = MPFI_FUN_ARG (*this, 4, mpfi); + + mpfi_set_prec (got, mpfi_get_prec (expected)); + + inex = f_IZI (got, op1, op2); + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Failed line %lu.\nop1 = ", test_line_number); + mpz_out_str (stdout, 16, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + + /* reuse input variable as output */ + if (mpfi_get_prec (got) == mpfi_get_prec (op2)) { + mpfi_set (got, op2); + + inex = f_IZI (got, op1, got); + + if (inex != expected_inex || !same_value (got, expected)) { + printf ("Error when reusing first input argument as output (line %lu)." + "\nop1 = ", test_line_number); + mpz_out_str (stdout, 16, op1); + printf ("\nop2 = "); + mpfi_out_str (stdout, 16, 0, op2); + printf ("\ngot = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nexpected = "); + mpfi_out_str (stdout, 16, 0, expected); + putchar ('\n'); + if (inex != expected_inex) + printf ("inexact flag: got = %u, expected = %u\n", + inex, expected_inex); + + exit (1); + } + } +} + +/* Check if the image of a random point chosen in the given interval is in the + image of this interval. */ +void +random_izi (mpfi_function_ptr this) +{ + /* rename operands for better readability */ + IZI_fun f_IZI = MPFI_FUN_GET (*this, IZI); + RZR_fun f_RZR = MPFI_FUN_MPFR_FUNCTION (*this, IZI); + mpfi_ptr b = MPFI_FUN_ARG (*this, 2, mpfi); + mpz_ptr z = MPFI_FUN_ARG (*this, 3, mpz); + mpfi_ptr a = MPFI_FUN_ARG (*this, 4, mpfi); + /* reuse endpoint as mpfr_t */ + mpfi_ptr i = MPFI_FUN_ARG (*this, 0, mpfi); + mpfr_ptr x = &(i->left); + mpfr_ptr y = &(i->right); + unsigned long n = mpfi_get_prec (a) + 17; + + random_interval (a); + if (this->random_domain != NULL) { + /* restrict the range of random interval to speed up tests */ + this->random_domain (a); + } + random_mpz (z, n); + mpfi_alea (x, a); + f_IZI (b, z, a); + f_RZR (y, z, x, MPFI_RNDD); + if (!mpfr_nan_p (y) && !MPFI_NAN_P (b) && !mpfi_is_inside_fr (y, b)) { + printf ("Error: the image b of (n, a) does not contain the image y " + "of (n, x) where x is in a.\nn= "); + mpz_out_str (stdout, 10, z); + printf ("\na = "); + mpfi_out_str (stdout, 10, 0, a); + printf ("\nb = "); + mpfi_out_str (stdout, 10, 0, b); + printf ("\nx = "); + mpfr_out_str (stdout, 10, 0, x, MPFI_RNDU); + printf ("\ny = "); + mpfr_out_str (stdout, 10, 0, y, MPFI_RNDU); + putchar ('\n'); + + exit (1); + } +} + +void +set_prec_izi (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfi_set_prec (MPFI_FUN_ARG (*this, 0, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 2, mpfi), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 4, mpfi), prec); +} + +void +clear_izi (mpfi_function_ptr this) +{ + /* [0] initial value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 0, mpfi)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 2, mpfi)); + /* [3] operand (mpz_t) */ + mpz_clear (MPFI_FUN_ARG (*this, 3, mpz)); + /* [4] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 4, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_IZI (mpfi_function_ptr this, IZI_fun mpfi_function, + RZR_fun mpfr_function) +{ + this->type = IZI; + this->func.IZI = mpfi_function; + this->mpfr_func.IZI = mpfr_function; + this->random_domain = NULL; + + /* init operands */ + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (5 * sizeof (mpfi_fun_operand_t)); + + /* [0] initial value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 0, mpfi), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 2, mpfi), 1024); + /* [3] first operand (mpz_t) */ + mpz_init (MPFI_FUN_ARG (*this, 3, mpz)); + /* [4] second operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 4, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_izi; + this->read_line = read_line_izi; + this->check_line = check_line_izi; + this->random = random_izi; + this->clear = clear_izi; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/type_ri.c b/Build/source/libs/mpfi/mpfi-src/tests/type_ri.c new file mode 100644 index 00000000000..6e05f9d7f12 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/type_ri.c @@ -0,0 +1,130 @@ +/* type_ri.c -- Test functions associated with functions of the type + mpfi_f (mpfr_t, mpfi_t). + +Copyright 2010, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +extern char * pathname; +extern unsigned long line_number; +static unsigned long test_line_number; /* start line of a test */ + +void +read_line_ri (mpfi_function_ptr this, FILE* fp) +{ + test_line_number = line_number; + /* [1] return value */ + read_sign (fp, &(MPFI_FUN_ARG (*this, 1, i))); + /* [2] expected value (mpfr_t)*/ + read_mpfr (fp, MPFI_FUN_ARG (*this, 2, mpfr)); + /* [3] operand */ + read_mpfi (fp, MPFI_FUN_ARG (*this, 3, mpfi)); +} + +void +check_line_ri (mpfi_function_ptr this) +{ + int ret; + + /* rename operands for better readability */ + RI_fun f_RI = MPFI_FUN_GET (*this, RI); + mpfr_ptr got = MPFI_FUN_ARG (*this, 0, mpfr); + int expected_ret = MPFI_FUN_ARG (*this, 1, i); + mpfr_ptr expected = MPFI_FUN_ARG (*this, 2, mpfr); + mpfi_ptr op = MPFI_FUN_ARG (*this, 3, mpfi); + + mpfr_set_prec (got, mpfr_get_prec (expected)); + ret = f_RI (got, op); + if ((ret != expected_ret && ret * expected_ret <= 0) + || !same_mpfr_value (got, expected)) { + printf ("Failed line %lu.\nop = ", test_line_number); + mpfi_out_str (stdout, 16, 0, op); + printf ("\ngot = "); + mpfr_out_str (stdout, 16, 0, got, MPFI_RNDD); + printf ("\nexpected = "); + mpfr_out_str (stdout, 16, 0, expected, MPFI_RNDD); + putchar ('\n'); + if (ret != expected_ret || ret * expected_ret < 0) { + printf ("return value: got = %d, %s expected\n", ret, + expected_ret < 0 ? "negative" + : expected_ret > 0 ? "positive" : "zero"); + } + + exit (1); + } +} + +void +set_prec_ri (mpfi_function_ptr this, mpfr_prec_t prec) +{ + mpfr_set_prec (MPFI_FUN_ARG (*this, 0, mpfr), prec); + mpfr_set_prec (MPFI_FUN_ARG (*this, 2, mpfr), prec); + mpfi_set_prec (MPFI_FUN_ARG (*this, 3, mpfi), prec); +} + +void +clear_ri (mpfi_function_ptr this) +{ + /* [0] result (mpfr_t) */ + mpfr_clear (MPFI_FUN_ARG (*this, 0, mpfr)); + /* [1] return value (int), needs no deallocation */ + /* [2] expected value (mpfr_t) */ + mpfr_clear (MPFI_FUN_ARG (*this, 2, mpfr)); + /* [3] operand (mpfi_t) */ + mpfi_clear (MPFI_FUN_ARG (*this, 3, mpfi)); + + free (MPFI_FUN_ARGS (*this)); + MPFI_FUN_ARGS (*this) = NULL; +} + +/* In operands array, variables are in the same order as for data in + '.dat' files plus one additional variable before them. */ +void +mpfi_fun_init_RI (mpfi_function_ptr this, RI_fun mpfi_function, + NULL_fun mpfr_function) +{ + this->type = RI; + this->func.RI = mpfi_function; + this->mpfr_func.RI = mpfr_function; + this->random_domain = NULL; + + MPFI_FUN_ARGS (*this) = + (mpfi_fun_operand_t*) malloc (4 * sizeof (mpfi_fun_operand_t)); + + /* [0] result (mpfr_t) */ + mpfr_init2 (MPFI_FUN_ARG (*this, 0, mpfr), 1024); + /* [1] return value (int), needs no initialization */ + /* [2] expected value (mpfr_t) */ + mpfr_init2 (MPFI_FUN_ARG (*this, 2, mpfr), 1024); + /* [3] operand (mpfi_t) */ + mpfi_init2 (MPFI_FUN_ARG (*this, 3, mpfi), 1024); + + /* init methods */ + this->set_prec = set_prec_ri; + this->read_line = read_line_ri; + this->check_line = check_line_ri; + this->random = NULL; + this->clear = clear_ri; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tz_div.c b/Build/source/libs/mpfi/mpfi-src/tests/tz_div.c new file mode 100644 index 00000000000..28bf616cbca --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tz_div.c @@ -0,0 +1,118 @@ +/* tz_div.c -- Test mpfi_z_div. + +Copyright 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow (void) +{ + mpfi_t interval; + mpfi_t got; + mpz_t z; + int inex; + + mpz_init (z); + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + + /* right overflow: 1024 / [epsilon, 1] = [1024, +oo] */ + mpz_set_ui (z, 1024); + mpfr_set_ui (&(interval->left), 0, MPFI_RNDD); + mpfr_nextabove (&(interval->left)); /* tiny left endpoint x0 */ + mpfr_set_ui (&(interval->right), 1, MPFI_RNDU); + + inex = mpfi_z_div (got, z, interval); + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp_z (&(got->left), z) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_z_div (rop, z, op) does not correctly handle " + "overflow.\n z = "); + mpz_out_str (stdout, 10, z); + printf ("\n op = "); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: 1024.0 / [-1, -epsilon] = [-oo, -1024] */ + mpfi_neg (interval, interval); + + inex = mpfi_z_div (got, z, interval); + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -1024) != 0) { + printf ("Error: mpfi_z_div (rop, z, op) does not correctly handle " + "overflow.\n z = "); + mpz_out_str (stdout, 10, z); + printf ("\n op = "); + mpfi_out_str (stdout, 10, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 10, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpz_clear (z); + mpfi_clear (interval); + mpfi_clear (got); +} + +#ifndef HAVE_MPFR_Z_DIV +/* fake non-existing function */ +int +mpfr_z_div (mpfr_ptr x, mpz_srcptr z, mpfr_srcptr y, mpfr_rnd_t rnd) +{ + int ret; + mpfr_t zz; + + mpfr_init2 (zz, mpz_sizeinbase (z, 2)); + mpfr_set_z (zz, z, MPFI_RNDD); /* exact */ + ret = mpfr_div (x, zz, y, rnd); + mpfr_clear (zz); + + return ret; +} +#endif /*HAVE_MPFR_Z_DIV */ + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_z_div; + + mpfi_fun_init_IZI (&i_z_div, mpfi_z_div, mpfr_z_div); + test_start (); + + check_data (&i_z_div, "z_div.dat"); + check_random (&i_z_div, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_z_div); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/tz_sub.c b/Build/source/libs/mpfi/mpfi-src/tests/tz_sub.c new file mode 100644 index 00000000000..41711816397 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/tz_sub.c @@ -0,0 +1,122 @@ +/* tz_sub.c -- Test mpfi_z_sub. + +Copyright 2010, 2011, + Spaces project, Inria Lorraine + and Salsa project, INRIA Rocquencourt, + and Arenaire project, Inria Rhone-Alpes, France + and Lab. ANO, USTL (Univ. of Lille), France + + +This file is part of the MPFI Library. + +The MPFI Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFI Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFI Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, +MA 02110-1301, USA. */ + +#include "mpfi-tests.h" + +void +check_overflow () +{ + mpfi_t interval; + mpfi_t got; + mpz_t z; + int inex; + + mpfi_init2 (interval, 53); + mpfi_init2 (got, 53); + mpz_init (z); + + /* right overflow: 1023 - [-Max, 0] = [1023, +oo] */ + mpz_set_ui (z, 1023); + mpfr_set_inf (&(interval->left), -1); + mpfr_nextabove (&(interval->left)); + mpfr_set_ui (&(interval->right), 0, MPFI_RNDU); + + inex = mpfi_z_sub (got, z, interval); + + if (MPFI_LEFT_IS_INEXACT (inex) || mpfr_cmp_z (&(got->left), z) != 0 + || !MPFI_RIGHT_IS_INEXACT (inex) || !mpfr_inf_p (&(got->right))) { + printf ("Error: mpfi_fr_sub (rop, z, op) does not correctly handle " + "overflow.\n z = "); + mpz_out_str (stdout, 16, z); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + /* left overflow: -1023 - [0, Max] = [-oo, -1023] */ + mpz_neg (z, z); + mpfi_neg (interval, interval); + + inex = mpfi_z_sub (got, z, interval); + + if (!MPFI_LEFT_IS_INEXACT (inex) + || !mpfr_inf_p (&(got->left)) + || MPFI_RIGHT_IS_INEXACT (inex) + || mpfr_cmp_si (&(got->right), -1023) != 0) { + printf ("Error: mpfi_fr_sub (rop, z, op) does not correctly handle " + "overflow.\n z = "); + mpz_out_str (stdout, 16, z); + printf ("\nop = "); + mpfi_out_str (stdout, 16, 0, interval); + printf ("\nrop = "); + mpfi_out_str (stdout, 16, 0, got); + printf ("\nreturn value = %d\n", inex); + exit (1); + } + + mpz_clear (z); + mpfi_clear (interval); + mpfi_clear (got); +} + +#ifndef HAVE_MPFR_Z_SUB +/* fake non-existing function */ +int +mpfr_z_sub (mpfr_ptr x, mpz_srcptr z, mpfr_srcptr y, mpfr_rnd_t rnd) +{ + int ret; + + /* invert rounding mode */ + if (rnd == MPFI_RNDU) + rnd = MPFI_RNDD; + else if (rnd == MPFI_RNDD) + rnd = MPFI_RNDU; + ret = mpfr_sub_z (x, y, z, rnd); + mpfr_neg (x, x, MPFI_RNDU); + return -ret; +} +#endif /* HAVE_MPFR_Z_SUB */ + +int +main (int argc, char **argv) +{ + struct mpfi_function_t i_z_sub; + + mpfi_fun_init_IZI (&i_z_sub, mpfi_z_sub, mpfr_z_sub); + test_start (); + + check_data (&i_z_sub, "z_sub.dat"); + check_random (&i_z_sub, 2, 1000, 10); + check_overflow (); + + test_end (); + mpfi_fun_clear (&i_z_sub); + + return 0; +} diff --git a/Build/source/libs/mpfi/mpfi-src/tests/ui_div.dat b/Build/source/libs/mpfi/mpfi-src/tests/ui_div.dat new file mode 100644 index 00000000000..343deff0774 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/ui_div.dat @@ -0,0 +1,81 @@ +# data file for mpfi_ui_div +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan 0 53 nan nan +0 53 nan nan 1 53 nan nan +0 53 nan nan 0 53 nan -inf +0 53 nan nan 3 53 nan -inf +0 53 nan nan 0 53 nan -7 +0 53 nan nan 7 53 nan -7 +0 53 nan nan 0 53 nan -0 +0 53 nan nan 1 53 nan -0 +0 53 nan nan 0 53 nan 1 +0 53 nan nan 3 53 nan 1 +0 53 nan nan 0 53 nan +inf +0 53 nan nan 6 53 nan +inf +0 53 +0 -0 0 53 -inf -inf +0 53 +0 -0 2 53 -inf -inf +0 53 +0 -0 0 53 -inf -1 +0 53 -4 -0 4 53 -inf -1 + +1 53 -0x12492492492493p-53 -0 + 4 + 53 -inf -7 + +0 53 +0 -0 0 53 -inf -0 +0 53 -inf -0 8 53 -inf -0 +0 53 -inf +inf 0 53 -inf +8 +0 53 -inf +inf 1 53 -inf +8 +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf 3 53 -inf +inf +0 53 nan nan 0 53 -inf nan +0 53 nan nan 6 53 -inf nan + +2 53 -inf -0x12492492492492p-53 + 4 + 53 -7 -0 + +0 53 +0 -0 0 53 +0 -0 +0 53 -inf +inf 1 53 +0 -0 +0 53 +0 -0 0 53 +0 +8 +0 53 0.5 +inf 4 53 +0 +8 + +1 53 0x12492492492492p-53 +inf + 4 + 53 +0 7 + +0 53 +0 -0 0 53 +0 +inf +0 53 +0 +inf 7 53 +0 +inf +0 53 +0 -0 0 53 +inf +inf +0 53 +0 -0 1 53 +inf +inf +0 53 nan nan 0 53 +inf nan +0 53 nan nan 1 53 +inf nan + +# regular values +0 53 -inf +inf + 32 + 53 -32 17 + +0 53 2 5 + 30 + 53 6 15 +1 53 0x11249249249249p-51 5 + 30 + 53 6 14 +2 53 2 0x1124924924924ap-50 + 30 + 53 7 15 +3 53 0x10888888888888p-51 0x14aaaaaaaaaaabp-50 + 31 + 53 6 15 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/ui_sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/ui_sub.dat new file mode 100644 index 00000000000..4c1daaf8aed --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/ui_sub.dat @@ -0,0 +1,71 @@ +# data file for mpfi_ui_sub +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan 0 53 nan nan +0 53 nan nan 1 53 nan nan +0 53 +inf nan 0 53 nan -inf +0 53 +inf nan 3 53 nan -inf +0 53 7 nan 0 53 nan -7 +0 53 14 nan 7 53 nan -7 +0 53 +0 nan 0 53 nan -0 +0 53 15 nan 15 53 nan -0 +0 53 -1 nan 0 53 nan 1 +0 53 30 nan 31 53 nan 1 +0 53 -inf nan 0 53 nan +inf +0 53 -inf nan 63 53 nan +inf +0 53 +inf +inf 0 53 -inf -inf +0 53 +inf +inf 2 53 -inf -inf +0 53 7 +inf 0 53 -inf -7 +0 53 11 +inf 4 53 -inf -7 + +1 53 0x1p+70 +inf + 1 + 53 -inf -0x1p+70 + +0 53 +0 +inf 0 53 -inf -0 +0 53 8 +inf 8 53 -inf -0 +0 53 -8 +inf 0 53 -inf 8 +0 53 8 +inf 16 53 -inf 8 +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf +32 53 -inf +inf +0 53 nan +inf 0 53 -inf nan +0 53 nan +inf +64 53 -inf nan +0 53 +0 -0 0 53 +0 -0 +0 53 1 1 1 53 +0 -0 +0 53 -8 -0 0 53 +0 8 +0 53 -5 3 3 53 +0 8 +0 53 -inf -0 0 53 +0 +inf +0 53 -inf 7 7 53 +0 +inf +0 53 -inf -inf 0 53 +inf +inf +0 53 -inf -inf 1 53 +inf +inf +0 53 nan -inf 0 53 +inf nan +0 53 nan -inf 1 53 +inf nan + +# regular values +0 53 49 64 32 53 -32 -17 +0 53 +0 15 32 53 17 32 +0 53 -15 -0 17 53 17 32 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 3 + 53 -0x123456789abcdf -0x123456789abcdfp-48 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 3 + 53 -0x123456789abcdf -0x123456789abcdfp-56 +2 53 1 0x10123456789abdp-44 + 256 + 53 -0x123456789abcdfp-52 0xff +3 53 0xfff 0x1001 + 0x1001 + 53 0x1p-550 0x1fffffffffffffp-52 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/union.dat b/Build/source/libs/mpfi/mpfi-src/tests/union.dat new file mode 100644 index 00000000000..405f2abd7ae --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/union.dat @@ -0,0 +1,49 @@ +# data file for mpfi_union +# +# for a description of the fields: see add.dat + +# special values +0 53 nan nan 53 nan nan 53 -inf -7 +0 53 nan nan 53 nan nan 53 -8 +1 +0 53 nan nan 53 nan nan 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 nan +0 53 nan nan 53 nan nan 53 +5 +inf +0 53 nan nan 53 nan nan 53 +inf +inf +0 53 nan nan 53 nan nan 53 nan -0 +0 53 nan nan 53 nan -0 53 -inf -7 +0 53 nan nan 53 nan -0 53 -8 +1 +0 53 nan nan 53 nan +inf 53 +0 +inf +0 53 nan nan 53 nan nan 53 +0 +7 +0 53 nan nan 53 nan -inf 53 +5 +inf +0 53 nan nan 53 nan -7 53 +inf +inf +0 53 nan nan 53 nan +1 53 nan -0 +0 53 -inf -inf 53 -inf -inf 53 -inf -inf +0 53 -inf +8 53 -inf -7 53 -1 +8 +0 53 -inf +inf 53 -inf -0 53 +8 +inf +0 53 -inf +inf 53 -inf -0 53 +inf +inf +0 53 -inf +8 53 -inf +8 53 +0 +8 +0 53 -inf +inf 53 -inf +inf 53 +0 +8 +0 53 -inf -0 53 +0 -0 53 -inf -7 +0 53 -7 +8 53 +0 +8 53 -7 -0 +0 53 +0 +8 53 +0 -0 53 +0 +8 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 +0 +inf 53 +0 -0 53 +8 +inf +0 53 nan nan 53 +0 +8 53 +inf nan +0 53 -inf +inf 53 +0 -0 53 -inf +inf +0 53 -7 +8 53 +0 +8 53 -7 +8 +0 53 +0 -0 53 +0 -0 53 +0 -0 +0 53 +0 +inf 53 +0 +inf 53 +0 +8 +0 53 nan nan 53 +0 nan 53 +8 +inf +0 53 +0 +inf 53 +0 +8 53 +inf +inf +0 53 -inf +inf 53 +inf +inf 53 -inf +3 +0 53 +0 +inf 53 +inf +inf 53 +0 +inf +0 53 nan nan 53 +inf +inf 53 +3 nan +0 53 nan nan 53 +inf nan 53 -inf -7 +0 53 nan nan 53 +inf nan 53 +inf +inf +0 53 nan nan 53 +inf nan 53 -3 +7 + +# regular values +0 53 -0x0d 0x90 53 0x12 0x90 53 -0x0d 0x34 +1 12 -0x8.f0p-8 0xa0 53 0x0d 0x34 53 -0x8.ef7p-8 0xa0 +2 12 -0x2fp+12 0x1.f3p+24 53 -0x2fp+12 -0x9p-32 53 -0x12 0x1.f2ffffffp+24 +3 12 -0x1.a12p-4 0x4.e78p-4 53 0x00 0x0.037 53 -0x1.a100001p-4 0x4.e7249961p-4 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/z_div.dat b/Build/source/libs/mpfi/mpfi-src/tests/z_div.dat new file mode 100644 index 00000000000..10085c776f0 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/z_div.dat @@ -0,0 +1,112 @@ +# data file for mpfi_z_div +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan -1 53 nan nan +0 53 nan nan 0 53 nan nan +0 53 nan nan 1 53 nan nan +0 53 nan nan -3 53 nan -inf +0 53 nan nan 0 53 nan -inf +0 53 nan nan 3 53 nan -inf +0 53 nan nan -7 53 nan -7 +0 53 nan nan 0 53 nan -7 +0 53 nan nan 7 53 nan -7 +0 53 nan nan -1 53 nan -0 +0 53 nan nan 0 53 nan -0 +0 53 nan nan 1 53 nan -0 +0 53 nan nan -3 53 nan 1 +0 53 nan nan 0 53 nan 1 +0 53 nan nan 3 53 nan 1 +0 53 nan nan -6 53 nan +inf +0 53 nan nan 0 53 nan +inf +0 53 nan nan 6 53 nan +inf +0 53 +0 -0 -2 53 -inf -inf +0 53 +0 -0 0 53 -inf -inf +0 53 +0 -0 2 53 -inf -inf +0 53 +0 4 -4 53 -inf -1 +0 53 +0 -0 0 53 -inf -1 +0 53 -4 -0 4 53 -inf -1 + +2 53 +0 0x12492492492493p-53 + -4 + 53 -inf -7 +1 53 -0x12492492492493p-53 -0 + 4 + 53 -inf -7 + +0 53 +0 +inf -8 53 -inf -0 +0 53 +0 -0 0 53 -inf -0 +0 53 -inf -0 8 53 -inf -0 +0 53 -inf +inf -1 53 -inf +8 +0 53 -inf +inf 0 53 -inf +8 +0 53 -inf +inf 1 53 -inf +8 +0 53 -inf +inf -3 53 -inf +inf +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf 3 53 -inf +inf +0 53 nan nan -6 53 -inf nan +0 53 nan nan 0 53 -inf nan +0 53 nan nan 6 53 -inf nan +0 53 -inf +inf -1 53 +0 -0 +0 53 +0 -0 0 53 +0 -0 +0 53 -inf +inf 1 53 +0 -0 +0 53 -inf -0.5 -4 53 +0 +8 +0 53 +0 -0 0 53 +0 +8 +0 53 0.5 +inf 4 53 +0 +8 + +2 53 -inf -0x12492492492492p-53 + -4 + 53 +0 7 +1 53 0x12492492492492p-53 +inf + 4 + 53 +0 7 + +0 53 -inf -0 -7 53 +0 +inf +0 53 +0 -0 0 53 +0 +inf +0 53 +0 +inf 7 53 +0 +inf +0 53 +0 -0 -1 53 +inf +inf +0 53 +0 -0 0 53 +inf +inf +0 53 +0 -0 1 53 +inf +inf +0 53 nan nan -1 53 +inf nan +0 53 nan nan 0 53 +inf nan +0 53 nan nan 1 53 +inf nan + +# regular values +0 53 -inf +inf + -32 + 53 -32 17 + +0 53 2 5 + 30 + 53 6 15 +1 53 0x11249249249249p-51 5 + 30 + 53 6 14 +2 53 2 0x1124924924924ap-50 + 30 + 53 7 15 +3 53 0x10888888888888p-51 0x14aaaaaaaaaaabp-50 + 31 + 53 6 15 + +0 53 -5 -2 + -30 + 53 6 15 +1 53 -0x1124924924924ap-50 -2 + 30 + 53 -15 -7 +2 53 -5 -0x11249249249249p-51 + -30 + 53 6 14 +3 53 -0x14aaaaaaaaaaabp-50 -0x10888888888888p-51 + 31 + 53 -15 -6 diff --git a/Build/source/libs/mpfi/mpfi-src/tests/z_sub.dat b/Build/source/libs/mpfi/mpfi-src/tests/z_sub.dat new file mode 100644 index 00000000000..ea3aa20b798 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi-src/tests/z_sub.dat @@ -0,0 +1,101 @@ +# data file for mpfi_z_sub +# +# column fields: +# 1: inexact flag (returned value) +# 2: precision of result +# 3: left endpoint value of result +# 4: right endpoint value of result +# +# 5: first parameter value +# 6: precision of second parameter +# 7: left endpoint value of second parameter +# 8: right endpoint value of second parameter + +# special values +0 53 nan nan -1 53 nan nan +0 53 nan nan 0 53 nan nan +0 53 nan nan 1 53 nan nan +0 53 +inf nan -3 53 nan -inf +0 53 +inf nan 0 53 nan -inf +0 53 +inf nan 3 53 nan -inf +0 53 +0 nan -7 53 nan -7 +0 53 7 nan 0 53 nan -7 +0 53 14 nan 7 53 nan -7 +0 53 -15 nan -15 53 nan -0 +0 53 +0 nan 0 53 nan -0 +0 53 15 nan 15 53 nan -0 +0 53 -32 nan -31 53 nan 1 +0 53 -1 nan 0 53 nan 1 +0 53 30 nan 31 53 nan 1 +0 53 -inf nan -63 53 nan +inf +0 53 -inf nan 0 53 nan +inf +0 53 -inf nan 63 53 nan +inf +0 53 +inf +inf -2 53 -inf -inf +0 53 +inf +inf 0 53 -inf -inf +0 53 +inf +inf 2 53 -inf -inf +0 53 3 +inf -4 53 -inf -7 +0 53 7 +inf 0 53 -inf -7 +0 53 11 +inf 4 53 -inf -7 + +1 53 0x1p+70 +inf + 1 + 53 -inf -0x1p+70 + +0 53 -8 +inf -8 53 -inf -0 +0 53 +0 +inf 0 53 -inf -0 +0 53 8 +inf 8 53 -inf -0 +0 53 -24 +inf -16 53 -inf 8 +0 53 -8 +inf 0 53 -inf 8 +0 53 8 +inf 16 53 -inf 8 +0 53 -inf +inf -32 53 -inf +inf +0 53 -inf +inf 0 53 -inf +inf +0 53 -inf +inf 32 53 -inf +inf +0 53 nan +inf -64 53 -inf nan +0 53 nan +inf 0 53 -inf nan +0 53 nan +inf 64 53 -inf nan +0 53 -1 -1 -1 53 +0 -0 +0 53 +0 -0 0 53 +0 -0 +0 53 1 1 1 53 +0 -0 +0 53 -11 -3 -3 53 +0 8 +0 53 -8 -0 0 53 +0 8 +0 53 -5 3 3 53 +0 8 +0 53 -inf -7 -7 53 +0 +inf +0 53 -inf -0 0 53 +0 +inf +0 53 -inf 7 7 53 +0 +inf +0 53 -inf -inf -1 53 +inf +inf +0 53 -inf -inf 0 53 +inf +inf +0 53 -inf -inf 1 53 +inf +inf +0 53 nan -inf -1 53 +inf nan +0 53 nan -inf 0 53 +inf nan +0 53 nan -inf 1 53 +inf nan + +# regular values +0 53 -64 -49 -32 53 17 32 +0 53 +0 +15 32 53 17 32 +0 53 -15 -0 17 53 17 32 + +0 53 0x153456789abcdfp-48 0x123456789abce2 + 3 + 53 -0x123456789abcdf -0x123456789abcdfp-48 +1 53 0x3123456789abcdp-52 0x123456789abce2 + 3 + 53 -0x123456789abcdf -0x123456789abcdfp-56 +2 53 1 0x10123456789abdp-44 + 256 + 53 -0x123456789abcdfp-52 0xff +3 53 0xfff 0x1001 + 0x1001 + 53 0x1p-550 0x1fffffffffffffp-52 + +0 53 0xf3456789abcdfp-48 0x123456789abcdc + -3 + 53 -0x123456789abcdf -0x123456789abcdfp-48 +1 53 -0x2edcba98765433p-52 0x123456789abcdc + -3 + 53 -0x123456789abcdf -0x123456789abcdfp-56 +2 53 -0x1ff -0xfedcba9876543p-44 + -256 + 53 -0x123456789abcdfp-52 0xff +3 53 -0x1003 -0x1001 + -0x1001 + 53 0x1p-550 0x1fffffffffffffp-52 diff --git a/Build/source/libs/mpfi/mpfi.test b/Build/source/libs/mpfi/mpfi.test new file mode 100755 index 00000000000..3d3839b81f3 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi.test @@ -0,0 +1,6 @@ +#! /bin/sh + +# Copyright (C) 2022 Luigi Scarso +# You may freely use, modify and/or distribute this file. + +./mpfitest || exit 1 diff --git a/Build/source/libs/mpfi/mpfi_config.h.in b/Build/source/libs/mpfi/mpfi_config.h.in new file mode 100644 index 00000000000..782e0f296e1 --- /dev/null +++ b/Build/source/libs/mpfi/mpfi_config.h.in @@ -0,0 +1,75 @@ +/* mpfi_config.h.in. Generated from configure.ac by autoheader. */ + +/* Define to 1 if you have the 'dup2' function. */ +#undef HAVE_DUP2 + +/* Define to 1 if you have the 'gettimeofday' function. */ +#undef HAVE_GETTIMEOFDAY + +/* Define to 1 if you have the header file. */ +#undef HAVE_INTTYPES_H + +/* Define to 1 if you have the 'mpfr_q_sub' function. */ +#undef HAVE_MPFR_Q_SUB + +/* Define to 1 if you have the 'mpfr_z_div' function. */ +#undef HAVE_MPFR_Z_DIV + +/* Define to 1 if you have the 'mpfr_z_sub' function. */ +#undef HAVE_MPFR_Z_SUB + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDINT_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDIO_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDLIB_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STRINGS_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STRING_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_SYS_STAT_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_SYS_TYPES_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_UNISTD_H + +/* Name of package */ +#undef PACKAGE + +/* Define to the address where bug reports for this package should be sent. */ +#undef PACKAGE_BUGREPORT + +/* Define to the full name of this package. */ +#undef PACKAGE_NAME + +/* Define to the full name and version of this package. */ +#undef PACKAGE_STRING + +/* Define to the one symbol short name of this package. */ +#undef PACKAGE_TARNAME + +/* Define to the home page for this package. */ +#undef PACKAGE_URL + +/* Define to the version of this package. */ +#undef PACKAGE_VERSION + +/* Define to 1 if all of the C89 standard headers exist (not just the ones + required in a freestanding environment). This macro is provided for + backward compatibility; new code need not use it. */ +#undef STDC_HEADERS + +/* Version number of package */ +#undef VERSION + +/* Define as 'unsigned int' if doesn't define. */ +#undef size_t diff --git a/Build/source/libs/mpfi/mpfitest.c b/Build/source/libs/mpfi/mpfitest.c new file mode 100644 index 00000000000..d77cd793cc2 --- /dev/null +++ b/Build/source/libs/mpfi/mpfitest.c @@ -0,0 +1,26 @@ +/* mpfitst.c: Basic test for libmpfi + * + * Copyright (C) 2022-2024 Luigi Scarso + * You may freely use, modify and/or distribute this file. + */ + +/* +#include +#include +#include + +int main (int argc, char **argv) +{ + printf ("%s: Compiled with mpfr version %s; using %s\n", + argv[0], MPFR_VERSION_STRING, mpfr_get_version()); + printf ("%s: Compiled with gmp version %d.%d.%d; using %s\n", + argv[0], __GNU_MP_VERSION, __GNU_MP_VERSION_MINOR, __GNU_MP_VERSION_PATCHLEVEL, + gmp_version); + return 0; +} +*/ + +int main (int argc, char **argv) +{ + return 0; +} diff --git a/Build/source/libs/mpfi/version.ac b/Build/source/libs/mpfi/version.ac new file mode 100644 index 00000000000..042e3562115 --- /dev/null +++ b/Build/source/libs/mpfi/version.ac @@ -0,0 +1,11 @@ +dnl +dnl Copyright (C) 2022-2024 Luigi Scarso +dnl +dnl This file is free software; the copyright holder +dnl gives unlimited permission to copy and/or distribute it, +dnl with or without modifications, as long as this notice is preserved. +dnl +dnl -------------------------------------------------------- +dnl +dnl m4-include this file to define the current mpfr version +m4_define([mpfi_version], [1.5.4]) diff --git a/Build/source/libs/mpfr/Makefile.am b/Build/source/libs/mpfr/Makefile.am index 26ee6161283..a8f28405cad 100644 --- a/Build/source/libs/mpfr/Makefile.am +++ b/Build/source/libs/mpfr/Makefile.am @@ -106,6 +106,8 @@ nodist_libmpfr_a_SOURCES = \ @MPFR_TREE@/src/set_d.c \ @MPFR_TREE@/src/set_dfl_prec.c \ @MPFR_TREE@/src/set_f.c \ + @MPFR_TREE@/src/set_inf.c \ + @MPFR_TREE@/src/set_nan.c \ @MPFR_TREE@/src/set_prec.c \ @MPFR_TREE@/src/set_q.c \ @MPFR_TREE@/src/set_rnd.c \ @@ -255,9 +257,7 @@ unused_sources = \ @MPFR_TREE@/src/set_exp.c \ @MPFR_TREE@/src/set_flt.c \ @MPFR_TREE@/src/set_float128.c \ - @MPFR_TREE@/src/set_inf.c \ @MPFR_TREE@/src/set_ld.c \ - @MPFR_TREE@/src/set_nan.c \ @MPFR_TREE@/src/set_prc_raw.c \ @MPFR_TREE@/src/set_si.c \ @MPFR_TREE@/src/set_sj.c \ diff --git a/Build/source/libs/mpfr/Makefile.in b/Build/source/libs/mpfr/Makefile.in index 25d501acff8..9f604f0593b 100644 --- a/Build/source/libs/mpfr/Makefile.in +++ b/Build/source/libs/mpfr/Makefile.in @@ -187,6 +187,8 @@ nodist_libmpfr_a_OBJECTS = @MPFR_TREE@/src/abort_prec_max.$(OBJEXT) \ @MPFR_TREE@/src/set_d.$(OBJEXT) \ @MPFR_TREE@/src/set_dfl_prec.$(OBJEXT) \ @MPFR_TREE@/src/set_f.$(OBJEXT) \ + @MPFR_TREE@/src/set_inf.$(OBJEXT) \ + @MPFR_TREE@/src/set_nan.$(OBJEXT) \ @MPFR_TREE@/src/set_prec.$(OBJEXT) \ @MPFR_TREE@/src/set_q.$(OBJEXT) \ @MPFR_TREE@/src/set_rnd.$(OBJEXT) \ @@ -311,6 +313,8 @@ am__depfiles_remade = ./$(DEPDIR)/mpfrtest-mpfrtest.Po \ @MPFR_TREE@/src/$(DEPDIR)/set_d.Po \ @MPFR_TREE@/src/$(DEPDIR)/set_dfl_prec.Po \ @MPFR_TREE@/src/$(DEPDIR)/set_f.Po \ + @MPFR_TREE@/src/$(DEPDIR)/set_inf.Po \ + @MPFR_TREE@/src/$(DEPDIR)/set_nan.Po \ @MPFR_TREE@/src/$(DEPDIR)/set_prec.Po \ @MPFR_TREE@/src/$(DEPDIR)/set_q.Po \ @MPFR_TREE@/src/$(DEPDIR)/set_rnd.Po \ @@ -857,6 +861,8 @@ nodist_libmpfr_a_SOURCES = \ @MPFR_TREE@/src/set_d.c \ @MPFR_TREE@/src/set_dfl_prec.c \ @MPFR_TREE@/src/set_f.c \ + @MPFR_TREE@/src/set_inf.c \ + @MPFR_TREE@/src/set_nan.c \ @MPFR_TREE@/src/set_prec.c \ @MPFR_TREE@/src/set_q.c \ @MPFR_TREE@/src/set_rnd.c \ @@ -1006,9 +1012,7 @@ unused_sources = \ @MPFR_TREE@/src/set_exp.c \ @MPFR_TREE@/src/set_flt.c \ @MPFR_TREE@/src/set_float128.c \ - @MPFR_TREE@/src/set_inf.c \ @MPFR_TREE@/src/set_ld.c \ - @MPFR_TREE@/src/set_nan.c \ @MPFR_TREE@/src/set_prc_raw.c \ @MPFR_TREE@/src/set_si.c \ @MPFR_TREE@/src/set_sj.c \ @@ -1283,6 +1287,10 @@ clean-noinstLIBRARIES: @MPFR_TREE@/src/$(DEPDIR)/$(am__dirstamp) @MPFR_TREE@/src/set_f.$(OBJEXT): @MPFR_TREE@/src/$(am__dirstamp) \ @MPFR_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFR_TREE@/src/set_inf.$(OBJEXT): @MPFR_TREE@/src/$(am__dirstamp) \ + @MPFR_TREE@/src/$(DEPDIR)/$(am__dirstamp) +@MPFR_TREE@/src/set_nan.$(OBJEXT): @MPFR_TREE@/src/$(am__dirstamp) \ + @MPFR_TREE@/src/$(DEPDIR)/$(am__dirstamp) @MPFR_TREE@/src/set_prec.$(OBJEXT): @MPFR_TREE@/src/$(am__dirstamp) \ @MPFR_TREE@/src/$(DEPDIR)/$(am__dirstamp) @MPFR_TREE@/src/set_q.$(OBJEXT): @MPFR_TREE@/src/$(am__dirstamp) \ @@ -1436,6 +1444,8 @@ distclean-compile: @AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_d.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_dfl_prec.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_f.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_inf.Po@am__quote@ # am--include-marker +@AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_nan.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_prec.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_q.Po@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@@MPFR_TREE@/src/$(DEPDIR)/set_rnd.Po@am__quote@ # am--include-marker @@ -2092,6 +2102,8 @@ distclean: distclean-recursive -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_d.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_dfl_prec.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_f.Po + -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_inf.Po + -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_nan.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_prec.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_q.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_rnd.Po @@ -2245,6 +2257,8 @@ maintainer-clean: maintainer-clean-recursive -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_d.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_dfl_prec.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_f.Po + -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_inf.Po + -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_nan.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_prec.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_q.Po -rm -f @MPFR_TREE@/src/$(DEPDIR)/set_rnd.Po -- cgit v1.2.3