1 1.1 mrg /* mpq_set_ui(dest,ulong_num,ulong_den) -- Set DEST to the rational number 2 1.1 mrg ULONG_NUM/ULONG_DEN. 3 1.1 mrg 4 1.1.1.4 mrg Copyright 1991, 1994, 1995, 2001-2003, 2018 Free Software Foundation, Inc. 5 1.1 mrg 6 1.1 mrg This file is part of the GNU MP Library. 7 1.1 mrg 8 1.1 mrg The GNU MP Library is free software; you can redistribute it and/or modify 9 1.1.1.3 mrg it under the terms of either: 10 1.1.1.3 mrg 11 1.1.1.3 mrg * the GNU Lesser General Public License as published by the Free 12 1.1.1.3 mrg Software Foundation; either version 3 of the License, or (at your 13 1.1.1.3 mrg option) any later version. 14 1.1.1.3 mrg 15 1.1.1.3 mrg or 16 1.1.1.3 mrg 17 1.1.1.3 mrg * the GNU General Public License as published by the Free Software 18 1.1.1.3 mrg Foundation; either version 2 of the License, or (at your option) any 19 1.1.1.3 mrg later version. 20 1.1.1.3 mrg 21 1.1.1.3 mrg or both in parallel, as here. 22 1.1 mrg 23 1.1 mrg The GNU MP Library is distributed in the hope that it will be useful, but 24 1.1 mrg WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY 25 1.1.1.3 mrg or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 26 1.1.1.3 mrg for more details. 27 1.1 mrg 28 1.1.1.3 mrg You should have received copies of the GNU General Public License and the 29 1.1.1.3 mrg GNU Lesser General Public License along with the GNU MP Library. If not, 30 1.1.1.3 mrg see https://www.gnu.org/licenses/. */ 31 1.1 mrg 32 1.1 mrg #include "gmp-impl.h" 33 1.1 mrg 34 1.1 mrg void 35 1.1.1.3 mrg mpq_set_ui (mpq_t dest, unsigned long int num, unsigned long int den) 36 1.1 mrg { 37 1.1 mrg if (GMP_NUMB_BITS < BITS_PER_ULONG) 38 1.1 mrg { 39 1.1 mrg if (num == 0) /* Canonicalize 0/d to 0/1. */ 40 1.1 mrg den = 1; 41 1.1 mrg mpz_set_ui (mpq_numref (dest), num); 42 1.1 mrg mpz_set_ui (mpq_denref (dest), den); 43 1.1 mrg return; 44 1.1 mrg } 45 1.1 mrg 46 1.1 mrg if (num == 0) 47 1.1 mrg { 48 1.1.1.4 mrg /* Canonicalize 0/d to 0/1. */ 49 1.1 mrg den = 1; 50 1.1.1.2 mrg SIZ(NUM(dest)) = 0; 51 1.1 mrg } 52 1.1 mrg else 53 1.1 mrg { 54 1.1.1.4 mrg MPZ_NEWALLOC (NUM(dest), 1)[0] = num; 55 1.1.1.2 mrg SIZ(NUM(dest)) = 1; 56 1.1 mrg } 57 1.1 mrg 58 1.1.1.4 mrg MPZ_NEWALLOC (DEN(dest), 1)[0] = den; 59 1.1.1.2 mrg SIZ(DEN(dest)) = (den != 0); 60 1.1 mrg } 61