pelofskegcd.c (393B)
1 #include <flint.h> 2 #include <fmpz_vec.h> 3 #include <stdio.h> 4 #include <stdlib.h> 5 6 #include "batchgcd.h" 7 #include "fmpzio.h" 8 9 int 10 main(int argc, char *argv[]) 11 { 12 fmpz *v, *res; 13 slong nv, i; 14 15 nv = read_hex_lines(&v); 16 res = _fmpz_vec_init(nv); 17 18 pelofske_gcd(res, v, nv); 19 20 for (i = 0; i < nv; i++) { 21 fmpz_print(&res[i]); 22 printf("\n"); 23 } 24 25 free(v); 26 free(res); 27 28 return 0; 29 }