/*
    Copyright (C) 2019 Alessandro Languasco
*/

/*-*- compile-command: "/usr/bin/gcc -c -o mainKummer.gp.o -O3 -Wall -fno-strict-aliasing -fomit-frame-pointer -fPIC -I\"/usr/local/include\" mainKummer.gp.c && /usr/bin/gcc -o mainKummer.gp.so -bundle -undefined dynamic_lookup -O3 -Wall -fno-strict-aliasing -fomit-frame-pointer -fPIC mainKummer.gp.o "; -*-*/
#include <pari/pari.h>
/*
GP;install("my_init_mainKummer","v","init_mainKummer","./mainKummer.gp.so");
GP;install("my_mainKummer","vD0,G,","mainKummer","./mainKummer.gp.so");
*/
void my_init_mainKummer(void);
void my_mainKummer(GEN my_q);
/*End of prototype*/

int main() {
    long a;
  GEN q;
  pari_init(40000000,0);  /* memory size, primes precomputed*/
  my_init_mainKummer();
    
  printf("Give me an odd prime = ");
  scanf("%ld",&a);
  q = stoi(a);


  my_mainKummer(q);
    /* ndec2prec(38): converts a number of decimal digits to a number of codewords */
 
  pari_close();
  return 0;
}

/*

MAC
 /usr/bin/gcc m_precpsi.c precpsi.gp.o -g -O3 -Wall -fno-strict-aliasing -fomit-frame-pointer -fPIC -I\"/usr/local/include\" -L/usr/local/lib -lpari -o m_precpsi.exe

pc ufficio
/usr/bin/gcc m_precpsi.c precpsi.gp.o -g -O3 -Wall -Wno-unused-result -fno-strict-aliasing -fomit-frame-pointer -fPIC -I\"/usr/local/include\"-lgmp -L/usr/local/lib -lpari -o m_precpsi.exe 

 */