feat(add c implementation): add stats/base/dists/bernoulli/mode

Author: vivekmaurya001

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/README.md

@@ -137,6 +137,91 @@ for ( i = 0; i < 10; i++ ) {
 
 <!-- /.references -->
 
+<!-- C interface documentation. -->
+
+* * *
+
+<section class="c">
+
+## C APIs
+
+<!-- Section to include introductory text. Make sure to keep an empty line after the intro `section` element and another before the `/section` close. -->
+
+<section class="intro">
+
+</section>
+
+<!-- /.intro -->
+
+<!-- C usage documentation. -->
+
+<section class="usage">
+
+### Usage
+
+```c
+#include "stdlib/stats/base/dists/bernoulli/mode.h"
+```
+
+#### stdlib_base_dists_bernoulli_mode( p )
+
+Returns the [mode][mode] of a [Bernoulli][bernoulli-distribution] distribution with success probability `p`.
+
+```c
+double out = stdlib_base_dists_bernoulli_mode( 0.1 );
+// returns ~0.325
+```
+
+The function accepts the following arguments:
+
+-   **p**: `[in] double` maximum support
+
+```c
+double stdlib_base_dists_bernoulli_mode( const double p );
+```
+
+</section>
+
+<!-- /.usage -->
+
+<!-- C API usage notes. Make sure to keep an empty line after the `section` element and another before the `/section` close. -->
+
+<section class="notes">
+
+</section>
+
+<!-- /.notes -->
+
+<!-- C API usage examples. -->
+
+<section class="examples">
+
+### Examples
+
+```c
+#include "stdlib/stats/base/dists/bernoulli/mode.h"
+#include <stdlib.h>
+#include <stdio.h>
+int main( void ) {
+    double p;
+    double y;
+    int i;
+    for ( i = 0; i < 25; i++ ) {
+        p = ( (double)rand() / (double)RAND_MAX );
+        y = stdlib_base_dists_arcsine_mode( p );
+        printf( "x: %lf, M(X;p): %lf\n", p, y );
+    }
+}
+```
+
+</section>
+
+<!-- /.examples -->
+
+</section>
+
+<!-- /.c -->
+
 <!-- Section for related `stdlib` packages. Do not manually edit this section, as it is automatically populated. -->
 
 <section class="related">

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/benchmark/c/Makefile

@@ -143,4 +143,4 @@ run: $(c_targets)
 clean:
 	$(QUIET) -rm -f *.o *.out
 
-.PHONY: clean
+.PHONY: clean

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/benchmark/c/benchmark.c

@@ -130,4 +130,4 @@ int main( void ) {
 		printf( "ok %d benchmark finished\n", i+1 );
 	}
 	print_summary( REPEATS, REPEATS );
-}
+}

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/examples/c/Makefile

@@ -143,4 +143,4 @@ run: $(c_targets)
 clean:
 	$(QUIET) -rm -f *.o *.out
 
-.PHONY: clean
+.PHONY: clean

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/examples/c/example.c

@@ -26,8 +26,8 @@ int main( void ) {
 	int i;
 
 	for ( i = 0; i < 25; i++ ) {
-		p = ( (double)rand() / (double)RAND_MAX ) ;
+		p = ( (double)rand() / (double)RAND_MAX );
 		y = stdlib_base_dists_bernoulli_mode( p );
 		printf( "x: %lf , H(X;p): %lf\n", p , y );
 	}
-}
+}

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/lib/native.js

@@ -58,4 +58,4 @@ function mode( p ) {
 
 // EXPORTS //
 
-module.exports = mode;
+module.exports = mode;

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/manifest.json

@@ -39,13 +39,7 @@
         "libpath": [],
         "dependencies": [
           "@stdlib/math/base/napi/ternary",
-          "@stdlib/math/base/assert/is-nan",
-          "@stdlib/math/base/special/ln",
-          "@stdlib/constants/float64/ln-pi",
-          "@stdlib/constants/float64/ln-two",
-          "@stdlib/constants/float64/ninf",
-          "@stdlib/math/base/special/asin",
-          "@stdlib/math/base/special/sqrt"
+          "@stdlib/math/base/assert/is-nan"
         ]
       },
       {
@@ -60,13 +54,7 @@
         "libraries": [],
         "libpath": [],
         "dependencies": [
-          "@stdlib/math/base/assert/is-nan",
-          "@stdlib/math/base/special/ln",
-          "@stdlib/constants/float64/ln-pi",
-          "@stdlib/constants/float64/ln-two",
-          "@stdlib/constants/float64/ninf",
-          "@stdlib/math/base/special/asin",
-          "@stdlib/math/base/special/sqrt"
+          "@stdlib/math/base/assert/is-nan"
         ]
       },
       {
@@ -81,14 +69,9 @@
         "libraries": [],
         "libpath": [],
         "dependencies": [
-          "@stdlib/math/base/assert/is-nan",
-          "@stdlib/math/base/special/ln",
-          "@stdlib/constants/float64/ln-pi",
-          "@stdlib/constants/float64/ln-two",
-          "@stdlib/constants/float64/ninf",
-          "@stdlib/math/base/special/asin",
-          "@stdlib/math/base/special/sqrt"
+          "@stdlib/math/base/assert/is-nan"
         ]
       }
     ]
-  }
+  }
+  

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/package.json

@@ -14,11 +14,14 @@
     }
   ],
   "main": "./lib",
+  "gypfile": true,
   "directories": {
     "benchmark": "./benchmark",
     "doc": "./docs",
     "example": "./examples",
+    "include": "./include",
     "lib": "./lib",
+    "src": "./src",
     "test": "./test"
   },
   "types": "./docs/types",

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/src/Makefile

@@ -67,4 +67,4 @@ clean-addon:
 #/
 clean: clean-addon
 
-.PHONY: clean
+.PHONY: clean

lib/node_modules/@stdlib/stats/base/dists/bernoulli/mode/src/main.c

@@ -28,6 +28,7 @@
 * @example
 * double y = stdlib_base_dists_bernoulli_mode( 0.1 );
 * // returns ~0
+*
 * @example
 * double y = stdlib_base_dists_bernoulli_mode( 0.5 );
 * // returns ~0
@@ -42,5 +43,4 @@ double stdlib_base_dists_bernoulli_mode( const double p ) {
 		return 0.0 / 0.0;
 	}
 	return ( p <= 0.5 ) ? 0 : 1;
-	
-}
+}