From 16e87df7199bd06a44a65468f61ec68adf363829 Mon Sep 17 00:00:00 2001
From: "Joachim Wuttke (o)" <j.wuttke@fz-juelich.de>
Date: Sat, 22 Mar 2025 08:04:12 +0100
Subject: [PATCH] fbase + erfcx
---
pub/lib/fbase.cpp | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/pub/lib/fbase.cpp b/pub/lib/fbase.cpp
index abeee0da..53251e9e 100644
--- a/pub/lib/fbase.cpp
+++ b/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"};
--
GitLab