diff --git a/src/frontend/parse.c b/src/frontend/parse.c
index 717133dc5..023455833 100644
--- a/src/frontend/parse.c
+++ b/src/frontend/parse.c
@@ -151,7 +151,7 @@ struct func ft_funcs[] = {
     { "db",          cx_db },
     { "log",         cx_log10 },
     { "log10",       cx_log10 },
-    { "ln",          cx_ln },
+    { "ln",          cx_log },
     { "exp",         cx_exp },
     { "abs",         cx_mag },
     { "sqrt",        cx_sqrt },
diff --git a/src/include/ngspice/fteext.h b/src/include/ngspice/fteext.h
index 30b9ad0f2..0c859c56f 100644
--- a/src/include/ngspice/fteext.h
+++ b/src/include/ngspice/fteext.h
@@ -62,7 +62,7 @@ extern void *cx_imag(void *, short int , int , int *, short int *);
 extern void *cx_pos(void *, short int , int , int *, short int *);
 extern void *cx_db(void *, short int , int , int *, short int *);
 extern void *cx_log10(void *, short int , int , int *, short int *);
-extern void *cx_ln(void *, short int , int , int *, short int *);
+extern void *cx_log(void *, short int , int , int *, short int *);
 extern void *cx_exp(void *, short int , int , int *, short int *);
 extern void *cx_sqrt(void *, short int , int , int *, short int *);
 extern void *cx_sin(void *, short int , int , int *, short int *);
diff --git a/src/maths/cmaths/cmath1.c b/src/maths/cmaths/cmath1.c
index e79a53f89..5f6d40d42 100644
--- a/src/maths/cmaths/cmath1.c
+++ b/src/maths/cmaths/cmath1.c
@@ -283,7 +283,7 @@ cx_log10(void *data, short int type, int length, int *newlength, short int *newt
 }
 
 void *
-cx_ln(void *data, short int type, int length, int *newlength, short int *newtype)
+cx_log(void *data, short int type, int length, int *newlength, short int *newtype)
 {
     *newlength = length;
     if (type == VF_COMPLEX) {
@@ -297,7 +297,7 @@ cx_ln(void *data, short int type, int length, int *newlength, short int *newtype
             double td;
 
             td = cmag(cc[i]);
-            rcheck(td >= 0, "ln");
+            rcheck(td >= 0, "log");
             if (td == 0.0) {
                 realpart(c[i]) = - log(HUGE);
                 imagpart(c[i]) = 0.0;
@@ -316,7 +316,7 @@ cx_ln(void *data, short int type, int length, int *newlength, short int *newtype
         d = alloc_d(length);
         *newtype = VF_REAL;
         for (i = 0; i < length; i++) {
-            rcheck(dd[i] >= 0, "ln");
+            rcheck(dd[i] >= 0, "log");
             if (dd[i] == 0.0)
                 d[i] = - log(HUGE);
             else
diff --git a/src/maths/cmaths/cmath1.h b/src/maths/cmaths/cmath1.h
index a4e39690d..3ffc3ff99 100644
--- a/src/maths/cmaths/cmath1.h
+++ b/src/maths/cmaths/cmath1.h
@@ -17,7 +17,7 @@ void * cx_imag(void *data, short int type, int length, int *newlength, short int
 void * cx_pos(void *data, short int type, int length, int *newlength, short int *newtype);
 void * cx_db(void *data, short int type, int length, int *newlength, short int *newtype);
 void * cx_log10(void *data, short int type, int length, int *newlength, short int *newtype);
-void * cx_ln(void *data, short int type, int length, int *newlength, short int *newtype);
+void * cx_log(void *data, short int type, int length, int *newlength, short int *newtype);
 void * cx_exp(void *data, short int type, int length, int *newlength, short int *newtype);
 void * cx_sqrt(void *data, short int type, int length, int *newlength, short int *newtype);
 void * cx_sin(void *data, short int type, int length, int *newlength, short int *newtype);