Mercurial > dropbear

comparison tomsfastmath/src/numtheory/fp_lcm.c @ 643:a362b62d38b2 dropbear-tfm

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add tomsfastmath from git rev bfa4582842bc3bab42e4be4aed5703437049502a with Makefile.in renamed
author Matt Johnston <matt@ucc.asn.au>
date Wed, 23 Nov 2011 18:10:20 +0700
parents
children
comparison
equal deleted inserted replaced
642:33fd2f3499d2 643:a362b62d38b2
1 /* TomsFastMath, a fast ISO C bignum library.
2 *
3 * This project is meant to fill in where LibTomMath
4 * falls short. That is speed ;-)
5 *
6 * This project is public domain and free for all purposes.
7 *
8 * Tom St Denis, [email protected]
9 */
10 #include <tfm.h>
11
12 /* c = [a, b] */
13 void fp_lcm(fp_int *a, fp_int *b, fp_int *c)
14 {
15 fp_int t1, t2;
16
17 fp_init(&t1);
18 fp_init(&t2);
19 fp_gcd(a, b, &t1);
20 if (fp_cmp_mag(a, b) == FP_GT) {
21 fp_div(a, &t1, &t2, NULL);
22 fp_mul(b, &t2, c);
23 } else {
24 fp_div(b, &t1, &t2, NULL);
25 fp_mul(a, &t2, c);
26 }
27 }
28
29 /* $Source$ */
30 /* $Revision$ */
31 /* $Date$ */