feat: add math/base/special/truncsdf

---
type: pre_commit_static_analysis_report
description: Results of running static analysis checks when committing changes.
report:
  - task: lint_filenames
    status: passed
  - task: lint_editorconfig
    status: passed
  - task: lint_markdown
    status: na
  - task: lint_package_json
    status: na
  - task: lint_repl_help
    status: na
  - task: lint_javascript_src
    status: na
  - task: lint_javascript_cli
    status: na
  - task: lint_javascript_examples
    status: na
  - task: lint_javascript_tests
    status: na
  - task: lint_javascript_benchmarks
    status: passed
  - task: lint_python
    status: na
  - task: lint_r
    status: na
  - task: lint_c_src
    status: missing_dependencies
  - task: lint_c_examples
    status: na
  - task: lint_c_benchmarks
    status: na
  - task: lint_c_tests_fixtures
    status: na
  - task: lint_shell
    status: na
  - task: lint_typescript_declarations
    status: passed
  - task: lint_typescript_tests
    status: na
  - task: lint_license_headers
    status: passed
---

Author: aryan7071

lib/node_modules/@stdlib/math/base/special/truncsdf/manifest.json

@@ -45,8 +45,7 @@
         "@stdlib/math/base/special/abs",
         "@stdlib/math/base/special/floor",
         "@stdlib/math/base/special/trunc",
-        "@stdlib/number/float32/base/exponent",
-        "@stdlib/number/float64/base/to-float32"
+        "@stdlib/number/float32/base/exponent"
       ]
     },
     {
@@ -60,14 +59,14 @@
       "libraries": [],
       "libpath": [],
       "dependencies": [
-        "@stdlib/math/base/assert/is-nanf",
-        "@stdlib/math/base/assert/is-infinitef",
-        "@stdlib/math/base/special/powf",
-        "@stdlib/math/base/special/log10f",
-        "@stdlib/math/base/special/lnf",
-        "@stdlib/math/base/special/absf",
-        "@stdlib/math/base/special/floorf",
-        "@stdlib/math/base/special/truncf",
+        "@stdlib/math/base/assert/is-nan",
+        "@stdlib/math/base/assert/is-infinite",
+        "@stdlib/math/base/special/pow",
+        "@stdlib/math/base/special/log10",
+        "@stdlib/math/base/special/ln",
+        "@stdlib/math/base/special/abs",
+        "@stdlib/math/base/special/floor",
+        "@stdlib/math/base/special/trunc",
         "@stdlib/number/float32/base/exponent"
       ]
     },
@@ -82,14 +81,14 @@
       "libraries": [],
       "libpath": [],
       "dependencies": [
-        "@stdlib/math/base/assert/is-nanf",
-        "@stdlib/math/base/assert/is-infinitef",
-        "@stdlib/math/base/special/powf",
-        "@stdlib/math/base/special/log10f",
-        "@stdlib/math/base/special/lnf",
-        "@stdlib/math/base/special/absf",
-        "@stdlib/math/base/special/floorf",
-        "@stdlib/math/base/special/truncf",
+        "@stdlib/math/base/assert/is-nan",
+        "@stdlib/math/base/assert/is-infinite",
+        "@stdlib/math/base/special/pow",
+        "@stdlib/math/base/special/log10",
+        "@stdlib/math/base/special/ln",
+        "@stdlib/math/base/special/abs",
+        "@stdlib/math/base/special/floor",
+        "@stdlib/math/base/special/trunc",
         "@stdlib/number/float32/base/exponent"
       ]
     }

lib/node_modules/@stdlib/math/base/special/truncsdf/src/main.c

@@ -17,14 +17,14 @@
 */
 
 #include "stdlib/math/base/special/truncsdf.h"
-#include "stdlib/math/base/assert/is_nanf.h"
-#include "stdlib/math/base/assert/is_infinitef.h"
-#include "stdlib/math/base/special/powf.h"
-#include "stdlib/math/base/special/log10f.h"
-#include "stdlib/math/base/special/lnf.h"
-#include "stdlib/math/base/special/absf.h"
-#include "stdlib/math/base/special/floorf.h"
-#include "stdlib/math/base/special/truncf.h"
+#include "stdlib/math/base/assert/is_nan.h"
+#include "stdlib/math/base/assert/is_infinite.h"
+#include "stdlib/math/base/special/pow.h"
+#include "stdlib/math/base/special/log10.h"
+#include "stdlib/math/base/special/ln.h"
+#include "stdlib/math/base/special/abs.h"
+#include "stdlib/math/base/special/floor.h"
+#include "stdlib/math/base/special/trunc.h"
 #include "stdlib/number/float32/base/exponent.h"
 #include <stdint.h>
 
@@ -38,43 +38,45 @@
 *
 * @example
 * float out = stdlib_base_truncsdf( 3.141592653589793f, 5, 10 );
-* // returns 3.1415f
+* // returns 3.1414999961853027f
 */
 float stdlib_base_truncsdf( const float x, const int32_t n, const int32_t b ) {
-	float exp;
-	float s;
+	double exp;
+	double dx;
+	double s;
 	float y;
 
-	if ( stdlib_base_is_nanf( x ) || n < 1 || b <= 0 ) {
+	if ( stdlib_base_is_nan( (double)x ) || n < 1 || b <= 0 ) {
 		return 0.0f / 0.0f; // NaN
 	}
-	if ( stdlib_base_is_infinitef( x ) || x == 0.0f ) {
+	if ( stdlib_base_is_infinite( (double)x ) || x == 0.0f ) {
 		return x;
 	}
+	dx = (double)x;
 	if ( b == 10 ) {
-		exp = stdlib_base_log10f( stdlib_base_absf( x ) );
+		exp = stdlib_base_log10( stdlib_base_abs( dx ) );
 	} else if ( b == 2 ) {
-		exp = (float)stdlib_base_float32_exponent( stdlib_base_absf( x ) );
+		exp = (double)stdlib_base_float32_exponent( x );
 	} else {
-		exp = stdlib_base_lnf( stdlib_base_absf( x ) ) / stdlib_base_lnf( (float)b );
+		exp = stdlib_base_ln( stdlib_base_abs( dx ) ) / stdlib_base_ln( (double)b );
 	}
-	exp = stdlib_base_floorf( exp - (float)n + 1.0f );
-	s = stdlib_base_powf( (float)b, stdlib_base_absf( exp ) );
+	exp = stdlib_base_floor( exp - (double)n + 1.0 );
+	s = stdlib_base_pow( (double)b, stdlib_base_abs( exp ) );
 
 	// Check for overflow:
-	if ( stdlib_base_is_infinitef( s ) ) {
+	if ( stdlib_base_is_infinite( s ) ) {
 		return x;
 	}
 
 	// To avoid numerical stability issues due to floating-point rounding error, we must treat positive and negative exponents separately.
-	if ( exp < 0.0f ) {
-		y = stdlib_base_truncf( x * s ) / s;
+	if ( exp < 0.0 ) {
+		y = (float)( stdlib_base_trunc( dx * s ) / s );
 	} else {
-		y = stdlib_base_truncf( x / s ) * s;
+		y = (float)( stdlib_base_trunc( dx / s ) * s );
 	}
 
 	// Check for overflow:
-	if ( stdlib_base_is_infinitef( y ) ) {
+	if ( stdlib_base_is_infinite( (double)y ) ) {
 		return x;
 	}
 	return y;