476      $                   LDAS, LX, LY, M, ML, MS, N, NARGS, NC, ND, NK,  local
507       NC = 0
597                               NC = NC + 1
626      $                              WRITE( NTRA, FMT = 9994 )NC, SNAME,
636      $                              WRITE( NTRA, FMT = 9995 )NC, SNAME,
745          WRITE( NOUT, FMT = 9999 )SNAME, NC
747          WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
754          WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
757          WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
822      $                   N, NARGS, NC, NK, NS  local
855       NC = 0
931                            NC = NC + 1
958      $                           WRITE( NTRA, FMT = 9993 )NC, SNAME,
966      $                           WRITE( NTRA, FMT = 9994 )NC, SNAME,
975      $                           WRITE( NTRA, FMT = 9995 )NC, SNAME,
1088          WRITE( NOUT, FMT = 9999 )SNAME, NC
1090          WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1097          WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1100          WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1103          WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1167      $                   KS, LAA, LDA, LDAS, LX, N, NARGS, NC, NK, NS  local
1202       NC = 0
1272                         NC = NC + 1
1295      $                           WRITE( NTRA, FMT = 9993 )NC, SNAME,
1303      $                           WRITE( NTRA, FMT = 9994 )NC, SNAME,
1311      $                           WRITE( NTRA, FMT = 9995 )NC, SNAME,
1321      $                           WRITE( NTRA, FMT = 9993 )NC, SNAME,
1329      $                           WRITE( NTRA, FMT = 9994 )NC, SNAME,
1337      $                           WRITE( NTRA, FMT = 9995 )NC, SNAME,
1454          WRITE( NOUT, FMT = 9999 )SNAME, NC
1456          WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1463          WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1466          WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1469          WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1533      $                   NC, ND, NS  local
1555       NC = 0
1616                      NC = NC + 1
1639      $                  WRITE( NTRA, FMT = 9994 )NC, SNAME, M, N,
1739          WRITE( NOUT, FMT = 9999 )SNAME, NC
1741          WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1750       WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1810      $                   LDA, LDAS, LJ, LX, N, NARGS, NC, NS  local
1841       NC = 0
1889                   NC = NC + 1
1909      $                  WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
1916      $                  WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2019          WRITE( NOUT, FMT = 9999 )SNAME, NC
2021          WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2031          WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
2033          WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2096      $                   NARGS, NC, NS  local
2127       NC = 0
2189                      NC = NC + 1
2213      $                     WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
2221      $                     WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2339          WRITE( NOUT, FMT = 9999 )SNAME, NC
2341          WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2351          WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2354          WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY