remove exp, atan, atan2

lfortran · Jan 29, 2024 · 445f2e8 · 445f2e8
1 parent 2178fcc
commit 445f2e8
Showing 1 changed file with 0 additions and 8 deletions.
diff --git a/src/lfortran/semantics/comptime_eval.h b/src/lfortran/semantics/comptime_eval.h
@@ -102,7 +102,6 @@ struct IntrinsicProcedures {
             {"selected_int_kind", {m_kind, &eval_selected_int_kind, true}},
             {"selected_real_kind", {m_kind, &eval_selected_real_kind, true}},
             {"selected_char_kind", {m_kind, &eval_selected_char_kind, true}},
-            {"exp", {m_math, &eval_exp, true}},
             {"dexp", {m_math, &eval_dexp, true}},
             {"sexp", {m_math, &eval_sexp, true}},
             {"cexp", {m_math, &eval_cexp, true}},
@@ -128,13 +127,10 @@ struct IntrinsicProcedures {
 
             {"asin", {m_math, &eval_asin, true}},
             {"acos", {m_math, &eval_acos, true}},
-            {"atan", {m_math, &eval_atan, true}},
 
             {"asinh", {m_math, &eval_asinh, true}},
             {"acosh", {m_math, &eval_acosh, true}},
             {"atanh", {m_math, &eval_atanh, true}},
-
-            {"atan2", {m_math, &eval_atan2, true}},
             {"sign", {m_math, &not_implemented, false}},
 
             {"dot_product", {m_math, &not_implemented, false}},
@@ -467,7 +463,6 @@ struct IntrinsicProcedures {
 
 TRIG(asin)
 TRIG(acos)
-TRIG(atan)
 TRIG(asinh)
 TRIG(acosh)
 TRIG(atanh)
@@ -501,9 +496,6 @@ TRIG2(atan, datan)
     static ASR::expr_t *eval_log10(Allocator &al, const Location &loc, Vec<ASR::expr_t*> &args, const CompilerOptions &compiler_options) {
         return eval_trig(al, loc, args, compiler_options, &log10, nullptr);
     }
-    static ASR::expr_t *eval_atan2(Allocator &al, const Location &loc, Vec<ASR::expr_t*> &args, const CompilerOptions &compiler_options) {
-        return eval_2args(al, loc, args, compiler_options, &atan2);
-    }
 
     static ASR::expr_t *eval_len(Allocator &al, const Location &loc, Vec<ASR::expr_t*> &args, const CompilerOptions &compiler_options) {
         if( !ASRUtils::all_args_evaluated(args) ) {