expr = tan(floor(30 * x)) + x / 8
plot(expr, adaptive=False, n=1e04)
