void BLASFUNC_REF(zdrot) (blasint *, double *, blasint *, double *, blasint *, double *, double *);
void BLASFUNC_REF(xqrot) (blasint *, xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *);
-void BLASFUNC_REF(sswap) (blasint *, float *, blasint *, float *, blasint *);
-void BLASFUNC_REF(dswap) (blasint *, double *, blasint *, double *, blasint *);
-void BLASFUNC_REF(qswap) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
-void BLASFUNC_REF(cswap) (blasint *, float *, blasint *, float *, blasint *);
-void BLASFUNC_REF(zswap) (blasint *, double *, blasint *, double *, blasint *);
-void BLASFUNC_REF(xswap) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
-void BLASFUNC_REF(saxpy) (blasint *, float *, float *, blasint *, float *, blasint *);
-void BLASFUNC_REF(daxpy) (blasint *, double *, double *, blasint *, double *, blasint *);
-void BLASFUNC_REF(caxpy) (blasint *, float *, float *, blasint *, float *, blasint *);
-void BLASFUNC_REF(zaxpy) (blasint *, double *, double *, blasint *, double *, blasint *);
+void BLASFUNC_REF(sswap) (blasint *, float *, blasint *, float *, blasint *);
+void BLASFUNC_REF(dswap) (blasint *, double *, blasint *, double *, blasint *);
+void BLASFUNC_REF(qswap) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
+void BLASFUNC_REF(cswap) (blasint *, float *, blasint *, float *, blasint *);
+void BLASFUNC_REF(zswap) (blasint *, double *, blasint *, double *, blasint *);
+void BLASFUNC_REF(xswap) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
+
+void BLASFUNC_REF(saxpy) (blasint *, float *, float *, blasint *, float *, blasint *);
+void BLASFUNC_REF(daxpy) (blasint *, double *, double *, blasint *, double *, blasint *);
+void BLASFUNC_REF(caxpy) (blasint *, float *, float *, blasint *, float *, blasint *);
+void BLASFUNC_REF(zaxpy) (blasint *, double *, double *, blasint *, double *, blasint *);
#endif
#define CHECK_EPS 0.00002
//Testcase list
-void test_drot_incx_0(void);
-void test_srot_incx_0(void);
-void test_zdrot_incx_0(void);
-void test_csrot_incx_0(void);
+void test_drot_inc_0(void);
+void test_srot_inc_0(void);
+void test_zdrot_inc_0(void);
+void test_csrot_inc_0(void);
void test_dswap_inc_0(void);
void test_zswap_inc_0(void);
#include <CUnit/Basic.h>
CU_TestInfo test_level1[]={
- {"Testing srot when incx & incy == 0",test_srot_incx_0},
- {"Testing drot when incx & incy == 0",test_drot_incx_0},
- {"Testing csrot when incx & incy == 0",test_csrot_incx_0},
- {"Testing zdrot when incx & incy == 0",test_zdrot_incx_0},
+ {"Testing srot when incx || incy == 0",test_srot_inc_0},
+ {"Testing drot when incx || incy == 0",test_drot_inc_0},
+ {"Testing csrot when incx || incy == 0",test_csrot_inc_0},
+ {"Testing zdrot when incx || incy == 0",test_zdrot_inc_0},
- {"Testing sswap with incx & incy == 0",test_sswap_inc_0},
- {"Testing dswap with incx & incy == 0",test_dswap_inc_0},
- {"Testing cswap with incx & incy == 0",test_cswap_inc_0},
- {"Testing zswap with incx & incy == 0",test_zswap_inc_0},
+ {"Testing sswap with incx || incy == 0",test_sswap_inc_0},
+ {"Testing dswap with incx || incy == 0",test_dswap_inc_0},
+ {"Testing cswap with incx || incy == 0",test_cswap_inc_0},
+ {"Testing zswap with incx || incy == 0",test_zswap_inc_0},
- {"Testing saxpy with incx & incy == 0",test_saxpy_inc_0},
- {"Testing daxpy with incx & incy == 0",test_daxpy_inc_0},
- {"Testing caxpy with incx & incy == 0",test_caxpy_inc_0},
- {"Testing zaxpy with incx & incy == 0",test_zaxpy_inc_0},
+ {"Testing saxpy with incx || incy == 0",test_saxpy_inc_0},
+ {"Testing daxpy with incx || incy == 0",test_daxpy_inc_0},
+ {"Testing caxpy with incx || incy == 0",test_caxpy_inc_0},
+ {"Testing zaxpy with incx || incy == 0",test_zaxpy_inc_0},
CU_TEST_INFO_NULL,
};
#include "common_utest.h"
-void test_drot_incx_0(void)
+void test_drot_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
double c=0.25,s=0.5;
double x1[]={1.0,3.0,5.0,7.0};
}
}
-void test_zdrot_incx_0(void)
+void test_zdrot_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
double c=0.25,s=0.5;
double x1[]={1.0,3.0,5.0,7.0,1.0,3.0,5.0,7.0};
//reference
BLASFUNC_REF(zdrot)(&N,x2,&incX,y2,&incY,&c,&s);
- for(i=0; i<N; i++){
+ for(i=0; i<2*N; i++){
CU_ASSERT_DOUBLE_EQUAL(x1[i], x2[i], CHECK_EPS);
CU_ASSERT_DOUBLE_EQUAL(y1[i], y2[i], CHECK_EPS);
}
}
-void test_srot_incx_0(void)
+void test_srot_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
float c=0.25,s=0.5;
float x1[]={1.0,3.0,5.0,7.0};
}
}
-void test_csrot_incx_0(void)
+void test_csrot_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
float c=0.25,s=0.5;
float x1[]={1.0,3.0,5.0,7.0,1.0,3.0,5.0,7.0};
//reference
BLASFUNC_REF(csrot)(&N,x2,&incX,y2,&incY,&c,&s);
- for(i=0; i<N; i++){
+ for(i=0; i<2*N; i++){
CU_ASSERT_DOUBLE_EQUAL(x1[i], x2[i], CHECK_EPS);
CU_ASSERT_DOUBLE_EQUAL(y1[i], y2[i], CHECK_EPS);
}
notice, this list of conditions and the following disclaimer in
the documentation and/or other materials provided with the
distribution.
- 3. Neither the name of the ISCAS nor the names of its contributors may
- be used to endorse or promote products derived from this software
+ 3. Neither the name of the ISCAS nor the names of its contributors may
+ be used to endorse or promote products derived from this software
without specific prior written permission.
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
-SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
-CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
-OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
**********************************************************************************/
void test_dswap_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
double x1[]={1.0,3.0,5.0,7.0};
double y1[]={2.0,4.0,6.0,8.0};
void test_zswap_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
- double c=0.25,s=0.5;
double x1[]={1.0,3.0,5.0,7.0,1.0,3.0,5.0,7.0};
double y1[]={2.0,4.0,6.0,8.0,2.0,4.0,6.0,8.0};
double x2[]={1.0,3.0,5.0,7.0,1.0,3.0,5.0,7.0};
//reference
BLASFUNC_REF(zswap)(&N,x2,&incX,y2,&incY);
- for(i=0; i<N; i++){
+ for(i=0; i<2*N; i++){
CU_ASSERT_DOUBLE_EQUAL(x1[i], x2[i], CHECK_EPS);
CU_ASSERT_DOUBLE_EQUAL(y1[i], y2[i], CHECK_EPS);
}
void test_sswap_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
-
float x1[]={1.0,3.0,5.0,7.0};
float y1[]={2.0,4.0,6.0,8.0};
float x2[]={1.0,3.0,5.0,7.0};
void test_cswap_inc_0(void)
{
- int i;
+ int i=0;
int N=4,incX=0,incY=0;
- float c=0.25,s=0.5;
float x1[]={1.0,3.0,5.0,7.0,1.0,3.0,5.0,7.0};
float y1[]={2.0,4.0,6.0,8.0,2.0,4.0,6.0,8.0};
float x2[]={1.0,3.0,5.0,7.0,1.0,3.0,5.0,7.0};
//reference
BLASFUNC_REF(cswap)(&N,x2,&incX,y2,&incY);
- for(i=0; i<N; i++){
+ for(i=0; i<2*N; i++){
CU_ASSERT_DOUBLE_EQUAL(x1[i], x2[i], CHECK_EPS);
CU_ASSERT_DOUBLE_EQUAL(y1[i], y2[i], CHECK_EPS);
}