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 IP;
  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;
}