diff options
author | shiming zhang <shiming@multicorewareinc.com> | 2013-11-07 17:24:23 +0800 |
---|---|---|
committer | I-Jui (Ray) Sung <ray@multicorewareinc.com> | 2013-11-14 14:09:42 -0600 |
commit | 4c047317bf078ac94ca4abd01a474e6070b2cfe6 (patch) | |
tree | d4a821324adf57f62e45bf752e84359251577e9c | |
parent | 647d771636f9e54fa86508dd421e364f04d83c58 (diff) |
GPU Calc: implemented CHIDIST
AMLOEXT-166 FIX
Change-Id: I0112c49c913556fc9cc2011bd32c4641ac4f26bd
Signed-off-by: haochen <haochen@multicorewareinc.com>
Signed-off-by: I-Jui (Ray) Sung <ray@multicorewareinc.com>
-rw-r--r-- | sc/source/core/opencl/formulagroupcl.cxx | 4 | ||||
-rw-r--r-- | sc/source/core/opencl/op_statistical.cxx | 72 | ||||
-rw-r--r-- | sc/source/core/opencl/op_statistical.hxx | 7 |
3 files changed, 83 insertions, 0 deletions
diff --git a/sc/source/core/opencl/formulagroupcl.cxx b/sc/source/core/opencl/formulagroupcl.cxx index 2c07ab38462c..7d7326789537 100644 --- a/sc/source/core/opencl/formulagroupcl.cxx +++ b/sc/source/core/opencl/formulagroupcl.cxx @@ -1216,6 +1216,10 @@ DynamicKernelSoPArguments::DynamicKernelSoPArguments( mvSubArguments.push_back(SoPHelper(ts, ft->Children[i], new OpVar)); break; + case ocChiDist: + mvSubArguments.push_back(SoPHelper(ts, + ft->Children[i],new OpChiDist)); + break; case ocExternal: if ( !(pChild->GetExternal().compareTo(OUString( "com.sun.star.sheet.addin.Analysis.getEffect")))) diff --git a/sc/source/core/opencl/op_statistical.cxx b/sc/source/core/opencl/op_statistical.cxx index 4c2f272672cb..fc93c03dd530 100644 --- a/sc/source/core/opencl/op_statistical.cxx +++ b/sc/source/core/opencl/op_statistical.cxx @@ -2869,6 +2869,78 @@ formula::SingleVectorRefToken *>(tmpCur3); ss << " return tmp;\n"; ss << "}\n"; } +void OpChiDist::BinInlineFun(std::set<std::string>& decls, + std::set<std::string>& funs) +{ + decls.insert(fBigInvDecl); + funs.insert(""); + decls.insert(fHalfMachEpsDecl); + funs.insert(""); + decls.insert(GetUpRegIGammaDecl); + funs.insert(GetUpRegIGamma); + decls.insert(GetGammaSeriesDecl); + funs.insert(GetGammaSeries); + decls.insert(GetGammaContFractionDecl); + funs.insert(GetGammaContFraction); + decls.insert(GetChiDistDecl); + funs.insert(GetChiDist); +} +void OpChiDist::GenSlidingWindowFunction( + std::stringstream &ss,const std::string sSymName, + SubArguments &vSubArguments) +{ + ss << "\ndouble " << sSymName; + ss << "_"<< BinFuncName() <<"("; + for (unsigned i = 0; i < vSubArguments.size(); i++) + { + if (i) + ss << ","; + vSubArguments[i]->GenSlidingWindowDecl(ss); + } + ss << ")\n"; + ss << "{\n"; + ss << " double fx,fDF,tmp;\n"; + ss << " int gid0=get_global_id(0);\n"; +#ifdef ISNAN + FormulaToken *tmpCur0 = vSubArguments[0]->GetFormulaToken(); + const formula::SingleVectorRefToken*tmpCurDVR0= dynamic_cast<const + formula::SingleVectorRefToken *>(tmpCur0); + FormulaToken *tmpCur1 = vSubArguments[1]->GetFormulaToken(); + const formula::SingleVectorRefToken*tmpCurDVR1= dynamic_cast<const + formula::SingleVectorRefToken *>(tmpCur1); + ss << " int buffer_fx_len = "; + ss << tmpCurDVR0->GetArrayLength(); + ss << ";\n"; + ss << " int buffer_fDF_len = "; + ss << tmpCurDVR1->GetArrayLength(); + ss << ";\n"; +#endif +#ifdef ISNAN + ss <<" if((gid0)>=buffer_fx_len || isNan("; + ss << vSubArguments[0]->GenSlidingWindowDeclRef(); + ss <<"))\n"; + ss <<" fx = 0;\n"; + ss <<" else \n"; +#endif + ss <<" fx ="<<vSubArguments[0]->GenSlidingWindowDeclRef(); + ss << ";\n"; +#ifdef ISNAN + ss <<" if((gid0)>=buffer_fDF_len || isNan("; + ss << vSubArguments[1]->GenSlidingWindowDeclRef(); + ss <<"))\n"; + ss <<" fDF = 0;\n"; + ss <<" else \n"; +#endif + ss <<" fDF ="<<vSubArguments[1]->GenSlidingWindowDeclRef(); + ss <<";\n"; + ss << " if(fDF < 1.0)\n"; + ss << " {\n"; + ss << " return DBL_MIN;\n"; + ss << " }\n"; + ss << " tmp = GetChiDist( fx, fDF);\n"; + ss << " return tmp;\n"; + ss << "}\n"; +} }} /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/sc/source/core/opencl/op_statistical.hxx b/sc/source/core/opencl/op_statistical.hxx index 33d596ab32b9..dedebf5843e8 100644 --- a/sc/source/core/opencl/op_statistical.hxx +++ b/sc/source/core/opencl/op_statistical.hxx @@ -246,6 +246,13 @@ public: void BinInlineFun(std::set<std::string>& decls,std::set<std::string>& funs); virtual std::string BinFuncName(void) const { return "GammaDist"; } }; +class OpChiDist:public Normal{ + public: + virtual void GenSlidingWindowFunction(std::stringstream &ss, + const std::string sSymName, SubArguments &vSubArguments); + virtual void BinInlineFun(std::set<std::string>& ,std::set<std::string>&); + virtual std::string BinFuncName(void) const { return "OpChiDist"; } +}; }} #endif |