Remove all trailing whitespace except lapack-netlib

Signed-off-by: Timothy Gu <timothygu99@gmail.com>

1 files changed, 145 insertions, 145 deletions

diff --git a/ctest/c_d2chke.c b/ctest/c_d2chke.c
index 23de9a4e7..7cdd04135 100644
--- a/ctest/c_d2chke.c
+++ b/ctest/c_d2chke.c
@@ -26,9 +26,9 @@ void chkxer(void) {
 
 void F77_d2chke(char *rout) {
    char *sf = ( rout ) ;
-   double A[2] = {0.0,0.0}, 
-          X[2] = {0.0,0.0}, 
-          Y[2] = {0.0,0.0}, 
+   double A[2] = {0.0,0.0},
+          X[2] = {0.0,0.0},
+          Y[2] = {0.0,0.0},
           ALPHA=0.0, BETA=0.0;
    extern int cblas_info, cblas_lerr, cblas_ok;
    extern int RowMajorStrg;
@@ -46,588 +46,588 @@ void F77_d2chke(char *rout) {
    if (strncmp( sf,"cblas_dgemv",11)==0) {
       cblas_rout = "cblas_dgemv";
       cblas_info = 1;
-      cblas_dgemv(INVALID, CblasNoTrans, 0, 0, 
+      cblas_dgemv(INVALID, CblasNoTrans, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dgemv(CblasColMajor, INVALID, 0, 0, 
+      cblas_dgemv(CblasColMajor, INVALID, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dgemv(CblasColMajor, CblasNoTrans, INVALID, 0, 
+      cblas_dgemv(CblasColMajor, CblasNoTrans, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dgemv(CblasColMajor, CblasNoTrans, 0, INVALID, 
+      cblas_dgemv(CblasColMajor, CblasNoTrans, 0, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = FALSE;
-      cblas_dgemv(CblasColMajor, CblasNoTrans, 2, 0, 
+      cblas_dgemv(CblasColMajor, CblasNoTrans, 2, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = FALSE;
-      cblas_dgemv(CblasColMajor, CblasNoTrans, 0, 0, 
+      cblas_dgemv(CblasColMajor, CblasNoTrans, 0, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 12; RowMajorStrg = FALSE;
-      cblas_dgemv(CblasColMajor, CblasNoTrans, 0, 0, 
+      cblas_dgemv(CblasColMajor, CblasNoTrans, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
 
       cblas_info = 2; RowMajorStrg = TRUE; RowMajorStrg = TRUE;
-      cblas_dgemv(CblasRowMajor, INVALID, 0, 0, 
+      cblas_dgemv(CblasRowMajor, INVALID, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dgemv(CblasRowMajor, CblasNoTrans, INVALID, 0, 
+      cblas_dgemv(CblasRowMajor, CblasNoTrans, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, INVALID, 
+      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = TRUE;
-      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, 2, 
+      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, 2,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = TRUE;
-      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, 0, 
+      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 12; RowMajorStrg = TRUE;
-      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, 0, 
+      cblas_dgemv(CblasRowMajor, CblasNoTrans, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dgbmv",11)==0) {
       cblas_rout = "cblas_dgbmv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dgbmv(INVALID, CblasNoTrans, 0, 0, 0, 0, 
+      cblas_dgbmv(INVALID, CblasNoTrans, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, INVALID, 0, 0, 0, 0, 
+      cblas_dgbmv(CblasColMajor, INVALID, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, INVALID, 0, 0, 0, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, INVALID, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, INVALID, 0, 0, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, INVALID, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, INVALID, 0, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, 2, 0, 0, INVALID, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, 2, 0, 0, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, 1, 0, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, 1, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 11; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, 0, 0, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 14; RowMajorStrg = FALSE;
-      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, 0, 0, 
+      cblas_dgbmv(CblasColMajor, CblasNoTrans, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, INVALID, 0, 0, 0, 0, 
+      cblas_dgbmv(CblasRowMajor, INVALID, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, INVALID, 0, 0, 0, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, INVALID, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, INVALID, 0, 0, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, INVALID, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, INVALID, 0, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 2, 0, 0, INVALID, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 2, 0, 0, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, 1, 0, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, 1, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 11; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, 0, 0, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 14; RowMajorStrg = TRUE;
-      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, 0, 0, 
+      cblas_dgbmv(CblasRowMajor, CblasNoTrans, 0, 0, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dsymv",11)==0) {
       cblas_rout = "cblas_dsymv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dsymv(INVALID, CblasUpper, 0, 
+      cblas_dsymv(INVALID, CblasUpper, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dsymv(CblasColMajor, INVALID, 0, 
+      cblas_dsymv(CblasColMajor, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dsymv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dsymv(CblasColMajor, CblasUpper, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = FALSE;
-      cblas_dsymv(CblasColMajor, CblasUpper, 2, 
+      cblas_dsymv(CblasColMajor, CblasUpper, 2,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = FALSE;
-      cblas_dsymv(CblasColMajor, CblasUpper, 0, 
+      cblas_dsymv(CblasColMajor, CblasUpper, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 11; RowMajorStrg = FALSE;
-      cblas_dsymv(CblasColMajor, CblasUpper, 0, 
+      cblas_dsymv(CblasColMajor, CblasUpper, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dsymv(CblasRowMajor, INVALID, 0, 
+      cblas_dsymv(CblasRowMajor, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dsymv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dsymv(CblasRowMajor, CblasUpper, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = TRUE;
-      cblas_dsymv(CblasRowMajor, CblasUpper, 2, 
+      cblas_dsymv(CblasRowMajor, CblasUpper, 2,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = TRUE;
-      cblas_dsymv(CblasRowMajor, CblasUpper, 0, 
+      cblas_dsymv(CblasRowMajor, CblasUpper, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 11; RowMajorStrg = TRUE;
-      cblas_dsymv(CblasRowMajor, CblasUpper, 0, 
+      cblas_dsymv(CblasRowMajor, CblasUpper, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dsbmv",11)==0) {
       cblas_rout = "cblas_dsbmv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dsbmv(INVALID, CblasUpper, 0, 0, 
+      cblas_dsbmv(INVALID, CblasUpper, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dsbmv(CblasColMajor, INVALID, 0, 0, 
+      cblas_dsbmv(CblasColMajor, INVALID, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dsbmv(CblasColMajor, CblasUpper, INVALID, 0, 
+      cblas_dsbmv(CblasColMajor, CblasUpper, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dsbmv(CblasColMajor, CblasUpper, 0, INVALID, 
+      cblas_dsbmv(CblasColMajor, CblasUpper, 0, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = FALSE;
-      cblas_dsbmv(CblasColMajor, CblasUpper, 0, 1, 
+      cblas_dsbmv(CblasColMajor, CblasUpper, 0, 1,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = FALSE;
-      cblas_dsbmv(CblasColMajor, CblasUpper, 0, 0, 
+      cblas_dsbmv(CblasColMajor, CblasUpper, 0, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 12; RowMajorStrg = FALSE;
-      cblas_dsbmv(CblasColMajor, CblasUpper, 0, 0, 
+      cblas_dsbmv(CblasColMajor, CblasUpper, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dsbmv(CblasRowMajor, INVALID, 0, 0, 
+      cblas_dsbmv(CblasRowMajor, INVALID, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dsbmv(CblasRowMajor, CblasUpper, INVALID, 0, 
+      cblas_dsbmv(CblasRowMajor, CblasUpper, INVALID, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, INVALID, 
+      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, INVALID,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = TRUE;
-      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, 1, 
+      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, 1,
                   ALPHA, A, 1, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = TRUE;
-      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, 0, 
+      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, 0,
                   ALPHA, A, 1, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 12; RowMajorStrg = TRUE;
-      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, 0, 
+      cblas_dsbmv(CblasRowMajor, CblasUpper, 0, 0,
                   ALPHA, A, 1, X, 1, BETA, Y, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dspmv",11)==0) {
       cblas_rout = "cblas_dspmv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dspmv(INVALID, CblasUpper, 0, 
+      cblas_dspmv(INVALID, CblasUpper, 0,
                   ALPHA, A, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dspmv(CblasColMajor, INVALID, 0, 
+      cblas_dspmv(CblasColMajor, INVALID, 0,
                   ALPHA, A, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dspmv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dspmv(CblasColMajor, CblasUpper, INVALID,
                   ALPHA, A, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = FALSE;
-      cblas_dspmv(CblasColMajor, CblasUpper, 0, 
+      cblas_dspmv(CblasColMajor, CblasUpper, 0,
                   ALPHA, A, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 10; RowMajorStrg = FALSE;
-      cblas_dspmv(CblasColMajor, CblasUpper, 0, 
+      cblas_dspmv(CblasColMajor, CblasUpper, 0,
                   ALPHA, A, X, 1, BETA, Y, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dspmv(CblasRowMajor, INVALID, 0, 
+      cblas_dspmv(CblasRowMajor, INVALID, 0,
                   ALPHA, A, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dspmv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dspmv(CblasRowMajor, CblasUpper, INVALID,
                   ALPHA, A, X, 1, BETA, Y, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = TRUE;
-      cblas_dspmv(CblasRowMajor, CblasUpper, 0, 
+      cblas_dspmv(CblasRowMajor, CblasUpper, 0,
                   ALPHA, A, X, 0, BETA, Y, 1 );
       chkxer();
       cblas_info = 10; RowMajorStrg = TRUE;
-      cblas_dspmv(CblasRowMajor, CblasUpper, 0, 
+      cblas_dspmv(CblasRowMajor, CblasUpper, 0,
                   ALPHA, A, X, 1, BETA, Y, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dtrmv",11)==0) {
       cblas_rout = "cblas_dtrmv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dtrmv(INVALID, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(INVALID, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dtrmv(CblasColMajor, INVALID, CblasNoTrans, 
+      cblas_dtrmv(CblasColMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dtrmv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dtrmv(CblasColMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = FALSE;
-      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 2, A, 1, X, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = FALSE;
-      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dtrmv(CblasRowMajor, INVALID, CblasNoTrans, 
+      cblas_dtrmv(CblasRowMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dtrmv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dtrmv(CblasRowMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = TRUE;
-      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 2, A, 1, X, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = TRUE;
-      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dtbmv",11)==0) {
       cblas_rout = "cblas_dtbmv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dtbmv(INVALID, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(INVALID, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, INVALID, CblasNoTrans, 
+      cblas_dtbmv(CblasColMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dtbmv(CblasColMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 1, A, 1, X, 1 );
       chkxer();
       cblas_info = 10; RowMajorStrg = FALSE;
-      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, INVALID, CblasNoTrans, 
+      cblas_dtbmv(CblasRowMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dtbmv(CblasRowMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 1, A, 1, X, 1 );
       chkxer();
       cblas_info = 10; RowMajorStrg = TRUE;
-      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dtpmv",11)==0) {
       cblas_rout = "cblas_dtpmv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dtpmv(INVALID, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(INVALID, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dtpmv(CblasColMajor, INVALID, CblasNoTrans, 
+      cblas_dtpmv(CblasColMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dtpmv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dtpmv(CblasColMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dtpmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dtpmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = FALSE;
-      cblas_dtpmv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dtpmv(CblasRowMajor, INVALID, CblasNoTrans, 
+      cblas_dtpmv(CblasRowMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dtpmv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dtpmv(CblasRowMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dtpmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dtpmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = TRUE;
-      cblas_dtpmv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpmv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dtrsv",11)==0) {
       cblas_rout = "cblas_dtrsv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dtrsv(INVALID, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(INVALID, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dtrsv(CblasColMajor, INVALID, CblasNoTrans, 
+      cblas_dtrsv(CblasColMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dtrsv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dtrsv(CblasColMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = FALSE;
-      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 2, A, 1, X, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = FALSE;
-      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dtrsv(CblasRowMajor, INVALID, CblasNoTrans, 
+      cblas_dtrsv(CblasRowMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dtrsv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dtrsv(CblasRowMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 7; RowMajorStrg = TRUE;
-      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 2, A, 1, X, 1 );
       chkxer();
       cblas_info = 9; RowMajorStrg = TRUE;
-      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtrsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, 1, X, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dtbsv",11)==0) {
       cblas_rout = "cblas_dtbsv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dtbsv(INVALID, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(INVALID, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, INVALID, CblasNoTrans, 
+      cblas_dtbsv(CblasColMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dtbsv(CblasColMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 1, A, 1, X, 1 );
       chkxer();
       cblas_info = 10; RowMajorStrg = FALSE;
-      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, INVALID, CblasNoTrans, 
+      cblas_dtbsv(CblasRowMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dtbsv(CblasRowMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, 0, A, 1, X, 1 );
       chkxer();
       cblas_info = 6; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, INVALID, A, 1, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 1, A, 1, X, 1 );
       chkxer();
       cblas_info = 10; RowMajorStrg = TRUE;
-      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtbsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, 0, A, 1, X, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dtpsv",11)==0) {
       cblas_rout = "cblas_dtpsv";
       cblas_info = 1; RowMajorStrg = FALSE;
-      cblas_dtpsv(INVALID, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(INVALID, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 2; RowMajorStrg = FALSE;
-      cblas_dtpsv(CblasColMajor, INVALID, CblasNoTrans, 
+      cblas_dtpsv(CblasColMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = FALSE;
-      cblas_dtpsv(CblasColMajor, CblasUpper, INVALID, 
+      cblas_dtpsv(CblasColMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = FALSE;
-      cblas_dtpsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = FALSE;
-      cblas_dtpsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = FALSE;
-      cblas_dtpsv(CblasColMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(CblasColMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 0 );
       chkxer();
       cblas_info = 2; RowMajorStrg = TRUE;
-      cblas_dtpsv(CblasRowMajor, INVALID, CblasNoTrans, 
+      cblas_dtpsv(CblasRowMajor, INVALID, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 3; RowMajorStrg = TRUE;
-      cblas_dtpsv(CblasRowMajor, CblasUpper, INVALID, 
+      cblas_dtpsv(CblasRowMajor, CblasUpper, INVALID,
                   CblasNonUnit, 0, A, X, 1 );
       chkxer();
       cblas_info = 4; RowMajorStrg = TRUE;
-      cblas_dtpsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   INVALID, 0, A, X, 1 );
       chkxer();
       cblas_info = 5; RowMajorStrg = TRUE;
-      cblas_dtpsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, INVALID, A, X, 1 );
       chkxer();
       cblas_info = 8; RowMajorStrg = TRUE;
-      cblas_dtpsv(CblasRowMajor, CblasUpper, CblasNoTrans, 
+      cblas_dtpsv(CblasRowMajor, CblasUpper, CblasNoTrans,
                   CblasNonUnit, 0, A, X, 0 );
       chkxer();
    } else if (strncmp( sf,"cblas_dger",10)==0) {
@@ -781,7 +781,7 @@ void F77_d2chke(char *rout) {
       cblas_info = 6; RowMajorStrg = FALSE;
       cblas_dspr(CblasColMajor, CblasUpper, 0, ALPHA, X, 0, A );
       chkxer();
-   } 
+   }
    if (cblas_ok == TRUE)
        printf(" %-12s PASSED THE TESTS OF ERROR-EXITS\n", cblas_rout);
    else