Testcases for RSQ in GPU Calc

Change-Id: I5e70883fa61da2afbe7254ecb448fcfd0abb41a3
Signed-off-by: Wei Wei <weiwei@multicorewareinc.com>

sc/qa/unit/opencl-test.cxx

@@ -84,6 +84,7 @@ public:
     void testFinacialDISCFormula();
     void testFinacialINTRATEFormula();
     void testMathFormulaCos();
+    void testStatisticalFormulaRsq();
     void testStatisticalFormulaPearson();
     void testStatisticalFormulaNegbinomdist();
     CPPUNIT_TEST_SUITE(ScOpenclTest);
@@ -118,6 +119,7 @@ public:
     CPPUNIT_TEST(testFinacialINTRATEFormula);
     CPPUNIT_TEST(testMathFormulaCos);
     CPPUNIT_TEST(testStatisticalFormulaNegbinomdist);
+    CPPUNIT_TEST(testStatisticalFormulaRsq);
     CPPUNIT_TEST(testStatisticalFormulaPearson);
     CPPUNIT_TEST_SUITE_END();
 
@@ -1048,12 +1050,32 @@ void ScOpenclTest::testStatisticalFormulaPearson()
     {
         double fLibre = pDoc->GetValue(ScAddress(2,i,0));
         double fExcel = pDocRes->GetValue(ScAddress(2,i,0));
-        std::cout<<fLibre<<"\t"<<fExcel<<"\n";
         CPPUNIT_ASSERT_DOUBLES_EQUAL(fExcel, fLibre, fabs(0.0001*fExcel));
     }
     xDocSh->DoClose();
     xDocShRes->DoClose();
 }
+//[AMLOEXT-83]
+void ScOpenclTest::testStatisticalFormulaRsq()
+{
+    ScDocShellRef xDocSh = loadDoc("OpenclCase/statistical/Rsq.", XLS);
+    enableOpenCL(xDocSh);
+    ScDocument* pDoc = xDocSh->GetDocument();
+    CPPUNIT_ASSERT(pDoc);   xDocSh->DoHardRecalc(true);
+    ScDocShellRef xDocShRes = loadDoc("OpenclCase/statistical/Rsq.", XLS);
+    ScDocument* pDocRes = xDocShRes->GetDocument();
+    CPPUNIT_ASSERT(pDocRes);
+    // Check the results of formula cells in the shared formula range.
+    for (SCROW i = 1; i <= 9; ++i)
+    {
+        double fLibre = pDoc->GetValue(ScAddress(2,i,0));
+        double fExcel = pDocRes->GetValue(ScAddress(2,i,0));
+        CPPUNIT_ASSERT_DOUBLES_EQUAL(fExcel, fLibre, fabs(0.0001*fExcel));
+    }
+    xDocSh->DoClose();
+    xDocShRes->DoClose();
+}
+
 ScOpenclTest::ScOpenclTest()
       : ScBootstrapFixture( "/sc/qa/unit/data" )
 {