asin, acos, atan, atan2 added

2 files changed, 20 insertions, 1 deletions

diff --git a/src/c/urweb.c b/src/c/urweb.c
index edf55f21..c6f6220c 100644
--- a/src/c/urweb.c
+++ b/src/c/urweb.c
@@ -4541,6 +4541,22 @@ uw_Basis_float uw_Basis_exp(uw_context ctx, uw_Basis_float n) {
   return exp(n);
 }
 
+uw_Basis_float uw_Basis_asin(uw_context ctx, uw_Basis_float n) {
+  return asin(n);
+}
+
+uw_Basis_float uw_Basis_acos(uw_context ctx, uw_Basis_float n) {
+  return acos(n);
+}
+
+uw_Basis_float uw_Basis_atan(uw_context ctx, uw_Basis_float n) {
+  return atan(n);
+}
+
+uw_Basis_float uw_Basis_atan2(uw_context ctx, uw_Basis_float n, uw_Basis_float m) {
+  return atan2(n, m);
+}
+
 uw_Basis_string uw_Basis_atom(uw_context ctx, uw_Basis_string s) {
   char *p;
 
diff --git a/src/settings.sml b/src/settings.sml
index c0b5e0e6..4b326da8 100644
--- a/src/settings.sml
+++ b/src/settings.sml
@@ -342,7 +342,10 @@ val jsFuncsBase = basisM [("alert", "alert"),
                           ("cos", "cos"),
                           ("log", "log"),
                           ("exp", "exp"),
-                           
+                          ("asin", "asin"),
+                          ("acos", "acos"),
+                          ("atan", "atan"),
+                          ("atan2", "atan2"),                           
 
                           ("now", "now"),
                           ("timeToString", "showTime"),