plot 1/y*(integral s*cos(s)*s for s = 0 to y), y=-100..100