/*
    Copyright (C) 2019 Alessandro Languasco
*/


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

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


  my_mainEK(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 

 */