implement epsilon (from ISO)

2009-10-20 09:21:59 +01:00
parent 7223b0c9a5
commit d18cb214fa
4 changed files with 23 additions and 1 deletions
--- a/C/arith2.c
+++ b/C/arith2.c
@@ -1093,6 +1093,7 @@ static InitBinEntry InitBinTab[] = {
  {"\\/", op_or},
  {"#", op_xor},
  {"><", op_xor},
+  {"atan", op_atan2},
  {"atan2", op_atan2},
  /* C-Prolog exponentiation */
  {"^", op_power},