Givaro
examples/Integer/ilcm.C

NO DOC

// Copyright(c)'1994-2009 by The Givaro group
// This file is part of Givaro.
// Givaro is governed by the CeCILL-B license under French law
// and abiding by the rules of distribution of free software.
// see the COPYRIGHT file for more details.
#include <iostream>
using namespace std;
#include <stdlib.h>
#include <givaro/givintprime.h>
#include <givaro/givtimer.h>
#include <givaro/givinit.h> // Givaro initialization
using namespace Givaro;
int main(int argc, char** argv)
{
// Givaro::Init(&argc, &argv);
IntegerDom::Element CM, g,a,b, c;
int offset = 0;
if (argc > ++offset) a = Integer(argv[offset]); else cin >> a;
if (argc > ++offset) b = Integer(argv[offset]); else cin >> b;
Timer tim; tim.clear(); tim.start();
IP.gcd(g,a,b);
IP.mul(CM, a, b);
IP.divin(CM, g);
for ( ; argc > ++offset; ) {
c = Integer(argv[offset]);
IP.gcd(g, CM, c);
IP.divin(CM, g);
IP.mulin(CM, c);
}
tim.stop();
cout << CM << endl;
cerr << "gcd+mul: " << tim << endl;
tim.clear(); tim.start();
IP.lcm(CM,a,b);
// cerr << "lcm(" << a << "," << b << ") = " << CM << endl;
for ( offset = 2; argc > ++offset; ) {
c = Integer(argv[offset]);
// cerr << "lcm(" << c << "," << CM << ") = " ;
IP.lcmin(CM, c);
// cerr << CM << endl;
}
tim.stop();
cout << CM << endl;
cerr << "lcm: " << tim << endl;
// Givaro::End();
return 0;
}