Plot[ {(1- (2 t /Pi)^2) Tan[t]/t , Sec[t] (1- (2 t /Pi)^2)}, {t,-Pi/2, Pi/2}]