SUB MAIN
  PRINT "---- SINE, COSINE, TANGENTS (DEGREES) ----"

  PRINT "COSD(45)=" + STR$(COSD(45))
  PRINT "SIND(45)=" + STR$(SIND(45))
  PRINT "TAND(45)=" + STR$(TAND(45))

  PRINT "ACOSD(0.707)=" + STR$(ACOSD(0.707))
  PRINT "ASIND(0.707)=" + STR$(ASIND(0.707))
  PRINT "ATAND(1)=" + STR$(ATAND(1))

  PRINT "\n---- SINE, COSINE, TANGENTS (RADIANS) ----"

  PRINT "COS(0.785)=" + STR$(COS(0.785))
  PRINT "SIN(0.785)=" + STR$(SIN(0.785))
  PRINT "TAN(0.785)=" + STR$(TAN(0.785))
  
  PRINT "ACOS(0.707)=" + STR$(ACOS(0.707))
  PRINT "ASIN(0.707)=" + STR$(ASIN(0.707))
  PRINT "ATAN(1)=" + STR$(ATAN(1))
  
  PRINT "\n---- SECANT, COSECANT, COTANGENT (DEGREES) ----"

  PRINT "SECD(45)=" + STR$(SECD(45))
  PRINT "CSCD(45)=" + STR$(CSCD(45))
  PRINT "COTD(45)=" + STR$(COTD(45))
	
  PRINT "ASECD(1.414)=" + STR$(ASECD(1.414))
  PRINT "ACSCD(1.414)=" + STR$(ACSCD(1.414))
  PRINT "ACOTD(1)=" + STR$(ACOTD(1))
  
  PRINT "\n---- SECANT, COSECANT, COTANGENT (RADIANS) ----"

  PRINT "SEC(0.785)=" + STR$(SEC(0.785))
  PRINT "CSC(0.785)=" + STR$(CSC(0.785))
  PRINT "COT(0.785)=" + STR$(COT(0.785))
	
  PRINT "ASEC(1.414)=" + STR$(ASEC(1.414))
  PRINT "ACSC(1.414)=" + STR$(ACSC(1.414))
  PRINT "ACOT(1)=" + STR$(ACOT(1))
END SUB