Browse Source

Fixed the utest bug for drotmg.

tags/v0.1.1
Xianyi Zhang 13 years ago
parent
commit
08570c4248
1 changed files with 7 additions and 1 deletions
  1. +7
    -1
      utest/test_rotmg.c

+ 7
- 1
utest/test_rotmg.c View File

@@ -38,12 +38,18 @@ void test_drotmg()
double te_d2, tr_d2;
double te_x1, tr_x1;
double te_y1, tr_y1;
double te_param[5],tr_param[5];
double te_param[5];
double tr_param[5];
int i=0;
te_d1= tr_d1=0.21149573940783739;
te_d2= tr_d2=0.046892057172954082;
te_x1= tr_x1=-0.42272687517106533;
te_y1= tr_y1=0.42211309121921659;

for(i=0; i<5; i++){
te_param[i]=tr_param[i]=0.0;
}

//OpenBLAS
BLASFUNC(drotmg)(&te_d1, &te_d2, &te_x1, &te_y1, te_param);
//reference


Loading…
Cancel
Save