225 lines
7.0 KiB
C
225 lines
7.0 KiB
C
|
/**
|
||
|
* @license Apache-2.0
|
||
|
*
|
||
|
* Copyright (c) 2021 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/complex/float64/ctor.h"
|
||
|
#include "stdlib/complex/float32/ctor.h"
|
||
|
#include <stdint.h>
|
||
|
|
||
|
/**
|
||
|
* Returns a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @param imag imaginary component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128( 5.0, 2.0 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128( const double real, const double imag ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = real;
|
||
|
z.parts[ 1 ] = imag; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a single-precision floating-point number to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_float32( 5.0f );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_float32( const float real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a double-precision floating-point number to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_float64( 5.0 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_float64( const double real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a single-precision complex floating-point number to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param z single-precision complex floating-point number
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* #include "stdlib/complex/float32/ctor.h"
|
||
|
*
|
||
|
* stdlib_complex64_t z1 = stdlib_complex64( 5.0f, 3.0f );
|
||
|
* stdlib_complex128_t z2 = stdlib_complex128_from_complex64( z1 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_complex64( const stdlib_complex64_t z ) {
|
||
|
stdlib_complex64_parts_t v1 = { z };
|
||
|
stdlib_complex128_parts_t v2;
|
||
|
v2.parts[ 0 ] = (double)v1.parts[ 0 ];
|
||
|
v2.parts[ 1 ] = (double)v1.parts[ 1 ]; // cppcheck-suppress unreadVariable
|
||
|
return v2.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts (copies) a double-precision complex floating-point number to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param z double-precision complex floating-point number
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z1 = stdlib_complex128( 5.0, 3.0 );
|
||
|
* stdlib_complex128_t z2 = stdlib_complex128_from_complex128( z1 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_complex128( const stdlib_complex128_t z ) {
|
||
|
stdlib_complex128_parts_t v1 = { z };
|
||
|
stdlib_complex128_parts_t v2;
|
||
|
v2.parts[ 0 ] = v1.parts[ 0 ];
|
||
|
v2.parts[ 1 ] = v1.parts[ 1 ]; // cppcheck-suppress unreadVariable
|
||
|
return v2.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a signed 8-bit integer to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_int8( 5 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_int8( const int8_t real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts an unsigned 8-bit integer to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_uint8( 5 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_uint8( const uint8_t real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a signed 16-bit integer to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_int16( 5 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_int16( const int16_t real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts an unsigned 16-bit integer to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_uint16( 5 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_uint16( const uint16_t real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a signed 32-bit integer to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_int32( 5 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_int32( const int32_t real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts an unsigned 32-bit integer to a double-precision complex floating-point number.
|
||
|
*
|
||
|
* @param real real component
|
||
|
* @return double-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* stdlib_complex128_t z = stdlib_complex128_from_uint32( 5 );
|
||
|
*/
|
||
|
stdlib_complex128_t stdlib_complex128_from_uint32( const uint32_t real ) {
|
||
|
stdlib_complex128_parts_t z;
|
||
|
z.parts[ 0 ] = (double)real;
|
||
|
z.parts[ 1 ] = 0.0; // cppcheck-suppress unreadVariable
|
||
|
return z.value;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Converts a double-precision complex floating-point number to a single-precision complex floating-point number.
|
||
|
*
|
||
|
* @param z double-precision complex floating-point number
|
||
|
* @return single-precision complex floating-point number
|
||
|
*
|
||
|
* @example
|
||
|
* #include "stdlib/complex/float32/ctor.h"
|
||
|
*
|
||
|
* stdlib_complex128_t z1 = stdlib_complex128( 5.0, 3.0 );
|
||
|
* stdlib_complex64_t z2 = stdlib_complex128_to_complex64( z1 );
|
||
|
*/
|
||
|
stdlib_complex64_t stdlib_complex128_to_complex64( const stdlib_complex128_t z ) {
|
||
|
stdlib_complex128_parts_t v1 = { z };
|
||
|
stdlib_complex64_parts_t v2;
|
||
|
v2.parts[ 0 ] = (float)v1.parts[ 0 ];
|
||
|
v2.parts[ 1 ] = (float)v1.parts[ 1 ]; // cppcheck-suppress unreadVariable
|
||
|
return v2.value;
|
||
|
}
|