version 0.3.33
[fms.git] / libs / libtommath / bn_mp_abs.c
1 #include <tommath.h>
2 #ifdef BN_MP_ABS_C
3 /* LibTomMath, multiple-precision integer library -- Tom St Denis
4  *
5  * LibTomMath is a library that provides multiple-precision
6  * integer arithmetic as well as number theoretic functionality.
7  *
8  * The library was designed directly after the MPI library by
9  * Michael Fromberger but has been written from scratch with
10  * additional optimizations in place.
11  *
12  * The library is free for all purposes without any express
13  * guarantee it works.
14  *
15  * Tom St Denis, tomstdenis@gmail.com, http://math.libtomcrypt.com
16  */
17
18 /* b = |a| 
19  *
20  * Simple function copies the input and fixes the sign to positive
21  */
22 int
23 mp_abs (mp_int * a, mp_int * b)
24 {
25   int     res;
26
27   /* copy a to b */
28   if (a != b) {
29      if ((res = mp_copy (a, b)) != MP_OKAY) {
30        return res;
31      }
32   }
33
34   /* force the sign of b to positive */
35   b->sign = MP_ZPOS;
36
37   return MP_OKAY;
38 }
39 #endif
40
41 /* $Source: /cvs/libtom/libtommath/bn_mp_abs.c,v $ */
42 /* $Revision: 1.3 $ */
43 /* $Date: 2006/03/31 14:18:44 $ */