diff --git a/lapack-netlib/LAPACKE/src/lapacke_clarfb.c b/lapack-netlib/LAPACKE/src/lapacke_clarfb.c index 8b1492bec..ed12b476e 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_clarfb.c +++ b/lapack-netlib/LAPACKE/src/lapacke_clarfb.c @@ -60,7 +60,7 @@ lapack_int LAPACKE_clarfb( int matrix_layout, char side, char trans, char direct ncols_v = ( !col && left ) ? m : ( ( !col && !left ) ? n : ( col ? k : 1 ) ); uplo = ( ( left && col ) || !( left || col ) ) ? 'l' : 'u'; - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { LAPACKE_xerbla( "LAPACKE_clarfb", -8 ); return -8; } diff --git a/lapack-netlib/LAPACKE/src/lapacke_clarfb_work.c b/lapack-netlib/LAPACKE/src/lapacke_clarfb_work.c index 90ff0851f..545769b83 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_clarfb_work.c +++ b/lapack-netlib/LAPACKE/src/lapacke_clarfb_work.c @@ -81,7 +81,7 @@ lapack_int LAPACKE_clarfb_work( int matrix_layout, char side, char trans, LAPACKE_xerbla( "LAPACKE_clarfb_work", info ); return info; } - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { info = -8; LAPACKE_xerbla( "LAPACKE_clarfb_work", info ); return info; diff --git a/lapack-netlib/LAPACKE/src/lapacke_dlarfb.c b/lapack-netlib/LAPACKE/src/lapacke_dlarfb.c index 82e8fae52..f4ddc62a5 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_dlarfb.c +++ b/lapack-netlib/LAPACKE/src/lapacke_dlarfb.c @@ -59,7 +59,7 @@ lapack_int LAPACKE_dlarfb( int matrix_layout, char side, char trans, char direct ncols_v = ( !col && left ) ? m : ( ( !col && !left ) ? n : ( col ? k : 1 ) ); uplo = ( ( left && col ) || !( left || col ) ) ? 'l' : 'u'; - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { LAPACKE_xerbla( "LAPACKE_dlarfb", -8 ); return -8; } diff --git a/lapack-netlib/LAPACKE/src/lapacke_dlarfb_work.c b/lapack-netlib/LAPACKE/src/lapacke_dlarfb_work.c index 1a68bf762..de444c146 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_dlarfb_work.c +++ b/lapack-netlib/LAPACKE/src/lapacke_dlarfb_work.c @@ -80,7 +80,7 @@ lapack_int LAPACKE_dlarfb_work( int matrix_layout, char side, char trans, LAPACKE_xerbla( "LAPACKE_dlarfb_work", info ); return info; } - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { info = -8; LAPACKE_xerbla( "LAPACKE_dlarfb_work", info ); return info; diff --git a/lapack-netlib/LAPACKE/src/lapacke_slarfb.c b/lapack-netlib/LAPACKE/src/lapacke_slarfb.c index 892648f4b..d36958f93 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_slarfb.c +++ b/lapack-netlib/LAPACKE/src/lapacke_slarfb.c @@ -59,7 +59,7 @@ lapack_int LAPACKE_slarfb( int matrix_layout, char side, char trans, char direct ncols_v = ( !col && left ) ? m : ( ( !col && !left ) ? n : ( col ? k : 1 ) ); uplo = ( ( left && col ) || !( left || col ) ) ? 'l' : 'u'; - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { LAPACKE_xerbla( "LAPACKE_slarfb", -8 ); return -8; } diff --git a/lapack-netlib/LAPACKE/src/lapacke_slarfb_work.c b/lapack-netlib/LAPACKE/src/lapacke_slarfb_work.c index d805a947a..8b6127633 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_slarfb_work.c +++ b/lapack-netlib/LAPACKE/src/lapacke_slarfb_work.c @@ -80,7 +80,7 @@ lapack_int LAPACKE_slarfb_work( int matrix_layout, char side, char trans, LAPACKE_xerbla( "LAPACKE_slarfb_work", info ); return info; } - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { info = -8; LAPACKE_xerbla( "LAPACKE_slarfb_work", info ); return info; diff --git a/lapack-netlib/LAPACKE/src/lapacke_zlarfb.c b/lapack-netlib/LAPACKE/src/lapacke_zlarfb.c index 25cedb506..85355b202 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_zlarfb.c +++ b/lapack-netlib/LAPACKE/src/lapacke_zlarfb.c @@ -60,7 +60,7 @@ lapack_int LAPACKE_zlarfb( int matrix_layout, char side, char trans, char direct ncols_v = ( !col && left ) ? m : ( ( !col && !left ) ? n : ( col ? k : 1 ) ); uplo = ( ( left && col ) || !( left || col ) ) ? 'l' : 'u'; - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { LAPACKE_xerbla( "LAPACKE_zlarfb", -8 ); return -8; } diff --git a/lapack-netlib/LAPACKE/src/lapacke_zlarfb_work.c b/lapack-netlib/LAPACKE/src/lapacke_zlarfb_work.c index 64eb05263..72d85ec82 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_zlarfb_work.c +++ b/lapack-netlib/LAPACKE/src/lapacke_zlarfb_work.c @@ -81,7 +81,7 @@ lapack_int LAPACKE_zlarfb_work( int matrix_layout, char side, char trans, LAPACKE_xerbla( "LAPACKE_zlarfb_work", info ); return info; } - if( !forward && ( col && k > nrows_v ) || ( !col && k > ncols_v )) { + if( ( col && k > nrows_v ) || ( !col && k > ncols_v ) ) { info = -8; LAPACKE_xerbla( "LAPACKE_zlarfb_work", info ); return info;