\\ Star-discrepancy (mod 1) of a sequence of real numbers.
\\ 19061 Kuipers/, 91.
t_distar (v) = {my (n);
v=vecsort(apply(frac,v)); n=#v;
0.5/n+vecmax(vector(n,i,abs(v[i]-(i-0.5)/n)))}