188      if (uplo != CblasUpper && uplo != CblasLower )  in F77_chbmv()
194         if (uplo == CblasUpper) {  in F77_chbmv()
249      if (uplo != CblasUpper && uplo != CblasLower )  in F77_chpmv()
257         if (uplo == CblasUpper) {  in F77_chpmv()
309      if (uplo != CblasUpper && uplo != CblasLower )  in F77_ctbmv()
315         if (uplo == CblasUpper) {  in F77_ctbmv()
373      if (uplo != CblasUpper && uplo != CblasLower )  in F77_ctbsv()
379         if (uplo == CblasUpper) {  in F77_ctbsv()
435      if (uplo != CblasUpper && uplo != CblasLower )  in F77_ctpmv()
442         if (uplo == CblasUpper) {  in F77_ctpmv()
490      if (uplo != CblasUpper && uplo != CblasLower )  in F77_ctpsv()
497      	if (uplo == CblasUpper) {  in F77_ctpsv()
600      if (uplo != CblasUpper && uplo != CblasLower )  in F77_chpr()
607         if (uplo == CblasUpper) {  in F77_chpr()
632         if (uplo == CblasUpper) {  in F77_chpr()
676      if (uplo != CblasUpper && uplo != CblasLower )  in F77_chpr2()
684         if (uplo == CblasUpper) {  in F77_chpr2()
709         if (uplo == CblasUpper) {  in F77_chpr2()