1 /** D bindings for GSL. 2 Authors: Chibisi Chima-Okereke 3 Copyright: Copyright (c) 2016, Chibisi Chima-Okereke. All rights reserved. 4 License: Boost License 1.0 5 */ 6 7 module gsl.cblas; 8 9 extern (C): 10 11 enum CBLAS_ORDER 12 { 13 CblasRowMajor = 101, 14 CblasColMajor = 102 15 } 16 17 enum CBLAS_TRANSPOSE 18 { 19 CblasNoTrans = 111, 20 CblasTrans = 112, 21 CblasConjTrans = 113 22 } 23 24 enum CBLAS_UPLO 25 { 26 CblasUpper = 121, 27 CblasLower = 122 28 } 29 30 enum CBLAS_DIAG 31 { 32 CblasNonUnit = 131, 33 CblasUnit = 132 34 } 35 36 enum CBLAS_SIDE 37 { 38 CblasLeft = 141, 39 CblasRight = 142 40 } 41 42 float cblas_sdsdot (const int N, const float alpha, const(float)* X, const int incX, const(float)* Y, const int incY); 43 double cblas_dsdot (const int N, const(float)* X, const int incX, const(float)* Y, const int incY); 44 float cblas_sdot (const int N, const(float)* X, const int incX, const(float)* Y, const int incY); 45 double cblas_ddot (const int N, const(double)* X, const int incX, const(double)* Y, const int incY); 46 void cblas_cdotu_sub (const int N, const(void)* X, const int incX, const(void)* Y, const int incY, void* dotu); 47 void cblas_cdotc_sub (const int N, const(void)* X, const int incX, const(void)* Y, const int incY, void* dotc); 48 void cblas_zdotu_sub (const int N, const(void)* X, const int incX, const(void)* Y, const int incY, void* dotu); 49 void cblas_zdotc_sub (const int N, const(void)* X, const int incX, const(void)* Y, const int incY, void* dotc); 50 float cblas_snrm2 (const int N, const(float)* X, const int incX); 51 float cblas_sasum (const int N, const(float)* X, const int incX); 52 double cblas_dnrm2 (const int N, const(double)* X, const int incX); 53 double cblas_dasum (const int N, const(double)* X, const int incX); 54 float cblas_scnrm2 (const int N, const(void)* X, const int incX); 55 float cblas_scasum (const int N, const(void)* X, const int incX); 56 double cblas_dznrm2 (const int N, const(void)* X, const int incX); 57 double cblas_dzasum (const int N, const(void)* X, const int incX); 58 size_t cblas_isamax (const int N, const(float)* X, const int incX); 59 size_t cblas_idamax (const int N, const(double)* X, const int incX); 60 size_t cblas_icamax (const int N, const(void)* X, const int incX); 61 size_t cblas_izamax (const int N, const(void)* X, const int incX); 62 void cblas_sswap (const int N, float* X, const int incX, float* Y, const int incY); 63 void cblas_scopy (const int N, const(float)* X, const int incX, float* Y, const int incY); 64 void cblas_saxpy (const int N, const float alpha, const(float)* X, const int incX, float* Y, const int incY); 65 void cblas_dswap (const int N, double* X, const int incX, double* Y, const int incY); 66 void cblas_dcopy (const int N, const(double)* X, const int incX, double* Y, const int incY); 67 void cblas_daxpy (const int N, const double alpha, const(double)* X, const int incX, double* Y, const int incY); 68 void cblas_cswap (const int N, void* X, const int incX, void* Y, const int incY); 69 void cblas_ccopy (const int N, const(void)* X, const int incX, void* Y, const int incY); 70 void cblas_caxpy (const int N, const(void)* alpha, const(void)* X, const int incX, void* Y, const int incY); 71 void cblas_zswap (const int N, void* X, const int incX, void* Y, const int incY); 72 void cblas_zcopy (const int N, const(void)* X, const int incX, void* Y, const int incY); 73 void cblas_zaxpy (const int N, const(void)* alpha, const(void)* X, const int incX, void* Y, const int incY); 74 void cblas_srotg (float* a, float* b, float* c, float* s); 75 void cblas_srotmg (float* d1, float* d2, float* b1, const float b2, float* P); 76 void cblas_srot (const int N, float* X, const int incX, float* Y, const int incY, const float c, const float s); 77 void cblas_srotm (const int N, float* X, const int incX, float* Y, const int incY, const(float)* P); 78 void cblas_drotg (double* a, double* b, double* c, double* s); 79 void cblas_drotmg (double* d1, double* d2, double* b1, const double b2, double* P); 80 void cblas_drot (const int N, double* X, const int incX, double* Y, const int incY, const double c, const double s); 81 void cblas_drotm (const int N, double* X, const int incX, double* Y, const int incY, const(double)* P); 82 void cblas_sscal (const int N, const float alpha, float* X, const int incX); 83 void cblas_dscal (const int N, const double alpha, double* X, const int incX); 84 void cblas_cscal (const int N, const(void)* alpha, void* X, const int incX); 85 void cblas_zscal (const int N, const(void)* alpha, void* X, const int incX); 86 void cblas_csscal (const int N, const float alpha, void* X, const int incX); 87 void cblas_zdscal (const int N, const double alpha, void* X, const int incX); 88 void cblas_sgemv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const float alpha, const(float)* A, const int lda, const(float)* X, const int incX, const float beta, float* Y, const int incY); 89 void cblas_sgbmv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const int KL, const int KU, const float alpha, const(float)* A, const int lda, const(float)* X, const int incX, const float beta, float* Y, const int incY); 90 void cblas_strmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(float)* A, const int lda, float* X, const int incX); 91 void cblas_stbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(float)* A, const int lda, float* X, const int incX); 92 void cblas_stpmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(float)* Ap, float* X, const int incX); 93 void cblas_strsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(float)* A, const int lda, float* X, const int incX); 94 void cblas_stbsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(float)* A, const int lda, float* X, const int incX); 95 void cblas_stpsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(float)* Ap, float* X, const int incX); 96 void cblas_dgemv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const double alpha, const(double)* A, const int lda, const(double)* X, const int incX, const double beta, double* Y, const int incY); 97 void cblas_dgbmv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const int KL, const int KU, const double alpha, const(double)* A, const int lda, const(double)* X, const int incX, const double beta, double* Y, const int incY); 98 void cblas_dtrmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(double)* A, const int lda, double* X, const int incX); 99 void cblas_dtbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(double)* A, const int lda, double* X, const int incX); 100 void cblas_dtpmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(double)* Ap, double* X, const int incX); 101 void cblas_dtrsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(double)* A, const int lda, double* X, const int incX); 102 void cblas_dtbsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(double)* A, const int lda, double* X, const int incX); 103 void cblas_dtpsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(double)* Ap, double* X, const int incX); 104 void cblas_cgemv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 105 void cblas_cgbmv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const int KL, const int KU, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 106 void cblas_ctrmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* A, const int lda, void* X, const int incX); 107 void cblas_ctbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(void)* A, const int lda, void* X, const int incX); 108 void cblas_ctpmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* Ap, void* X, const int incX); 109 void cblas_ctrsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* A, const int lda, void* X, const int incX); 110 void cblas_ctbsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(void)* A, const int lda, void* X, const int incX); 111 void cblas_ctpsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* Ap, void* X, const int incX); 112 void cblas_zgemv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 113 void cblas_zgbmv (const CBLAS_ORDER order, const CBLAS_TRANSPOSE TransA, const int M, const int N, const int KL, const int KU, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 114 void cblas_ztrmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* A, const int lda, void* X, const int incX); 115 void cblas_ztbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(void)* A, const int lda, void* X, const int incX); 116 void cblas_ztpmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* Ap, void* X, const int incX); 117 void cblas_ztrsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* A, const int lda, void* X, const int incX); 118 void cblas_ztbsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const int K, const(void)* A, const int lda, void* X, const int incX); 119 void cblas_ztpsv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int N, const(void)* Ap, void* X, const int incX); 120 void cblas_ssymv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(float)* A, const int lda, const(float)* X, const int incX, const float beta, float* Y, const int incY); 121 void cblas_ssbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const int K, const float alpha, const(float)* A, const int lda, const(float)* X, const int incX, const float beta, float* Y, const int incY); 122 void cblas_sspmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(float)* Ap, const(float)* X, const int incX, const float beta, float* Y, const int incY); 123 void cblas_sger (const CBLAS_ORDER order, const int M, const int N, const float alpha, const(float)* X, const int incX, const(float)* Y, const int incY, float* A, const int lda); 124 void cblas_ssyr (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(float)* X, const int incX, float* A, const int lda); 125 void cblas_sspr (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(float)* X, const int incX, float* Ap); 126 void cblas_ssyr2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(float)* X, const int incX, const(float)* Y, const int incY, float* A, const int lda); 127 void cblas_sspr2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(float)* X, const int incX, const(float)* Y, const int incY, float* A); 128 void cblas_dsymv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(double)* A, const int lda, const(double)* X, const int incX, const double beta, double* Y, const int incY); 129 void cblas_dsbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const int K, const double alpha, const(double)* A, const int lda, const(double)* X, const int incX, const double beta, double* Y, const int incY); 130 void cblas_dspmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(double)* Ap, const(double)* X, const int incX, const double beta, double* Y, const int incY); 131 void cblas_dger (const CBLAS_ORDER order, const int M, const int N, const double alpha, const(double)* X, const int incX, const(double)* Y, const int incY, double* A, const int lda); 132 void cblas_dsyr (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(double)* X, const int incX, double* A, const int lda); 133 void cblas_dspr (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(double)* X, const int incX, double* Ap); 134 void cblas_dsyr2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(double)* X, const int incX, const(double)* Y, const int incY, double* A, const int lda); 135 void cblas_dspr2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(double)* X, const int incX, const(double)* Y, const int incY, double* A); 136 void cblas_chemv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 137 void cblas_chbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 138 void cblas_chpmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* Ap, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 139 void cblas_cgeru (const CBLAS_ORDER order, const int M, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* A, const int lda); 140 void cblas_cgerc (const CBLAS_ORDER order, const int M, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* A, const int lda); 141 void cblas_cher (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(void)* X, const int incX, void* A, const int lda); 142 void cblas_chpr (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const float alpha, const(void)* X, const int incX, void* A); 143 void cblas_cher2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* A, const int lda); 144 void cblas_chpr2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* Ap); 145 void cblas_zhemv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 146 void cblas_zhbmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 147 void cblas_zhpmv (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* Ap, const(void)* X, const int incX, const(void)* beta, void* Y, const int incY); 148 void cblas_zgeru (const CBLAS_ORDER order, const int M, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* A, const int lda); 149 void cblas_zgerc (const CBLAS_ORDER order, const int M, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* A, const int lda); 150 void cblas_zher (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(void)* X, const int incX, void* A, const int lda); 151 void cblas_zhpr (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const double alpha, const(void)* X, const int incX, void* A); 152 void cblas_zher2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* A, const int lda); 153 void cblas_zhpr2 (const CBLAS_ORDER order, const CBLAS_UPLO Uplo, const int N, const(void)* alpha, const(void)* X, const int incX, const(void)* Y, const int incY, void* Ap); 154 void cblas_sgemm (const CBLAS_ORDER Order, const CBLAS_TRANSPOSE TransA, const CBLAS_TRANSPOSE TransB, const int M, const int N, const int K, const float alpha, const(float)* A, const int lda, const(float)* B, const int ldb, const float beta, float* C, const int ldc); 155 void cblas_ssymm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const int M, const int N, const float alpha, const(float)* A, const int lda, const(float)* B, const int ldb, const float beta, float* C, const int ldc); 156 void cblas_ssyrk (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const float alpha, const(float)* A, const int lda, const float beta, float* C, const int ldc); 157 void cblas_ssyr2k (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const float alpha, const(float)* A, const int lda, const(float)* B, const int ldb, const float beta, float* C, const int ldc); 158 void cblas_strmm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const float alpha, const(float)* A, const int lda, float* B, const int ldb); 159 void cblas_strsm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const float alpha, const(float)* A, const int lda, float* B, const int ldb); 160 void cblas_dgemm (const CBLAS_ORDER Order, const CBLAS_TRANSPOSE TransA, const CBLAS_TRANSPOSE TransB, const int M, const int N, const int K, const double alpha, const(double)* A, const int lda, const(double)* B, const int ldb, const double beta, double* C, const int ldc); 161 void cblas_dsymm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const int M, const int N, const double alpha, const(double)* A, const int lda, const(double)* B, const int ldb, const double beta, double* C, const int ldc); 162 void cblas_dsyrk (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const double alpha, const(double)* A, const int lda, const double beta, double* C, const int ldc); 163 void cblas_dsyr2k (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const double alpha, const(double)* A, const int lda, const(double)* B, const int ldb, const double beta, double* C, const int ldc); 164 void cblas_dtrmm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const double alpha, const(double)* A, const int lda, double* B, const int ldb); 165 void cblas_dtrsm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const double alpha, const(double)* A, const int lda, double* B, const int ldb); 166 void cblas_cgemm (const CBLAS_ORDER Order, const CBLAS_TRANSPOSE TransA, const CBLAS_TRANSPOSE TransB, const int M, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 167 void cblas_csymm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 168 void cblas_csyrk (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* beta, void* C, const int ldc); 169 void cblas_csyr2k (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 170 void cblas_ctrmm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, void* B, const int ldb); 171 void cblas_ctrsm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, void* B, const int ldb); 172 void cblas_zgemm (const CBLAS_ORDER Order, const CBLAS_TRANSPOSE TransA, const CBLAS_TRANSPOSE TransB, const int M, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 173 void cblas_zsymm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 174 void cblas_zsyrk (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* beta, void* C, const int ldc); 175 void cblas_zsyr2k (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 176 void cblas_ztrmm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, void* B, const int ldb); 177 void cblas_ztrsm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE TransA, const CBLAS_DIAG Diag, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, void* B, const int ldb); 178 void cblas_chemm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 179 void cblas_cherk (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const float alpha, const(void)* A, const int lda, const float beta, void* C, const int ldc); 180 void cblas_cher2k (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const float beta, void* C, const int ldc); 181 void cblas_zhemm (const CBLAS_ORDER Order, const CBLAS_SIDE Side, const CBLAS_UPLO Uplo, const int M, const int N, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const(void)* beta, void* C, const int ldc); 182 void cblas_zherk (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const double alpha, const(void)* A, const int lda, const double beta, void* C, const int ldc); 183 void cblas_zher2k (const CBLAS_ORDER Order, const CBLAS_UPLO Uplo, const CBLAS_TRANSPOSE Trans, const int N, const int K, const(void)* alpha, const(void)* A, const int lda, const(void)* B, const int ldb, const double beta, void* C, const int ldc); 184 void cblas_xerbla (int p, const(char)* rout, const(char)* form, ...);