zsolve/defs.c

   1 /*
   2 4ti2 -- A software package for algebraic, geometric and combinatorial
   3 problems on linear spaces.
   4
   5 Copyright (C) 2006 4ti2 team.
   6 Main author(s): Matthias Walter.
   7
   8 This program is free software; you can redistribute it and/or
   9 modify it under the terms of the GNU General Public License
  10 as published by the Free Software Foundation; either version 2
  11 of the License, or (at your option) any later version.
  12
  13 This program is distributed in the hope that it will be useful,
  14 but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  16 GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with this program; if not, write to the Free Software
  20 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  21 */
  22
  23 #include "defs.h"
  24
  25 //                                                                            //
  26
  27 int _gcd(int a, int b)
  28 {
  29         if (b!=0)
  30                 return _gcd(b, a % b);
  31         else
  32                 return a;
  33 }
  34
  35 //                                                                            //
  36
  37 int gcd(int a, int b)
  38 {
  39         if (a<0)
  40                 a *= -1;
  41         if (b<0)
  42                 b *= -1;
  43         if (a>b)
  44                 return _gcd(a, b);
  45         else
  46                 return _gcd(b, a);
  47 }
  48
  49 //                                                                            //
  50
  51 int mini(int a, int b)
  52 {
  53         return a<b ? a : b;
  54 }
  55
  56 //                                                                            //
  57
  58 int maxi(int a, int b)
  59 {
  60         return a>b ? a : b;
  61 }
  62
  63 //                                                                            //
  64
  65 double maxd(double a, double b)
  66 {
  67         return a>b ? a : b;
  68 }