Fix merge issue

LLNL · Feb 18, 2025 · 3a33c03 · 3a33c03
1 parent 6c926c9
commit 3a33c03
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 31 deletions.
diff --git a/include/sundials/sundials_math.h b/include/sundials/sundials_math.h
@@ -261,21 +261,6 @@ SUNDIALS_EXPORT int SUNIpowerI(int base, int exponent);
 
 SUNDIALS_EXPORT sunrealtype SUNRpowerI(sunrealtype base, int exponent);
 
-/*
- * -----------------------------------------------------------------
- * Function : SUNRpowerR
- * -----------------------------------------------------------------
- * Usage : sunrealtype base, exponent, ans;
- *         ans = SUNRpowerR(base,exponent);
- * -----------------------------------------------------------------
- * SUNRpowerR returns the value of base^exponent, where both base and
- * exponent are of type sunrealtype. If base < ZERO, then SUNRpowerR
- * returns ZERO.
- * -----------------------------------------------------------------
- */
-
-SUNDIALS_EXPORT sunrealtype SUNRpowerR(sunrealtype base, sunrealtype exponent);
-
 /*
  * -----------------------------------------------------------------
  * Function : SUNRCompare

diff --git a/src/sundials/sundials_math.c b/src/sundials/sundials_math.c
@@ -43,22 +43,6 @@ sunrealtype SUNRpowerI(sunrealtype base, int exponent)
   return (prod);
 }
 
-sunrealtype SUNRpowerR(sunrealtype base, sunrealtype exponent)
-{
-  if (base <= SUN_RCONST(0.0)) { return (SUN_RCONST(0.0)); }
-
-#if defined(SUNDIALS_DOUBLE_PRECISION)
-  return (pow(base, exponent));
-#elif defined(SUNDIALS_SINGLE_PRECISION)
-  return (powf(base, exponent));
-#elif defined(SUNDIALS_EXTENDED_PRECISION)
-  return (powl(base, exponent));
-#else
-#error \
-  "SUNDIALS precision not defined, report to github.com/LLNL/sundials/issues"
-#endif
-}
-
 sunbooleantype SUNRCompare(sunrealtype a, sunrealtype b)
 {
   return (SUNRCompareTol(a, b, 10 * SUN_UNIT_ROUNDOFF));