time-to-botec

f_l.c (2253B)

---

 /**
 * @license Apache-2.0
 *
 * Copyright (c) 2020 The Stdlib Authors.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *    http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
 
 #include "stdlib/strided/base/unary/f_l.h"
 #include "stdlib/strided/base/unary/typedefs.h"
 #include "stdlib/strided/base/unary/macros.h"
 #include <stdint.h>
 
 /**
 * Applies a unary callback accepting a single-precision floating-point number and returning a signed 64-bit integer to a single-precision floating-point strided input array and assigns results to elements in a signed 64-bit integer strided output array.
 *
 * @param arrays   array whose first element is a pointer to a strided input array and whose last element is a pointer to a strided output array
 * @param shape    array whose only element is the number of elements over which to iterate
 * @param strides  array containing strides (in bytes) for each strided array
 * @param fcn      callback
 *
 * @example
 * #include "stdlib/strided/base/unary/f_l.h"
 * #include <stdint.h>
 * #include <math.h>
 *
 * // Create underlying byte arrays:
 * uint8_t x[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
 * uint8_t out[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
 *
 * // Define a pointer to an array containing pointers to strided arrays:
 * uint8_t *arrays[] = { x, out };
 *
 * // Define the strides:
 * int64_t strides[] = { 4, 8 }; // 4 bytes per float, 8 bytes per int64
 *
 * // Define the number of elements over which to iterate:
 * int64_t shape[] = { 3 };
 *
 * // Apply the callback:
 * stdlib_strided_f_l( arrays, shape, strides, (void *)llrintf );
 */
 void stdlib_strided_f_l( uint8_t *arrays[], int64_t *shape, int64_t *strides, void *fcn ) {
 	UnaryFcnFloat32Int64 *f = (UnaryFcnFloat32Int64 *)fcn;
 	STDLIB_STRIDED_UNARY_LOOP_CLBK( float, int64_t )
 }