LibreOffice Module sc (master) 1
Variables
op_math_helpers.hxx File Reference
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Variables

const char Math_IntgDecl [] ="double Intg(double n);\n"
 
const char Math_Intg []
 
const char nCorrValDecl []
 
const char RoundDecl [] = "double Round(double fValue);\n"
 
const char Round []
 
const char bikDecl [] = "double bik(double n,double k);\n"
 
const char bik []
 
const char local_cothDecl [] = "double local_coth(double n);\n"
 
const char local_coth []
 
const char local_coshDecl [] = "double local_cosh(double n);\n"
 
const char local_cosh []
 
const char atan2Decl [] = "double arctan2(double y, double x);\n"
 
const char atan2Content []
 
const char is_representable_integerDecl [] = "int is_representable_integer(double a);\n"
 
const char is_representable_integer []
 
const char approx_equalDecl [] = "int approx_equal(double a, double b);\n"
 
const char approx_equal []
 
const char fsum_approxDecl [] = "double fsum_approx(double a, double b);\n"
 
const char fsum_approx []
 
const char fsub_approxDecl [] = "double fsub_approx(double a, double b);\n"
 
const char fsub_approx []
 
const char value_approxDecl [] = "double value_approx( double fValue );\n"
 
const char value_approx []
 
const char cell_equalDecl [] = "bool cell_equal(double a, double b, bool a_is_string, bool b_is_string);\n"
 
const char cell_equal []
 

Variable Documentation

◆ approx_equal

const char approx_equal[]
Initial value:
=
"int approx_equal(double a, double b) {\n"
" double e48 = 1.0 / (16777216.0 * 16777216.0);\n"
" double e44 = e48 * 16.0;\n"
" if (a == b)\n"
" return 1;\n"
" if (a == 0.0 || b == 0.0)\n"
" return 0;\n"
" double d = fabs(a - b);\n"
" if (!isfinite(d))\n"
" return 0; // Nan or Inf involved\n"
" if (d > ((a = fabs(a)) * e44) || d > ((b = fabs(b)) * e44))\n"
" return 0;\n"
" if (is_representable_integer(d) && is_representable_integer(a) && is_representable_integer(b))\n"
" return 0; // special case for representable integers.\n"
" return (d < a * e48 && d < b * e48);\n"
"}\n"

Definition at line 131 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpVDB::BinInlineFun(), sc::opencl::OpMod::BinInlineFun(), sc::opencl::OpEqual::BinInlineFun(), sc::opencl::OpNotEqual::BinInlineFun(), sc::opencl::OpLessEqual::BinInlineFun(), sc::opencl::OpGreaterEqual::BinInlineFun(), sc::opencl::OpSum::BinInlineFun(), sc::opencl::OpSub::BinInlineFun(), and sc::opencl::OpVarStDevBase::BinInlineFun().

◆ approx_equalDecl

const char approx_equalDecl[] = "int approx_equal(double a, double b);\n"

Definition at line 130 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpVDB::BinInlineFun(), sc::opencl::OpMod::BinInlineFun(), sc::opencl::OpEqual::BinInlineFun(), sc::opencl::OpNotEqual::BinInlineFun(), sc::opencl::OpLessEqual::BinInlineFun(), sc::opencl::OpGreaterEqual::BinInlineFun(), sc::opencl::OpSum::BinInlineFun(), sc::opencl::OpSub::BinInlineFun(), and sc::opencl::OpVarStDevBase::BinInlineFun().

◆ atan2Content

const char atan2Content[]
Initial value:
=
"double arctan2(double y, double x)\n"
"{\n"
" if(y==0.0)\n"
" return x >= 0 ? 0.0 : M_PI;\n"
" double a,num,den,tmpPi;\n"
" int flag;\n"
" tmpPi = 0;\n"
" if (fabs(x) >= fabs(y))\n"
" {\n"
" num = y;\n"
" den = x;\n"
" flag = 1;\n"
" if (x < 0.0)\n"
" tmpPi = M_PI;\n"
" }\n"
" if(fabs(x) < fabs(y))\n"
" {\n"
" num = x;\n"
" den = y;\n"
" flag = -1;\n"
" tmpPi = M_PI_2;\n"
" }\n"
" a = atan(num/den);\n"
" a = flag==1?a:-a;\n"
" a = a + (y >= 0.0 ? tmpPi : -tmpPi);\n"
" return a;\n"
"}\n"

Definition at line 87 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpArcCos::BinInlineFun(), sc::opencl::OpArcSin::BinInlineFun(), and sc::opencl::OpArcTan2::BinInlineFun().

◆ atan2Decl

const char atan2Decl[] = "double arctan2(double y, double x);\n"

Definition at line 86 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpArcCos::BinInlineFun(), sc::opencl::OpArcSin::BinInlineFun(), and sc::opencl::OpArcTan2::BinInlineFun().

