diff --git a/coreblas/compute/core_zgeadd.c b/coreblas/compute/core_zgeadd.c index 259f4b61df3ec94dc9fdb43bf09c4dedbe45bf1c..aa7c965cea5b6faff1119e1b5638926c3a43703d 100644 --- a/coreblas/compute/core_zgeadd.c +++ b/coreblas/compute/core_zgeadd.c @@ -93,9 +93,7 @@ int CORE_zgeadd(MORSE_enum trans, int M, int N, { int i, j; - if ((trans != MorseNoTrans) && - (trans != MorseTrans) && - (trans != MorseConjTrans)) + if ((trans < MorseNoTrans) || (trans > MorseConjTrans)) { coreblas_error(1, "illegal value of trans"); return -1; diff --git a/coreblas/compute/core_zlatro.c b/coreblas/compute/core_zlatro.c index 85c630ed1e236715e87c411793acbf3782925e84..ea97320c376d8d4e7a03d818890cc1d2ec94dbd3 100644 --- a/coreblas/compute/core_zlatro.c +++ b/coreblas/compute/core_zlatro.c @@ -99,7 +99,7 @@ int CORE_zlatro(MORSE_enum uplo, MORSE_enum trans, coreblas_error(1, "Illegal value of uplo"); return -1; } - if ((trans != MorseConjTrans) && (trans != MorseNoTrans) && (trans != MorseTrans) ) { + if ((trans < MorseNoTrans) || (trans > MorseConjTrans)) { coreblas_error(2, "Illegal value of trans"); return -2; } diff --git a/coreblas/compute/core_zpemv.c b/coreblas/compute/core_zpemv.c index 5cd8a128b53ec37351738b9c70704044e0632b88..85ffd5a3b430917c6eb3818e8e0a866bed5a96f1 100644 --- a/coreblas/compute/core_zpemv.c +++ b/coreblas/compute/core_zpemv.c @@ -146,7 +146,7 @@ int CORE_zpemv(MORSE_enum trans, int storev, /* Check input arguments */ - if ((trans != MorseNoTrans) && (trans != MorseTrans) && (trans != MorseConjTrans)) { + if ((trans < MorseNoTrans) || (trans > MorseConjTrans)) { coreblas_error(1, "Illegal value of trans"); return -1; } diff --git a/coreblas/compute/core_ztradd.c b/coreblas/compute/core_ztradd.c index f14213b160c96d5b81fb48dd146a8e8ad382401c..ab5b9ea5999470167b4d750b78e0e55d9416927c 100644 --- a/coreblas/compute/core_ztradd.c +++ b/coreblas/compute/core_ztradd.c @@ -118,9 +118,7 @@ int CORE_ztradd(MORSE_enum uplo, MORSE_enum trans, int M, int N, return -1; } - if ((trans != MorseNoTrans) && - (trans != MorseTrans) && - (trans != MorseConjTrans)) + if ((trans < MorseNoTrans) || (trans > MorseConjTrans)) { coreblas_error(2, "illegal value of trans"); return -2;