
'-------------
'TRIG
'=============


  dim as double ra,de,xx,yy
  yy=2
  xx=1
  ra=atn  yy/xx
  ra=atan (yy,xx) 'ALTERNATIVE
  de=deg ra
  print `
  Y `       tab str(yy) `
  X `       tab str(xx) `
  Degrees ` tab str(de) `
  Radians ` tab str(ra) `
  `
  
