,TANG5T ,EXAMPLES

#A4 ,! TANG5T ( "O HUNDR$ TW5TY
  DEGREES IS WRITT5
  _% TAN #120^.* _:
#B4 ,! TANG5T ( OP5 FRAC;N TWO
  PI OV] ?REE CLOSE FRAC;N
  EQUALS ! NEGATIVE SQU>E ROOT (
  ?REE IS WRITT5
  _% TAN ?2.P/3# .K ->3] _:
#C4 ,! TANG5T ( ;X IS EQUAL TO
  OP5 FRAC;N S9E ( ;X OV] COS9E
  ( ;X CLOSE FRAC;N IS WRITT5
  _% TAN X .K ?SIN X/COS X# _:
#D4 ,TANG5T SQU>$ !TA EQUALS
  SECANT SQU>$ !TA M9US "O IS
  WRITT5
  _% TAN^2 .? .K SEC^2 .?-1 _:






                              #A