diff --git a/include/int_div.h b/include/int_div.h
index 46aea0a1148236a7936074a4058e2c81007b28dc..8102bbe78eb0a540cc1da2c7248e8697eba3cebd 100644
--- a/include/int_div.h
+++ b/include/int_div.h
@@ -32,7 +32,7 @@ void         product(t_number *x, const t_number y, const t_int k, const t_int b
 void         quotient(t_number *x, const t_number y, t_int k, const t_int b);
 void         iremainder(t_number *x, const t_number y, t_int k, const t_int b);
 t_int        trial(const t_number r, const t_number d, const int k, const int m, const t_int b, int* ret);
-int          smaller(const t_number r, const t_number dq, const int k, const int m);
+int          prefix_less_than(const t_number r, const t_number dq, const int k, const int m);
 void         difference(t_number *r, const t_number dq, const int k, const int m, const t_int b, int *ret);
 int          division(const t_number x, const t_number y, t_number *q, t_number *r, const t_int b);
 
diff --git a/src/int_div.c b/src/int_div.c
index a6dd466ac42a7514488c93285c198d1abaf67485..9dafe01a611e176a492dacba460572f0ba10512d 100644
--- a/src/int_div.c
+++ b/src/int_div.c
@@ -96,7 +96,7 @@ t_int trial(const t_number r, const t_number d,
 
 
 /* prefix arithmetic: prefix comparison r{m+1} < dq, return <0 if error. */
-int smaller(const t_number r, const t_number dq, const int k, const int m) {
+int prefix_less_than(const t_number r, const t_number dq, const int k, const int m) {
   int i=m;
 
 #if DEBUG
@@ -156,7 +156,7 @@ int division(const t_number x, const t_number y,
         qt = trial(rm, d, k, m, b, &ret);
         product(&dq,d,qt,b, &ret);
 
-        if ((ret == 0) && (smaller(rm,dq,k,m)))
+        if ((ret == 0) && (prefix_less_than(rm,dq,k,m)))
           product(&dq,d,--qt,b, &ret);
 
         (*q)[k] = qt;