pi=Pi//N; theta1:=ArcTan[Tan[phi] - u/Cos[phi]]; theta2:=If[phi30,ImageSize->{400,300}, AxesLabel->{"phi","u","theta"}];