|
|
|
|
@ -8,13 +8,13 @@
|
|
|
|
|
|
|
|
|
|
// =================== Reset ==================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_reset(BGC_FP32_DualScalar* number)
|
|
|
|
|
inline void bgc_fp32_dual_number_reset(BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
number->real_part = 0.0f;
|
|
|
|
|
number->dual_part = 0.0f;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_reset(BGC_FP64_DualScalar* number)
|
|
|
|
|
inline void bgc_fp64_dual_number_reset(BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
number->real_part = 0.0;
|
|
|
|
|
number->dual_part = 0.0;
|
|
|
|
|
@ -22,13 +22,13 @@ inline void bgc_fp64_dual_scalar_reset(BGC_FP64_DualScalar* number)
|
|
|
|
|
|
|
|
|
|
// ==================== Make ==================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_make(BGC_FP32_DualScalar* number, const float real_part, const float dual_part)
|
|
|
|
|
inline void bgc_fp32_dual_number_make(BGC_FP32_DualNumber* number, const float real_part, const float dual_part)
|
|
|
|
|
{
|
|
|
|
|
number->real_part = real_part;
|
|
|
|
|
number->dual_part = dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_make(BGC_FP64_DualScalar* number, const double real_part, const double dual_part)
|
|
|
|
|
inline void bgc_fp64_dual_number_make(BGC_FP64_DualNumber* number, const double real_part, const double dual_part)
|
|
|
|
|
{
|
|
|
|
|
number->real_part = real_part;
|
|
|
|
|
number->dual_part = dual_part;
|
|
|
|
|
@ -36,13 +36,13 @@ inline void bgc_fp64_dual_scalar_make(BGC_FP64_DualScalar* number, const double
|
|
|
|
|
|
|
|
|
|
// ==================== Copy ==================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_copy(BGC_FP32_DualScalar* destination, const BGC_FP32_DualScalar* source)
|
|
|
|
|
inline void bgc_fp32_dual_number_copy(BGC_FP32_DualNumber* destination, const BGC_FP32_DualNumber* source)
|
|
|
|
|
{
|
|
|
|
|
destination->real_part = source->real_part;
|
|
|
|
|
destination->dual_part = source->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_copy(BGC_FP64_DualScalar* destination, const BGC_FP64_DualScalar* source)
|
|
|
|
|
inline void bgc_fp64_dual_number_copy(BGC_FP64_DualNumber* destination, const BGC_FP64_DualNumber* source)
|
|
|
|
|
{
|
|
|
|
|
destination->real_part = source->real_part;
|
|
|
|
|
destination->dual_part = source->dual_part;
|
|
|
|
|
@ -50,27 +50,39 @@ inline void bgc_fp64_dual_scalar_copy(BGC_FP64_DualScalar* destination, const BG
|
|
|
|
|
|
|
|
|
|
// ==================== Swap ==================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_swap(BGC_FP32_DualScalar* first, BGC_FP32_DualScalar* second)
|
|
|
|
|
inline void bgc_fp32_dual_number_swap(BGC_FP32_DualNumber* first, BGC_FP32_DualNumber* second)
|
|
|
|
|
{
|
|
|
|
|
first->real_part = second->real_part;
|
|
|
|
|
first->dual_part = second->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_swap(BGC_FP64_DualScalar* first, BGC_FP64_DualScalar* second)
|
|
|
|
|
inline void bgc_fp64_dual_number_swap(BGC_FP64_DualNumber* first, BGC_FP64_DualNumber* second)
|
|
|
|
|
{
|
|
|
|
|
first->real_part = second->real_part;
|
|
|
|
|
first->dual_part = second->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// ================== Modulus =================== //
|
|
|
|
|
|
|
|
|
|
inline double bgc_fp32_dual_number_get_modulus(const BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
return fabsf(number->real_part);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline double bgc_fp64_dual_number_get_modulus(const BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
return fabs(number->real_part);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// ================== Convert =================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_convert_to_fp32(BGC_FP32_DualScalar* first, BGC_FP64_DualScalar* second)
|
|
|
|
|
inline void bgc_fp64_dual_number_convert_to_fp32(BGC_FP32_DualNumber* first, BGC_FP64_DualNumber* second)
|
|
|
|
|
{
|
|
|
|
|
first->real_part = (float) second->real_part;
|
|
|
|
|
first->dual_part = (float) second->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_convert_to_fp64(BGC_FP64_DualScalar* first, BGC_FP32_DualScalar* second)
|
|
|
|
|
inline void bgc_fp32_dual_number_convert_to_fp64(BGC_FP64_DualNumber* first, BGC_FP32_DualNumber* second)
|
|
|
|
|
{
|
|
|
|
|
first->real_part = second->real_part;
|
|
|
|
|
first->dual_part = second->dual_part;
|
|
|
|
|
@ -78,13 +90,13 @@ inline void bgc_fp32_dual_scalar_convert_to_fp64(BGC_FP64_DualScalar* first, BGC
|
|
|
|
|
|
|
|
|
|
// =================== Revert =================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_revert(BGC_FP32_DualScalar* number)
|
|
|
|
|
inline void bgc_fp32_dual_number_revert(BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
number->real_part = -number->real_part;
|
|
|
|
|
number->dual_part = -number->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_revert(BGC_FP64_DualScalar* number)
|
|
|
|
|
inline void bgc_fp64_dual_number_revert(BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
number->real_part = -number->real_part;
|
|
|
|
|
number->dual_part = -number->dual_part;
|
|
|
|
|
@ -92,39 +104,103 @@ inline void bgc_fp64_dual_scalar_revert(BGC_FP64_DualScalar* number)
|
|
|
|
|
|
|
|
|
|
// ================ Get Reverse ================= //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_number_get_reverse(BGC_FP32_DualScalar* reverse, const BGC_FP32_DualScalar* number)
|
|
|
|
|
inline void bgc_fp32_dual_number_get_reverse(BGC_FP32_DualNumber* reverse, const BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
reverse->real_part = -number->real_part;
|
|
|
|
|
reverse->dual_part = -number->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_number_get_reverse(BGC_FP64_DualScalar* reverse, const BGC_FP64_DualScalar* number)
|
|
|
|
|
inline void bgc_fp64_dual_number_get_reverse(BGC_FP64_DualNumber* reverse, const BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
reverse->real_part = -number->real_part;
|
|
|
|
|
reverse->dual_part = -number->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// =================== Invert =================== //
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp32_dual_number_invert(BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp32_is_zero(number->real_part) || isnan(number->real_part)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
const float multiplicator = 1.0f / (number->real_part * number->real_part);
|
|
|
|
|
|
|
|
|
|
number->real_part = number->real_part * multiplicator;
|
|
|
|
|
number->dual_part = -number->dual_part * multiplicator;
|
|
|
|
|
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp64_dual_number_invert(BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp64_is_zero(number->real_part) || isnan(number->real_part)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
const double multiplicator = 1.0 / (number->real_part * number->real_part);
|
|
|
|
|
|
|
|
|
|
number->real_part = number->real_part * multiplicator;
|
|
|
|
|
number->dual_part = -number->dual_part * multiplicator;
|
|
|
|
|
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// ================ Get Inverse ================= //
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp32_dual_number_get_inverse(BGC_FP32_DualNumber* inverse, const BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp32_is_zero(number->real_part) || isnan(number->real_part)) {
|
|
|
|
|
inverse->real_part = 0.0f;
|
|
|
|
|
inverse->dual_part = 0.0f;
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
const float multiplicator = 1.0f / (number->real_part * number->real_part);
|
|
|
|
|
|
|
|
|
|
inverse->real_part = number->real_part * multiplicator;
|
|
|
|
|
inverse->dual_part = -number->dual_part * multiplicator;
|
|
|
|
|
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp64_dual_number_get_inverse(BGC_FP64_DualNumber* inverse, const BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp64_is_zero(number->real_part) || isnan(number->real_part)) {
|
|
|
|
|
inverse->real_part = 0.0;
|
|
|
|
|
inverse->dual_part = 0.0;
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
const double multiplicator = 1.0 / (number->real_part * number->real_part);
|
|
|
|
|
|
|
|
|
|
inverse->real_part = number->real_part * multiplicator;
|
|
|
|
|
inverse->dual_part = -number->dual_part * multiplicator;
|
|
|
|
|
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// ================= Conjugate ================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_conjugate(BGC_FP32_DualScalar* number)
|
|
|
|
|
inline void bgc_fp32_dual_number_conjugate(BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
number->dual_part = -number->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_conjugate(BGC_FP64_DualScalar* number)
|
|
|
|
|
inline void bgc_fp64_dual_number_conjugate(BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
number->dual_part = -number->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// =============== Get Conjugate ================ //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_get_conjugate(BGC_FP32_DualScalar* conjugate, const BGC_FP32_DualScalar* number)
|
|
|
|
|
inline void bgc_fp32_dual_number_get_conjugate(BGC_FP32_DualNumber* conjugate, const BGC_FP32_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
conjugate->real_part = number->real_part;
|
|
|
|
|
conjugate->dual_part = -number->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_get_conjugate(BGC_FP64_DualScalar* conjugate, const BGC_FP64_DualScalar* number)
|
|
|
|
|
inline void bgc_fp64_dual_number_get_conjugate(BGC_FP64_DualNumber* conjugate, const BGC_FP64_DualNumber* number)
|
|
|
|
|
{
|
|
|
|
|
conjugate->real_part = number->real_part;
|
|
|
|
|
conjugate->dual_part = -number->dual_part;
|
|
|
|
|
@ -132,13 +208,13 @@ inline void bgc_fp64_dual_scalar_get_conjugate(BGC_FP64_DualScalar* conjugate, c
|
|
|
|
|
|
|
|
|
|
// ==================== Add ===================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_add(BGC_FP32_DualScalar* sum, const BGC_FP32_DualScalar* first, const BGC_FP32_DualScalar* second)
|
|
|
|
|
inline void bgc_fp32_dual_number_add(BGC_FP32_DualNumber* sum, const BGC_FP32_DualNumber* first, const BGC_FP32_DualNumber* second)
|
|
|
|
|
{
|
|
|
|
|
sum->real_part = first->real_part + second->real_part;
|
|
|
|
|
sum->dual_part = first->dual_part + second->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_add(BGC_FP64_DualScalar* sum, const BGC_FP64_DualScalar* first, const BGC_FP64_DualScalar* second)
|
|
|
|
|
inline void bgc_fp64_dual_number_add(BGC_FP64_DualNumber* sum, const BGC_FP64_DualNumber* first, const BGC_FP64_DualNumber* second)
|
|
|
|
|
{
|
|
|
|
|
sum->real_part = first->real_part + second->real_part;
|
|
|
|
|
sum->dual_part = first->dual_part + second->dual_part;
|
|
|
|
|
@ -146,13 +222,13 @@ inline void bgc_fp64_dual_scalar_add(BGC_FP64_DualScalar* sum, const BGC_FP64_Du
|
|
|
|
|
|
|
|
|
|
// ================= Add Scaled ================= //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_add_scaled(BGC_FP32_DualScalar* sum, const BGC_FP32_DualScalar* base_number, const BGC_FP32_DualScalar* scalable_number, const float scale)
|
|
|
|
|
inline void bgc_fp32_dual_number_add_scaled(BGC_FP32_DualNumber* sum, const BGC_FP32_DualNumber* base_number, const BGC_FP32_DualNumber* scalable_number, const float scale)
|
|
|
|
|
{
|
|
|
|
|
sum->real_part = base_number->real_part + scalable_number->real_part * scale;
|
|
|
|
|
sum->dual_part = base_number->dual_part + scalable_number->dual_part * scale;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_add_scaled(BGC_FP64_DualScalar* sum, const BGC_FP64_DualScalar* base_number, const BGC_FP64_DualScalar* scalable_number, const double scale)
|
|
|
|
|
inline void bgc_fp64_dual_number_add_scaled(BGC_FP64_DualNumber* sum, const BGC_FP64_DualNumber* base_number, const BGC_FP64_DualNumber* scalable_number, const double scale)
|
|
|
|
|
{
|
|
|
|
|
sum->real_part = base_number->real_part + scalable_number->real_part * scale;
|
|
|
|
|
sum->dual_part = base_number->dual_part + scalable_number->dual_part * scale;
|
|
|
|
|
@ -160,33 +236,47 @@ inline void bgc_fp64_dual_scalar_add_scaled(BGC_FP64_DualScalar* sum, const BGC_
|
|
|
|
|
|
|
|
|
|
// ================== Subtract ================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_subtract(BGC_FP32_DualScalar* difference, const BGC_FP32_DualScalar* minuend, const BGC_FP32_DualScalar* subtrahend)
|
|
|
|
|
inline void bgc_fp32_dual_number_subtract(BGC_FP32_DualNumber* difference, const BGC_FP32_DualNumber* minuend, const BGC_FP32_DualNumber* subtrahend)
|
|
|
|
|
{
|
|
|
|
|
difference->real_part = minuend->real_part - subtrahend->real_part;
|
|
|
|
|
difference->dual_part = minuend->dual_part - subtrahend->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_subtract(BGC_FP64_DualScalar* difference, const BGC_FP64_DualScalar* minuend, const BGC_FP64_DualScalar* subtrahend)
|
|
|
|
|
inline void bgc_fp64_dual_number_subtract(BGC_FP64_DualNumber* difference, const BGC_FP64_DualNumber* minuend, const BGC_FP64_DualNumber* subtrahend)
|
|
|
|
|
{
|
|
|
|
|
difference->real_part = minuend->real_part - subtrahend->real_part;
|
|
|
|
|
difference->dual_part = minuend->dual_part - subtrahend->dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// ============== Subtract Scaled =============== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_number_subtract_scaled(BGC_FP32_DualNumber* difference, const BGC_FP32_DualNumber* base_number, const BGC_FP32_DualNumber* scalable_number, const float scale)
|
|
|
|
|
{
|
|
|
|
|
difference->real_part = base_number->real_part - scalable_number->real_part * scale;
|
|
|
|
|
difference->dual_part = base_number->dual_part - scalable_number->dual_part * scale;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_number_subtract_scaled(BGC_FP64_DualNumber* difference, const BGC_FP64_DualNumber* base_number, const BGC_FP64_DualNumber* scalable_number, const double scale)
|
|
|
|
|
{
|
|
|
|
|
difference->real_part = base_number->real_part - scalable_number->real_part * scale;
|
|
|
|
|
difference->dual_part = base_number->dual_part - scalable_number->dual_part * scale;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// ================== Multiply ================== //
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_multiply_by_real(BGC_FP32_DualScalar* product, const BGC_FP32_DualScalar* multiplicand, const float multiplier)
|
|
|
|
|
inline void bgc_fp32_dual_number_multiply_by_real(BGC_FP32_DualNumber* product, const BGC_FP32_DualNumber* multiplicand, const float multiplier)
|
|
|
|
|
{
|
|
|
|
|
product->real_part = multiplicand->real_part * multiplier;
|
|
|
|
|
product->dual_part = multiplicand->dual_part * multiplier;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_multiply_by_real(BGC_FP64_DualScalar* product, const BGC_FP64_DualScalar* multiplicand, const double multiplier)
|
|
|
|
|
inline void bgc_fp64_dual_number_multiply_by_real(BGC_FP64_DualNumber* product, const BGC_FP64_DualNumber* multiplicand, const double multiplier)
|
|
|
|
|
{
|
|
|
|
|
product->real_part = multiplicand->real_part * multiplier;
|
|
|
|
|
product->dual_part = multiplicand->dual_part * multiplier;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_multiply_by_dual(BGC_FP32_DualScalar* product, const BGC_FP32_DualScalar* multiplicand, const BGC_FP32_DualScalar* multiplier)
|
|
|
|
|
inline void bgc_fp32_dual_number_multiply_by_dual(BGC_FP32_DualNumber* product, const BGC_FP32_DualNumber* multiplicand, const BGC_FP32_DualNumber* multiplier)
|
|
|
|
|
{
|
|
|
|
|
const float real_part = multiplicand->real_part * multiplier->real_part;
|
|
|
|
|
const float dual_part = multiplicand->dual_part * multiplier->real_part + multiplicand->real_part * multiplier->dual_part;
|
|
|
|
|
@ -195,7 +285,7 @@ inline void bgc_fp32_dual_scalar_multiply_by_dual(BGC_FP32_DualScalar* product,
|
|
|
|
|
product->dual_part = dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_multiply_by_dual(BGC_FP64_DualScalar* product, const BGC_FP64_DualScalar* multiplicand, const BGC_FP64_DualScalar* multiplier)
|
|
|
|
|
inline void bgc_fp64_dual_number_multiply_by_dual(BGC_FP64_DualNumber* product, const BGC_FP64_DualNumber* multiplicand, const BGC_FP64_DualNumber* multiplier)
|
|
|
|
|
{
|
|
|
|
|
const double real_part = multiplicand->real_part * multiplier->real_part;
|
|
|
|
|
const double dual_part = multiplicand->dual_part * multiplier->real_part + multiplicand->real_part * multiplier->dual_part;
|
|
|
|
|
@ -204,7 +294,7 @@ inline void bgc_fp64_dual_scalar_multiply_by_dual(BGC_FP64_DualScalar* product,
|
|
|
|
|
product->dual_part = dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp32_dual_scalar_multiply_by_conjugate(BGC_FP32_DualScalar* product, const BGC_FP32_DualScalar* multiplicand, const BGC_FP32_DualScalar* multiplier_to_conjugate)
|
|
|
|
|
inline void bgc_fp32_dual_number_multiply_by_conjugate(BGC_FP32_DualNumber* product, const BGC_FP32_DualNumber* multiplicand, const BGC_FP32_DualNumber* multiplier_to_conjugate)
|
|
|
|
|
{
|
|
|
|
|
const float real_part = multiplicand->real_part * multiplier_to_conjugate->real_part;
|
|
|
|
|
const float dual_part = multiplicand->dual_part * multiplier_to_conjugate->real_part - multiplicand->real_part * multiplier_to_conjugate->dual_part;
|
|
|
|
|
@ -213,7 +303,7 @@ inline void bgc_fp32_dual_scalar_multiply_by_conjugate(BGC_FP32_DualScalar* prod
|
|
|
|
|
product->dual_part = dual_part;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline void bgc_fp64_dual_scalar_multiply_by_conjugate(BGC_FP64_DualScalar* product, const BGC_FP64_DualScalar* multiplicand, const BGC_FP64_DualScalar* multiplier_to_conjugate)
|
|
|
|
|
inline void bgc_fp64_dual_number_multiply_by_conjugate(BGC_FP64_DualNumber* product, const BGC_FP64_DualNumber* multiplicand, const BGC_FP64_DualNumber* multiplier_to_conjugate)
|
|
|
|
|
{
|
|
|
|
|
const double real_part = multiplicand->real_part * multiplier_to_conjugate->real_part;
|
|
|
|
|
const double dual_part = multiplicand->dual_part * multiplier_to_conjugate->real_part - multiplicand->real_part * multiplier_to_conjugate->dual_part;
|
|
|
|
|
@ -223,27 +313,27 @@ inline void bgc_fp64_dual_scalar_multiply_by_conjugate(BGC_FP64_DualScalar* prod
|
|
|
|
|
}
|
|
|
|
|
// =================== Divide =================== //
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp32_dual_scalar_divide_by_real(BGC_FP32_DualScalar* quotient, const BGC_FP32_DualScalar* dividend, const float divisor)
|
|
|
|
|
inline int bgc_fp32_dual_number_divide_by_real(BGC_FP32_DualNumber* quotient, const BGC_FP32_DualNumber* dividend, const float divisor)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp32_is_zero(divisor) || isnan(divisor)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
bgc_fp32_dual_scalar_multiply_by_real(quotient, dividend, 1.0f / divisor);
|
|
|
|
|
bgc_fp32_dual_number_multiply_by_real(quotient, dividend, 1.0f / divisor);
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp64_dual_scalar_divide_by_real(BGC_FP64_DualScalar* quotient, const BGC_FP64_DualScalar* dividend, const double divisor)
|
|
|
|
|
inline int bgc_fp64_dual_number_divide_by_real(BGC_FP64_DualNumber* quotient, const BGC_FP64_DualNumber* dividend, const double divisor)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp64_is_zero(divisor) || isnan(divisor)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
bgc_fp64_dual_scalar_multiply_by_real(quotient, dividend, 1.0 / divisor);
|
|
|
|
|
bgc_fp64_dual_number_multiply_by_real(quotient, dividend, 1.0 / divisor);
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp32_dual_scalar_divide_by_dual(BGC_FP32_DualScalar* quotient, const BGC_FP32_DualScalar* dividend, const BGC_FP32_DualScalar* divisor)
|
|
|
|
|
inline int bgc_fp32_dual_number_divide_by_dual(BGC_FP32_DualNumber* quotient, const BGC_FP32_DualNumber* dividend, const BGC_FP32_DualNumber* divisor)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp32_is_zero(divisor->real_part)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
@ -260,7 +350,7 @@ inline int bgc_fp32_dual_scalar_divide_by_dual(BGC_FP32_DualScalar* quotient, co
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp64_dual_scalar_divide_by_dual(BGC_FP64_DualScalar* quotient, const BGC_FP64_DualScalar* dividend, const BGC_FP64_DualScalar* divisor)
|
|
|
|
|
inline int bgc_fp64_dual_number_divide_by_dual(BGC_FP64_DualNumber* quotient, const BGC_FP64_DualNumber* dividend, const BGC_FP64_DualNumber* divisor)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp64_is_zero(divisor->real_part)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
@ -277,7 +367,7 @@ inline int bgc_fp64_dual_scalar_divide_by_dual(BGC_FP64_DualScalar* quotient, co
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp32_dual_scalar_divide_by_conjugate(BGC_FP32_DualScalar* quotient, const BGC_FP32_DualScalar* dividend, const BGC_FP32_DualScalar* divisor_to_conjugate)
|
|
|
|
|
inline int bgc_fp32_dual_number_divide_by_conjugate(BGC_FP32_DualNumber* quotient, const BGC_FP32_DualNumber* dividend, const BGC_FP32_DualNumber* divisor_to_conjugate)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp32_is_zero(divisor_to_conjugate->real_part)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
@ -294,7 +384,7 @@ inline int bgc_fp32_dual_scalar_divide_by_conjugate(BGC_FP32_DualScalar* quotien
|
|
|
|
|
return BGC_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
inline int bgc_fp64_dual_scalar_divide_by_conjugate(BGC_FP64_DualScalar* quotient, const BGC_FP64_DualScalar* dividend, const BGC_FP64_DualScalar* divisor_to_conjugate)
|
|
|
|
|
inline int bgc_fp64_dual_number_divide_by_conjugate(BGC_FP64_DualNumber* quotient, const BGC_FP64_DualNumber* dividend, const BGC_FP64_DualNumber* divisor_to_conjugate)
|
|
|
|
|
{
|
|
|
|
|
if (bgc_fp64_is_zero(divisor_to_conjugate->real_part)) {
|
|
|
|
|
return BGC_FAILURE;
|
|
|
|
|
@ -313,13 +403,13 @@ inline int bgc_fp64_dual_scalar_divide_by_conjugate(BGC_FP64_DualScalar* quotien
|
|
|
|
|
|
|
|
|
|
// ================ Mean of Two ================= //
|
|
|
|
|
|
|
|
Internal server error - Personal Git Server: Beyond coding. We Forge.
500
Internal server error
Forgejo version: 11.0.1+gitea-1.22.0