feat:C implementation of stats/base/dists/weibull/skewness

---
type: pre_push_report
description: Results of running various checks prior to pushing changes.
report:
  - task: run_javascript_examples
    status: na
  - task: run_c_examples
    status: na
  - task: run_cpp_examples
    status: na
  - task: run_javascript_readme_examples
    status: na
  - task: run_c_benchmarks
    status: na
  - task: run_cpp_benchmarks
    status: na
  - task: run_fortran_benchmarks
    status: na
  - task: run_javascript_benchmarks
    status: na
  - task: run_julia_benchmarks
    status: na
  - task: run_python_benchmarks
    status: na
  - task: run_r_benchmarks
    status: na
  - task: run_javascript_tests
    status: na
---

Author: yuvi-mittal

lib/node_modules/@stdlib/stats/base/dists/weibull/skewness/benchmark/c/benchmark.c

@@ -31,7 +31,7 @@
 * Prints the TAP version.
 */
 static void print_version( void ) {
-    printf( "TAP version 13\n" );
+	printf( "TAP version 13\n" );
 }
 
 /**
@@ -41,12 +41,12 @@ static void print_version( void ) {
 * @param passing   total number of passing tests
 */
 static void print_summary( int total, int passing ) {
-    printf( "#\n" );
-    printf( "1..%d\n", total ); // TAP plan
-    printf( "# total %d\n", total );
-    printf( "# pass  %d\n", passing );
-    printf( "#\n" );
-    printf( "# ok\n" );
+	printf( "#\n" );
+	printf( "1..%d\n", total ); // TAP plan
+	printf( "# total %d\n", total );
+	printf( "# pass  %d\n", passing );
+	printf( "#\n" );
+	printf( "# ok\n" );
 }
 
 /**
@@ -55,12 +55,12 @@ static void print_summary( int total, int passing ) {
 * @param elapsed   elapsed time in seconds
 */
 static void print_results( double elapsed ) {
-    double rate = (double)ITERATIONS / elapsed;
-    printf( "  ---\n" );
-    printf( "  iterations: %d\n", ITERATIONS );
-    printf( "  elapsed: %0.9f\n", elapsed );
-    printf( "  rate: %0.9f\n", rate );
-    printf( "  ...\n" );
+	double rate = (double)ITERATIONS / elapsed;
+	printf( "  ---\n" );
+	printf( "  iterations: %d\n", ITERATIONS );
+	printf( "  elapsed: %0.9f\n", elapsed );
+	printf( "  rate: %0.9f\n", rate );
+	printf( "  ...\n" );
 }
 
 /**
@@ -69,9 +69,9 @@ static void print_results( double elapsed ) {
 * @return clock time
 */
 static double tic( void ) {
-    struct timeval now;
-    gettimeofday( &now, NULL );
-    return (double)now.tv_sec + (double)now.tv_usec/1.0e6;
+	struct timeval now;
+	gettimeofday( &now, NULL );
+	return (double)now.tv_sec + (double)now.tv_usec/1.0e6;
 }
 
 /**
@@ -82,8 +82,8 @@ static double tic( void ) {
 * @return       random number
 */
 static double random_uniform( const double min, const double max ) {
-    double v = (double)rand() / ( (double)RAND_MAX + 1.0 );
-    return min + ( v*(max-min) );
+	double v = (double)rand() / ( (double)RAND_MAX + 1.0 );
+	return min + ( v*(max-min) );
 }
 
 /**
@@ -92,54 +92,54 @@ static double random_uniform( const double min, const double max ) {
 * @return elapsed time in seconds
 */
 static double benchmark( void ) {
-    double elapsed;
-    double k[ 100 ];
-    double lambda[ 100 ];
-    double y;
-    double t;
-    int i;
+	double elapsed;
+	double k[ 100 ];
+	double lambda[ 100 ];
+	double y;
+	double t;
+	int i;
 
-    // Generate random values for k (shape) and lambda (scale)
-    for ( i = 0; i < 100; i++ ) {
-        k[ i ] = random_uniform( 0.1, 10.0 );    // k > 0 to avoid NaN result
-        lambda[ i ] = random_uniform( 0.1, 10.0 ); // lambda > 0 to avoid NaN result
-    }
+	// Generate random values for k (shape) and lambda (scale)
+	for ( i = 0; i < 100; i++ ) {
+		k[ i ] = random_uniform( 0.1, 10.0 );    // k > 0 to avoid NaN result
+		lambda[ i ] = random_uniform( 0.1, 10.0 ); // lambda > 0 to avoid NaN result
+	}
 
-    t = tic();
-    // Benchmark loop
-    for ( i = 0; i < ITERATIONS; i++ ) {
-        // Calculate skewness for the Weibull distribution
-        y = stdlib_base_dists_weibull_skewness( k[ i % 100 ], lambda[ i % 100 ] );
-        if ( y != y ) {  // Check for NaN
-            printf( "should not return NaN\n" );
-            break;
-        }
-    }
-    elapsed = tic() - t;
+	t = tic();
+	// Benchmark loop
+	for ( i = 0; i < ITERATIONS; i++ ) {
+		// Calculate skewness for the Weibull distribution
+		y = stdlib_base_dists_weibull_skewness( k[ i % 100 ], lambda[ i % 100 ] );
+		if ( y != y ) {  // Check for NaN
+			printf( "should not return NaN\n" );
+			break;
+		}
+	}
+	elapsed = tic() - t;
 
-    // Final NaN check
-    if ( y != y ) {
-        printf( "should not return NaN\n" );
-    }
-    return elapsed;
+	// Final NaN check
+	if ( y != y ) {
+		printf( "should not return NaN\n" );
+	}
+	return elapsed;
 }
 
 /**
 * Main execution sequence.
 */
 int main( void ) {
-    double elapsed;
-    int i;
+	double elapsed;
+	int i;
 
-    // Use the current time to seed the random number generator:
-    srand( time( NULL ) );
+	// Use the current time to seed the random number generator:
+	srand( time( NULL ) );
 
-    print_version();
-    for ( i = 0; i < REPEATS; i++ ) {
-        printf( "# c::%s\n", NAME );
-        elapsed = benchmark();
-        print_results( elapsed );
-        printf( "ok %d benchmark finished\n", i+1 );
-    }
-    print_summary( REPEATS, REPEATS );
+	print_version();
+	for ( i = 0; i < REPEATS; i++ ) {
+		printf( "# c::%s\n", NAME );
+		elapsed = benchmark();
+		print_results( elapsed );
+		printf( "ok %d benchmark finished\n", i+1 );
+	}
+	print_summary( REPEATS, REPEATS );
 }

lib/node_modules/@stdlib/stats/base/dists/weibull/skewness/lib/native.js

@@ -34,11 +34,11 @@ var addon = require( './../src/addon.node' );
 *
 * @example
 * var y = skewness( 2.0, 1.5 );
-* // returns the skewness for Weibull skewness
+* // returns 0.6311
 *
 * @example
 * var y = skewness( 1.0, 3 );
-* // returns the skewness for Weibull skewness with a different skewness
+* // returns 2.0
 *
 * @example
 * var y = skewness( -1.0, 3 );