◆ bik

const char bik[]
Initial value:
=
"double bik(double n,double k)\n"
"{\n"
" double nVal1 = n;\n"
" double nVal2 = k;\n"
" n = n - 1;\n"
" k = k - 1;\n"
" while (k > 0)\n"
" {\n"
" nVal1 = nVal1 * n;\n"
" nVal2 = nVal2 * k;\n"
" k = k - 1;\n"
" n = n - 1;\n"
" }\n"
" return (nVal1 / nVal2);\n"
"}\n"

Definition at line 52 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpCombinA::BinInlineFun().

◆ bikDecl

const char bikDecl[] = "double bik(double n,double k);\n"

Definition at line 51 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpCombinA::BinInlineFun().

◆ cell_equal

const char cell_equal[]
Initial value:
=
"bool cell_equal(double a, double b, bool a_is_string, bool b_is_string) {\n"
" if( !a_is_string && !b_is_string )\n"
" return approx_equal( isnan(a) ? 0 : a, isnan(b) ? 0 : b );\n"
" if( a_is_string && b_is_string )\n"
" return a == b;\n"
" if(( a_is_string && a == 0 && isnan(b)) || ( b_is_string && b == 0 && isnan(a)))\n"
" return true;\n"
" return false;\n"
"}\n"

Definition at line 196 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpEqual::BinInlineFun(), and sc::opencl::OpNotEqual::BinInlineFun().

◆ cell_equalDecl

const char cell_equalDecl[] = "bool cell_equal(double a, double b, bool a_is_string, bool b_is_string);\n"

Definition at line 195 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpEqual::BinInlineFun(), and sc::opencl::OpNotEqual::BinInlineFun().

◆ fsub_approx

const char fsub_approx[]
Initial value:
=
"double fsub_approx(double a, double b) {\n"
" if ( ((a < 0.0 && b < 0.0) || (a > 0.0 && b > 0.0)) && approx_equal( a, b ) )\n"
" return 0.0;\n"
" return a - b;\n"
"}\n"

Definition at line 159 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpMod::BinInlineFun(), sc::opencl::OpSub::BinInlineFun(), and sc::opencl::OpVarStDevBase::BinInlineFun().

◆ fsub_approxDecl

const char fsub_approxDecl[] = "double fsub_approx(double a, double b);\n"

Definition at line 158 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpMod::BinInlineFun(), sc::opencl::OpSub::BinInlineFun(), and sc::opencl::OpVarStDevBase::BinInlineFun().

◆ fsum_approx

const char fsum_approx[]
Initial value:
=
"double fsum_approx(double a, double b) {\n"
" if ( ((a < 0.0 && b > 0.0) || (b < 0.0 && a > 0.0))\n"
" && approx_equal( a, -b ) )\n"
" return 0.0;\n"
" return a + b;\n"
"}\n"

Definition at line 150 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpSum::BinInlineFun().

◆ fsum_approxDecl

const char fsum_approxDecl[] = "double fsum_approx(double a, double b);\n"

Definition at line 149 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpSum::BinInlineFun().

◆ is_representable_integer

const char is_representable_integer[]
Initial value:
=
"int is_representable_integer(double a) {\n"
" long kMaxInt = (1L << 53) - 1;\n"
" if (a <= (double)kMaxInt)\n"
" {\n"
" long nInt = (long)a;\n"
" double fInt;\n"
" return (nInt <= kMaxInt &&\n"
" (!((fInt = (double)nInt) < a) && !(fInt > a)));\n"
" }\n"
" return 0;\n"
"}\n"

Definition at line 117 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpVDB::BinInlineFun(), sc::opencl::OpInt::BinInlineFun(), sc::opencl::OpMod::BinInlineFun(), sc::opencl::OpEqual::BinInlineFun(), sc::opencl::OpNotEqual::BinInlineFun(), sc::opencl::OpLessEqual::BinInlineFun(), sc::opencl::OpGreaterEqual::BinInlineFun(), sc::opencl::OpSum::BinInlineFun(), sc::opencl::OpSub::BinInlineFun(), and sc::opencl::OpVarStDevBase::BinInlineFun().

◆ is_representable_integerDecl

const char is_representable_integerDecl[] = "int is_representable_integer(double a);\n"

Definition at line 116 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpVDB::BinInlineFun(), sc::opencl::OpInt::BinInlineFun(), sc::opencl::OpMod::BinInlineFun(), sc::opencl::OpEqual::BinInlineFun(), sc::opencl::OpNotEqual::BinInlineFun(), sc::opencl::OpLessEqual::BinInlineFun(), sc::opencl::OpGreaterEqual::BinInlineFun(), sc::opencl::OpSum::BinInlineFun(), sc::opencl::OpSub::BinInlineFun(), and sc::opencl::OpVarStDevBase::BinInlineFun().

