/* Copyright (c) 1997-2010
   Ewgenij Gawrilow, Michael Joswig (Technische Universitaet Darmstadt, Germany)
   http://www.polymake.de

   This program is free software; you can redistribute it and/or modify it
   under the terms of the GNU General Public License as published by the
   Free Software Foundation; either version 2, or (at your option) any
   later version: http://www.gnu.org/licenses/gpl.txt.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
--------------------------------------------------------------------------------
   $Project: polymake $$Id: Matrix_1.cc 9552 2010-03-09 14:58:12Z paffenho $
*/

#define DIMENSION_CHECKS 1
#define INDEX_CHECKS 1

#include <polymake.h>
#include <Matrix.h>
#include <Rational.h>
#include <Integer.h>
#include <Vector.h>
#include <SparseMatrix.h>
#include <linalg.h>
#include <Array.h>

namespace polymake { namespace common {
///==== Automatically generated contents follow.    Please do not delete this line. ====
   template <typename T0>
   FunctionInterface4perl( new_int_int, T0 ) {
      perl::Value arg0(stack[1]), arg1(stack[2]);
      WrapperReturnNew(T0, (arg0.get<int>(), arg1.get<int>()) );
   };

   template <typename T0, typename T1>
   FunctionInterface4perl( new_X, T0,T1 ) {
      perl::Value arg0(stack[1]);
      WrapperReturnNew(T0, (arg0.get<T1>()) );
   };

   template <typename T0>
   FunctionInterface4perl( new, T0 ) {
      WrapperReturnNew(T0, () );
   };

   ClassTemplate4perl("Polymake::common::Matrix");
   Class4perl("Polymake::common::Matrix__Rational", Matrix< Rational >);
   Class4perl("Polymake::common::Matrix__Float", Matrix< double >);
   Class4perl("Polymake::common::Matrix__Integer", Matrix< Integer >);
   Class4perl("Polymake::common::Matrix__Int", Matrix< int >);
   FunctionInstance4perl(new, Matrix< Rational >);
   FunctionInstance4perl(new, Matrix< double >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const Matrix< double > >);
   FunctionInstance4perl(new, Matrix< Integer >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const Matrix< Integer > >);
   FunctionInstance4perl(new, Matrix< int >);
   FunctionInstance4perl(new_X, Matrix< double >, perl::Canned< const Matrix< Rational > >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const pm::Transposed<pm::Matrix<Rational> > >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const Matrix< int > >);
   FunctionInstance4perl(new_int_int, Matrix< double >);
   FunctionInstance4perl(new_int_int, Matrix< int >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const pm::MatrixMinor<pm::Matrix<Rational> const&, pm::all_selector const&, pm::Series<int, true> const&> >);
   FunctionInstance4perl(new_X, Matrix< double >, perl::Canned< const SparseMatrix< Rational > >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const pm::RowChain<pm::Matrix<Rational> const&, pm::Matrix<Rational> const&> >);
   FunctionInstance4perl(new_int_int, Matrix< Rational >);
   FunctionInstance4perl(new_X, Matrix< double >, perl::Canned< const SparseMatrix< double > >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const Matrix< Rational > >);
   FunctionInstance4perl(new_X, Matrix< double >, perl::Canned< const Matrix< double > >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const SparseMatrix< Rational > >);
   FunctionInstance4perl(new_X, Matrix< Rational >, perl::Canned< const pm::MatrixMinor<pm::Matrix<pm::Rational> const&, pm::Array<int, void> const&, pm::all_selector const&> >);
   FunctionInstance4perl(new_X, Matrix< double >, perl::Canned< const pm::RowChain<pm::Matrix<pm::Rational> const&, pm::Matrix<pm::Rational> const&> >);
   FunctionInstance4perl(new_X, Matrix< Integer >, perl::Canned< const pm::DiagMatrix<pm::SameElementVector<pm::Integer> > >);
   FunctionInstance4perl(new_int_int, Matrix< Integer >);
///==== Automatically generated contents end here.  Please do not delete this line. ====
} }
