#include #include #include // ********************************************************************** // GLOBAL VARIABLES // ********************************************************************** int i,j,k; // global only for debbuging purpose // ********************************************************************** // FUNCTION PROTOTYPE // ********************************************************************** mpz_class deter(mpz_class *t,int n); // ********************************************************************** // FUNCTION DEFINITION // ********************************************************************** mpz_class deter(mpz_class *t,int n) { // int i; static mpz_class D,a,b; mpz_class *LAUX,*L; D=1; for(i=1;i t(i,i)*L(j)-t(i,j)*L(i) // elinine a[i,j]: L(j) -> b*L(j)-a*L(i) if (i