Plot[y=Csc[(Pi Sin[x])/2]^2 Sin[(5 Pi Sin[x])/2]^2, {x, -Pi/2, Pi/2}, {y, 0, 25}]