1 /*
2     Copyright (C) 2017 Fredrik Johansson
3 
4     This file is part of Arb.
5 
6     Arb is free software: you can redistribute it and/or modify it under
7     the terms of the GNU Lesser General Public License (LGPL) as published
8     by the Free Software Foundation; either version 2.1 of the License, or
9     (at your option) any later version.  See <http://www.gnu.org/licenses/>.
10 */
11 
12 #include "mag.h"
13 
14 void
mag_const_pi(mag_t res)15 mag_const_pi(mag_t res)
16 {
17     fmpz_clear(MAG_EXPREF(res));
18     MAG_MAN(res) = 843314857;
19     MAG_EXP(res) = 2;
20 }
21 
22 void
mag_const_pi_lower(mag_t res)23 mag_const_pi_lower(mag_t res)
24 {
25     fmpz_clear(MAG_EXPREF(res));
26     MAG_MAN(res) = 843314856;
27     MAG_EXP(res) = 2;
28 }
29 
30