\\ Pari-gp
\p99
l=List();
for(i=2,100,if(issquarefree(i),listput(l,i)));
f=sqrt(Vec(l));
v=round(frac(f)*2^64);