r =

a = 2.3 (slider from -5 to 5, step 0.1)
f(t) = 1 / cos(t - a)
InputBox1 = Textfield(f)
Polar = CurveCartesian((f(t) * cos(t)), (f(t) * sin(t)), t, 0, (2 * π))