Lines Matching full:rout
8 void cblas_xerbla(int info, const char *rout, const char *form, ...)
18 if (strstr(rout,"gemm") != 0)
25 else if (strstr(rout,"symm") != 0 || strstr(rout,"hemm") != 0)
30 else if (strstr(rout,"trmm") != 0 || strstr(rout,"trsm") != 0)
35 else if (strstr(rout,"gemv") != 0)
40 else if (strstr(rout,"gbmv") != 0)
47 else if (strstr(rout,"ger") != 0)
54 else if ( (strstr(rout,"her2") != 0 || strstr(rout,"hpr2") != 0)
55 && strstr(rout,"her2k") == 0 )
62 fprintf(stderr, "Parameter %d to routine %s was incorrect\n", info, rout);
