feat(add c implementation): add math/base/special/cabs2f

---
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: passed
  - 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: vivekmaurya001

lib/node_modules/@stdlib/math/base/special/cabs2f/benchmark/c/benchmark.c

@@ -16,12 +16,10 @@
 * limitations under the License.
 */
 
-#include "stdlib/math/base/special/cabs2f.h"
-#include "stdlib/complex/float32/ctor.h"
-#include "stdlib/complex/float32/reim.h"
 #include <stdlib.h>
 #include <stdio.h>
 #include <math.h>
+#include <complex.h>
 #include <sys/time.h>
 
 #define NAME "cabs2f"
@@ -85,30 +83,36 @@ static float rand_float( void ) {
 	return (float)r / ( (float)RAND_MAX + 1.0f );
 }
 
+/**
+* Computes the squared absolute value of a complex number.
+*
+* @param z  input value
+* @return   squared absolute value
+*/
+float cabs2f( float complex z ) {
+	return ( crealf(z)*crealf(z) ) + ( cimagf(z)*cimagf(z) );
+}
+
 /**
 * Runs a benchmark.
 *
 * @return elapsed time in seconds
 */
 static double benchmark( void ) {
+	float complex z;
 	double elapsed;
 	double t;
 	float re;
 	float im;
 	float y;
 	int i;
 
-	stdlib_complex64_t z[ 100 ];
-
-	for ( i = 0; i < 100; i++ ) {
-		re = ( 1000.0f * rand_float() ) - 500.0f;
-		im = ( 1000.0f * rand_float() ) - 500.0f;
-		z[ i ] = stdlib_complex64( re, im );
-	}
-
 	t = tic();
 	for ( i = 0; i < ITERATIONS; i++ ) {
-		y = stdlib_base_cabs2f( z[ i % 100 ] );
+		re = ( 1000.0f*rand_float() ) - 500.0f;
+		im = ( 1000.0f*rand_float() ) - 500.0f;
+		z = re + im*I;
+		y = cabs2f( z );
 		if ( y != y ) {
 			printf( "should not return NaN\n" );
 			break;

lib/node_modules/@stdlib/math/base/special/cabs2f/benchmark/c/native/benchmark.c

@@ -17,7 +17,8 @@
 */
 
 #include "stdlib/math/base/special/cabs2f.h"
-#include <complex.h>
+#include "stdlib/complex/float32/ctor.h"
+#include "stdlib/complex/float32/reim.h"
 #include <stdlib.h>
 #include <stdio.h>
 #include <math.h>
@@ -91,20 +92,24 @@ static float rand_float( void ) {
 * @return elapsed time in seconds
 */
 static double benchmark( void ) {
-	float complex z;
 	double elapsed;
 	double t;
 	float re;
 	float im;
 	float y;
 	int i;
 
+	stdlib_complex64_t z[ 100 ];
+
+	for ( i = 0; i < 100; i++ ) {
+		re = ( 1000.0f * rand_float() ) - 500.0f;
+		im = ( 1000.0f * rand_float() ) - 500.0f;
+		z[ i ] = stdlib_complex64( re, im );
+	}
+
 	t = tic();
 	for ( i = 0; i < ITERATIONS; i++ ) {
-		re = ( 1000.0f*rand_float() ) - 500.0f;
-		im = ( 1000.0f*rand_float() ) - 500.0f;
-		z = re + im*I;
-		y = stdlib_base_cabs2f( z );
+		y = stdlib_base_cabs2f( z[ i % 100 ] );
 		if ( y != y ) {
 			printf( "should not return NaN\n" );
 			break;