,L[]CASE ,GAMMA ,EXAMPLES

#1_4 ,L[]CASE GAMMA EQUALS ?IRTY
  DEGREES IS WRITT5 .G .K #30^.*
#2_4 ,OP5 FRAC;N "O OV] !
  COTANG5T ( L[]CASE GAMMA CLOSE
  FRAC;N EQUALS ! TANG5T (
  L[]CASE GAMMA IS WRITT5
  ?1/COT .G# .K TAN .G
#3_4 ,! COS9E ( OP5 P>5!SIS
  L[]CASE GAMMA PLUS TWO PI
  CLOSE P>5!SIS EQUALS ! COS9E (
  L[]CASE GAMMA IS WRITT5
  COS (.G+2.P) .K COS .G
#4_4 ,! COS9E ( TWO L[]CASE
  GAMMA EQUALS "O M9US TWO S9E
  SQU>$ L[]CASE GAMMA IS WRITT5
  COS #2.G .K #1-2SIN^2 .G
#5_4 ,! TANG5T ( OP5 P>5!SIS
  NEGATIVE L[]CASE GAMMA CLOSE
  P>5!SIS EQUALS NEGATIVE TANG5T
  L[]CASE GAMMA IS WRITT5
  TAN (-.G) .K -TAN .G

                              #A
#6_4 ,S9E SQU>$ L[]CASE GAMMA
  EQUALS "O M9US COS9E SQU>$
  L[]CASE GAMMA IS WRITT5
  SIN^2 .G .K #1-COS^2 .G




















                              #B