fbase + erfcx

pub/lib/fbase.cpp

@@ -353,6 +353,10 @@ double func_erfi(double v)
 {
     return erfi(v);
 }
+double func_erfcx(double v)
+{
+    return erfcx(v);
+}
 
 double func_dawson(double v)
 {
@@ -1043,6 +1047,8 @@ void fbase_initialize()
     G->register_fct_d_d(m, func_erfc);
     m = {"erfi", 1, "(x): imaginary error function of x"};
     G->register_fct_d_d(m, func_erfi);
+    m = {"erfcx", 1, "(x): error-compensated complementary error function of x"};
+    G->register_fct_d_d(m, func_erfcx);
     m = {"dawson", 1, "(x): Dawson function of x"};
     G->register_fct_d_d(m, func_dawson);
     m = {"sinc", 1, "(x): sinus cardinalis, sin(x)/x"};