kill(all)$

van=facebook.com/LearningCalculus$

y(x):=sqrt(sin(%pi*x)-1);

first(solve(y(x),x));

roots[i]:=1/2*(4*i+1);

makelist(roots[i],i,-4,4);

L= L[0]*sqrt(-v^2/c^2 + 1);