◆ local_cosh

const char local_cosh[]
Initial value:
=
"double local_cosh(double n)\n"
"{\n"
" double nVal = (exp(n) + exp(-n)) / 2;\n"
" return nVal;\n"
"}\n"

Definition at line 80 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpCosh::BinInlineFun().

◆ local_coshDecl

const char local_coshDecl[] = "double local_cosh(double n);\n"

Definition at line 79 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpCosh::BinInlineFun().

◆ local_coth

const char local_coth[]
Initial value:
=
"double local_coth(double n)\n"
"{\n"
" double a = exp(n);\n"
" double b = exp(-n);\n"
" double nVal = (a + b) / (a - b);\n"
" return nVal;\n"
"}\n"

Definition at line 70 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpCoth::BinInlineFun().

◆ local_cothDecl

const char local_cothDecl[] = "double local_coth(double n);\n"

Definition at line 69 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpCoth::BinInlineFun().

◆ Math_Intg

const char Math_Intg[]
Initial value:
=
"double Intg(double n)\n"
"{\n"
" if(trunc(n)==n )\n"
" return n;\n"
" else if(n<0)\n"
" return trunc(n)-1;\n"
" else\n"
" return trunc(n)+1;\n"
"}\n"

Definition at line 13 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpOdd::BinInlineFun().

◆ Math_IntgDecl

const char Math_IntgDecl[] ="double Intg(double n);\n"

Definition at line 12 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpOdd::BinInlineFun().

◆ nCorrValDecl

const char nCorrValDecl[]
Initial value:
="double constant nCorrVal[]"
"= {0, 9e-1, 9e-2, 9e-3, 9e-4, 9e-5, 9e-6, 9e-7, "
"9e-8,9e-9, 9e-10, 9e-11, 9e-12, 9e-13, 9e-14, 9e-15};\n"

Definition at line 24 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpAmordegrc::BinInlineFun(), sc::opencl::OpAmorlinc::BinInlineFun(), and sc::opencl::OpRound::BinInlineFun().

◆ Round

const char Round[]
Initial value:
=
"double Round(double fValue)\n"
"{\n"
" if ( fValue == 0.0 )\n"
" return fValue;\n"
"\n"
" double fFac = 0;\n"
" int nExp;\n"
" if ( fValue > 0.0 )\n"
" nExp = ( floor( log10( fValue ) ) );\n"
" else\n"
" nExp = 0;\n"
" int nIndex = 15 - nExp;\n"
" if ( nIndex > 15 )\n"
" nIndex = 15;\n"
" else if ( nIndex <= 1 )\n"
" nIndex = 0;\n"
" fValue = floor( fValue + 0.5 + nCorrVal[nIndex] );\n"
" return fValue;\n"
"}\n"

Definition at line 30 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpAmordegrc::BinInlineFun(), sc::opencl::OpAmorlinc::BinInlineFun(), and sc::opencl::OpRound::BinInlineFun().

◆ RoundDecl

const char RoundDecl[] = "double Round(double fValue);\n"

Definition at line 28 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpAmordegrc::BinInlineFun(), sc::opencl::OpAmorlinc::BinInlineFun(), and sc::opencl::OpRound::BinInlineFun().

◆ value_approx

const char value_approx[]
Initial value:
=
"double value_approx( double fValue )\n"
"{\n"
" const double fBigInt = 2199023255552.0;\n"
" if (fValue == 0.0 || fValue == HUGE_VAL || !isfinite(fValue))\n"
" return fValue;\n"
" double fOrigValue = fValue;\n"
" fValue = fabs(fValue);\n"
" if (fValue > fBigInt)\n"
" return fOrigValue;\n"
" if (is_representable_integer(fValue))\n"
" return fOrigValue;\n"
" int nExp = (int)(floor(log10(fValue)));\n"
" nExp = 14 - nExp;\n"
" double fExpValue = pow(10.0,nExp);\n"
" fValue *= fExpValue;\n"
" if (!isfinite(fValue))\n"
" return fOrigValue;\n"
" fValue = round(fValue);\n"
" fValue /= fExpValue;\n"
" if (!isfinite(fValue))\n"
" return fOrigValue;\n"
" return copysign(fValue, fOrigValue);\n"
"}\n"

Definition at line 167 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpInt::BinInlineFun(), and sc::opencl::OpMod::BinInlineFun().

◆ value_approxDecl

const char value_approxDecl[] = "double value_approx( double fValue );\n"

Definition at line 166 of file op_math_helpers.hxx.

Referenced by sc::opencl::OpInt::BinInlineFun(), and sc::opencl::OpMod::BinInlineFun().

Generated on Sun Jul 30 2023 04:30:03 for LibreOffice Module sc (master) by doxygen 1.9.3