275     static void validateGEMV(Element e, int TransA, Allocation A, Allocation X, int incX, Allocation Y, int incY) {
288         if (incX <= 0 || incY <= 0) {
294             expectedYDim = 1 + (M - 1) * incY;
297             expectedYDim = 1 + (N - 1) * incY;
318      * @param incY The increment for the elements of vector y, must be larger than zero.
320     public void SGEMV(@Transpose int TransA, float alpha, Allocation A, Allocation X, int incX, float beta, Allocation Y, int incY) {
321         validateGEMV(Element.F32(mRS), TransA, A, X, incX, Y, incY);
324         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_sgemv, TransA, 0, 0, 0, 0, M, N, 0, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
340      * @param incY The increment for the elements of vector y, must be larger than zero.
342     public void DGEMV(@Transpose int TransA, double alpha, Allocation A, Allocation X, int incX, double beta, Allocation Y, int incY) {
343         validateGEMV(Element.F64(mRS), TransA, A, X, incX, Y, incY);
346         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dgemv, TransA, 0, 0, 0, 0, M, N, 0, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
362      * @param incY The increment for the elements of vector y, must be larger than zero.
364     public void CGEMV(@Transpose int TransA, Float2 alpha, Allocation A, Allocation X, int incX, Float2 beta, Allocation Y, int incY) {
365         validateGEMV(Element.F32_2(mRS), TransA, A, X, incX, Y, incY);
368         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_cgemv, TransA, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
384      * @param incY The increment for the elements of vector y, must be larger than zero.
386     public void ZGEMV(@Transpose int TransA, Double2 alpha, Allocation A, Allocation X, int incX, Double2 beta, Allocation Y, int incY) {
387         validateGEMV(Element.F64_2(mRS), TransA, A, X, incX, Y, incY);
390         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zgemv, TransA, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
415      * @param incY The increment for the elements of vector y, must be larger than zero.
417     public void SGBMV(@Transpose int TransA, int KL, int KU, float alpha, Allocation A, Allocation X, int incX, float beta, Allocation Y, int incY) {
419         validateGEMV(Element.F32(mRS), TransA, A, X, incX, Y, incY);
425         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_sgbmv, TransA, 0, 0, 0, 0, M, N, 0, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, KL, KU);
450      * @param incY The increment for the elements of vector y, must be larger than zero.
452     public void DGBMV(@Transpose int TransA, int KL, int KU, double alpha, Allocation A, Allocation X, int incX, double beta, Allocation Y, int incY) {
454         validateGEMV(Element.F64(mRS), TransA, A, X, incX, Y, incY);
460         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dgbmv, TransA, 0, 0, 0, 0, M, N, 0, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, KL, KU);
485      * @param incY The increment for the elements of vector y, must be larger than zero.
487     public void CGBMV(@Transpose int TransA, int KL, int KU, Float2 alpha, Allocation A, Allocation X, int incX, Float2 beta, Allocation Y, int incY) {
489         validateGEMV(Element.F32_2(mRS), TransA, A, X, incX, Y, incY);
495         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_cgbmv, TransA, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, KL, KU);
520      * @param incY The increment for the elements of vector y, must be larger than zero.
522     public void ZGBMV(@Transpose int TransA, int KL, int KU, Double2 alpha, Allocation A, Allocation X, int incX, Double2 beta, Allocation Y, int incY) {
524         validateGEMV(Element.F64_2(mRS), TransA, A, X, incX, Y, incY);
530         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zgbmv, TransA, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, KL, KU);
1213     static int validateSYMV(Element e, @Uplo int Uplo, Allocation A, Allocation X, Allocation Y, int incX, int incY) {
1228         if (incX <= 0 || incY <= 0) {
1235         int expectedYDim = 1 + (N - 1) * incY;
1241     static int validateSPMV(Element e, @Uplo int Uplo, Allocation Ap, Allocation X, int incX, Allocation Y, int incY) {
1260         if (incX <= 0 || incY <= 0) {
1267         int expectedYDim = 1 + (N - 1) * incY;
1274     static void validateGER(Element e, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1291         if (incX <= 0 || incY <= 0) {
1298         int expectedYDim = 1 + (N - 1) * incY;
1358     static int validateSYR2(Element e, @Uplo int Uplo, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1375         if (incX <= 0 || incY <= 0) {
1379         int expectedYDim = 1 + (N - 1) * incY;
1386     static int validateSPR2(Element e, @Uplo int Uplo, Allocation X, int incX, Allocation Y, int incY, Allocation Ap) {
1405         if (incX <= 0 || incY <= 0) {
1409         int expectedYDim = 1 + (N - 1) * incY;
1430      * @param incY The increment for the elements of vector y, must be larger than zero.
1432     public void SSYMV(@Uplo int Uplo, float alpha, Allocation A, Allocation X, int incX, float beta, Allocation Y, int incY) {
1433         int N = validateSYMV(Element.F32(mRS), Uplo, A, X, Y, incX, incY);
1434         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_ssymv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
1458      * @param incY The increment for the elements of vector y, must be larger than zero.
1460     public void SSBMV(@Uplo int Uplo, int K, float alpha, Allocation A, Allocation X, int incX, float beta, Allocation Y, int incY) {
1465         int N = validateSYMV(Element.F32(mRS), Uplo, A, X, Y, incX, incY);
1466         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_ssbmv, 0, 0, 0, Uplo, 0, 0, N, K, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
1490      * @param incY The increment for the elements of vector y, must be larger than zero.
1492     public void SSPMV(@Uplo int Uplo, float alpha, Allocation Ap, Allocation X, int incX, float beta, Allocation Y, int incY) {
1493         int N = validateSPMV(Element.F32(mRS), Uplo, Ap, X, incX, Y, incY);
1494         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_sspmv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, Ap.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
1507      * @param incY The increment for the elements of vector y, must be larger than zero.
1510     public void SGER(float alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1513         validateGER(Element.F32(mRS), X, incX, Y, incY, A);
1514         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_sger, 0, 0, 0, 0, 0, M, N, 0, alpha, X.getID(mRS), Y.getID(mRS), 0.f, A.getID(mRS), incX, incY, 0, 0);
1570      * @param incY The increment for the elements of vector y, must be larger than zero.
1573     public void SSYR2(@Uplo int Uplo, float alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1574         int N = validateSYR2(Element.F32(mRS), Uplo, X, incX, Y, incY, A);
1575         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_ssyr2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, X.getID(mRS), Y.getID(mRS), 0, A.getID(mRS), incX, incY, 0, 0);
1597      * @param incY The increment for the elements of vector y, must be larger than zero.
1600     public void SSPR2(@Uplo int Uplo, float alpha, Allocation X, int incX, Allocation Y, int incY, Allocation Ap) {
1601         int N = validateSPR2(Element.F32(mRS), Uplo, X, incX, Y, incY, Ap);
1602         mRS.nScriptIntrinsicBLAS_Single(getID(mRS), RsBlas_sspr2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, X.getID(mRS), Y.getID(mRS), 0, Ap.getID(mRS), incX, incY, 0, 0);
1618      * @param incY The increment for the elements of vector y, must be larger than zero.
1620     public void DSYMV(@Uplo int Uplo, double alpha, Allocation A, Allocation X, int incX, double beta, Allocation Y, int incY) {
1621         int N = validateSYMV(Element.F64(mRS), Uplo, A, X, Y, incX, incY);
1622         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dsymv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
1646      * @param incY The increment for the elements of vector y, must be larger than zero.
1648     public void DSBMV(@Uplo int Uplo, int K, double alpha, Allocation A, Allocation X, int incX, double beta, Allocation Y, int incY) {
1653         int N = validateSYMV(Element.F64(mRS), Uplo, A, X, Y, incX, incY);
1654         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dsbmv, 0, 0, 0, Uplo, 0, 0, N, K, alpha, A.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
1678      * @param incY The increment for the elements of vector y, must be larger than zero.
1680     public void DSPMV(@Uplo int Uplo, double alpha, Allocation Ap, Allocation X, int incX, double beta, Allocation Y, int incY) {
1681         int N = validateSPMV(Element.F64(mRS), Uplo, Ap, X, incX, Y, incY);
1682         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dspmv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, Ap.getID(mRS), X.getID(mRS), beta, Y.getID(mRS), incX, incY, 0, 0);
1695      * @param incY The increment for the elements of vector y, must be larger than zero.
1698     public void DGER(double alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1701         validateGER(Element.F64(mRS), X, incX, Y, incY, A);
1702         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dger, 0, 0, 0, 0, 0, M, N, 0, alpha, X.getID(mRS), Y.getID(mRS), 0.f, A.getID(mRS), incX, incY, 0, 0);
1758      * @param incY The increment for the elements of vector y, must be larger than zero.
1761     public void DSYR2(@Uplo int Uplo, double alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1762         int N = validateSYR2(Element.F64(mRS), Uplo, X, incX, Y, incY, A);
1763         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dsyr2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, X.getID(mRS), Y.getID(mRS), 0, A.getID(mRS), incX, incY, 0, 0);
1785      * @param incY The increment for the elements of vector y, must be larger than zero.
1788     public void DSPR2(@Uplo int Uplo, double alpha, Allocation X, int incX, Allocation Y, int incY, Allocation Ap) {
1789         int N = validateSPR2(Element.F64(mRS), Uplo, X, incX, Y, incY, Ap);
1790         mRS.nScriptIntrinsicBLAS_Double(getID(mRS), RsBlas_dspr2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha, X.getID(mRS), Y.getID(mRS), 0, Ap.getID(mRS), incX, incY, 0, 0);
1798     static void validateGERU(Element e, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1810         if (incX <= 0 || incY <= 0) {
1817         int expectedYDim = 1 + (N - 1) * incY;
1837      * @param incY The increment for the elements of vector y, must be larger than zero.
1839     public void CHEMV(@Uplo int Uplo, Float2 alpha, Allocation A, Allocation X, int incX, Float2 beta, Allocation Y, int incY) {
1841         int N = validateSYR2(Element.F32_2(mRS), Uplo, X, incX, Y, incY, A);
1842         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_chemv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
1866      * @param incY The increment for the elements of vector y, must be larger than zero.
1868     public void CHBMV(@Uplo int Uplo, int K, Float2 alpha, Allocation A, Allocation X, int incX, Float2 beta, Allocation Y, int incY) {
1870         int N = validateSYR2(Element.F32_2(mRS), Uplo, X, incX, Y, incY, A);
1874         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_chbmv, 0, 0, 0, Uplo, 0, 0, N, K, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
1898      * @param incY The increment for the elements of vector y, must be larger than zero.
1900     public void CHPMV(@Uplo int Uplo, Float2 alpha, Allocation Ap, Allocation X, int incX, Float2 beta, Allocation Y, int incY) {
1902         int N = validateSPR2(Element.F32_2(mRS), Uplo, X, incX, Y, incY, Ap);
1903         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_chpmv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, Ap.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
1916      * @param incY The increment for the elements of vector y, must be larger than zero.
1919     public void CGERU(Float2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1920         validateGERU(Element.F32_2(mRS), X, incX, Y, incY, A);
1923         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_cgeru, 0, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, A.getID(mRS), incX, incY, 0, 0);
1936      * @param incY The increment for the elements of vector y, must be larger than zero.
1939     public void CGERC(Float2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
1941         validateGERU(Element.F32_2(mRS), X, incX, Y, incY, A);
1944         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_cgerc, 0, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, A.getID(mRS), incX, incY, 0, 0);
2002      * @param incY The increment for the elements of vector y, must be larger than zero.
2005     public void CHER2(@Uplo int Uplo, Float2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
2007         int N = validateSYR2(Element.F32_2(mRS), Uplo, X, incX, Y, incY, A);
2008         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_cher2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, A.getID(mRS), incX, incY, 0, 0);
2030      * @param incY The increment for the elements of vector y, must be larger than zero.
2033     public void CHPR2(@Uplo int Uplo, Float2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation Ap) {
2035         int N = validateSPR2(Element.F32_2(mRS), Uplo, X, incX, Y, incY, Ap);
2036         mRS.nScriptIntrinsicBLAS_Complex(getID(mRS), RsBlas_chpr2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, Ap.getID(mRS), incX, incY, 0, 0);
2052      * @param incY The increment for the elements of vector y, must be larger than zero.
2054     public void ZHEMV(@Uplo int Uplo, Double2 alpha, Allocation A, Allocation X, int incX, Double2 beta, Allocation Y, int incY) {
2056         int N = validateSYR2(Element.F64_2(mRS), Uplo, X, incX, Y, incY, A);
2057         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zhemv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
2081      * @param incY The increment for the elements of vector y, must be larger than zero.
2083     public void ZHBMV(@Uplo int Uplo, int K, Double2 alpha, Allocation A, Allocation X, int incX, Double2 beta, Allocation Y, int incY) {
2085         int N = validateSYR2(Element.F64_2(mRS), Uplo, X, incX, Y, incY, A);
2089         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zhbmv, 0, 0, 0, Uplo, 0, 0, N, K, alpha.x, alpha.y, A.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
2113      * @param incY The increment for the elements of vector y, must be larger than zero.
2115     public void ZHPMV(@Uplo int Uplo, Double2 alpha, Allocation Ap, Allocation X, int incX, Double2 beta, Allocation Y, int incY) {
2117         int N = validateSPR2(Element.F64_2(mRS), Uplo, X, incX, Y, incY, Ap);
2118         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zhpmv, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, Ap.getID(mRS), X.getID(mRS), beta.x, beta.y, Y.getID(mRS), incX, incY, 0, 0);
2131      * @param incY The increment for the elements of vector y, must be larger than zero.
2134     public void ZGERU(Double2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
2135         validateGERU(Element.F64_2(mRS), X, incX, Y, incY, A);
2138         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zgeru, 0, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, A.getID(mRS), incX, incY, 0, 0);
2151      * @param incY The increment for the elements of vector y, must be larger than zero.
2154     public void ZGERC(Double2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
2156         validateGERU(Element.F64_2(mRS), X, incX, Y, incY, A);
2159         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zgerc, 0, 0, 0, 0, 0, M, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, A.getID(mRS), incX, incY, 0, 0);
2217      * @param incY The increment for the elements of vector y, must be larger than zero.
2220     public void ZHER2(@Uplo int Uplo, Double2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation A) {
2222         int N = validateSYR2(Element.F64_2(mRS), Uplo, X, incX, Y, incY, A);
2223         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zher2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, A.getID(mRS), incX, incY, 0, 0);
2245      * @param incY The increment for the elements of vector y, must be larger than zero.
2248     public void ZHPR2(@Uplo int Uplo, Double2 alpha, Allocation X, int incX, Allocation Y, int incY, Allocation Ap) {
2250         int N = validateSPR2(Element.F64_2(mRS), Uplo, X, incX, Y, incY, Ap);
2251         mRS.nScriptIntrinsicBLAS_Z(getID(mRS), RsBlas_zhpr2, 0, 0, 0, Uplo, 0, 0, N, 0, alpha.x, alpha.y, X.getID(mRS), Y.getID(mRS), 0, 0, Ap.getID(mRS), incX, incY, 0, 0);

Indexes created Sun Sep 10 09:05:34 CEST 2017