C++ (Cpp) DOUBLECASTの例

コード例 #1

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __ddot_sub__(const int* N, double* X, const int* incX, double* Y, const int* incY, double* dot) {
    *dot = EigenFunc_ddot(INTCAST(N), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Y), INTCAST(incY));
}

コード例 #2

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __idamax_sub__(const int* N, double* X, const int* incX, int* iamax) {
    *iamax = EigenFunc_idamax(INTCAST(N), DOUBLECAST(X), INTCAST(incX));
}

コード例 #3

ファイル: blasCDouble.cpp プロジェクト: Crobin83/WinObjC

void __zherk__(char* Uplo, char* Trans, const int* N, const int* K, const double* alpha, const void* A, const int* lda, 
               const double* beta, void* C, const int* ldc) {
    EigenFunc_zherk(Uplo, Trans, INTCAST(N), INTCAST(K), DOUBLECAST(alpha), VDOUBLECAST(A), INTCAST(lda), DOUBLECAST(beta), 
                    RDOUBLECAST(C), INTCAST(ldc));
}

コード例 #4

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dtrsm__(char* Side, char* Uplo, char* TransA, char* Diag, const int* M, const int* N, const double* alpha, const double* A, 
               const int* lda, double* B, const int* ldb) {
    EigenFunc_dtrsm(Side, Uplo, TransA, Diag, INTCAST(M), INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(A), INTCAST(lda), DOUBLECAST(B),
                    INTCAST(ldb));
}

コード例 #5

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __drotg__(double* a, double* b, double* c, double* s) {
    EigenFunc_drotg(DOUBLECAST(a), DOUBLECAST(b), DOUBLECAST(c), DOUBLECAST(s));
}

コード例 #6

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dscal__(const int* N, const double* alpha, double* X, const int* incX) {
    EigenFunc_dscal(INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(X), INTCAST(incX));
}

コード例 #7

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dspr__(char* Uplo, const int* N, const double* alpha, const double* X, const int* incX, double* Ap) {
    EigenFunc_dspr(Uplo, INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Ap));
}

コード例 #8

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dswap__(const int* N, double* X, const int* incX, double* Y, const int* incY) {
    EigenFunc_dswap(INTCAST(N), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Y), INTCAST(incY));
}

コード例 #9

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dsymv__(char* 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) {
    EigenFunc_dsymv(Uplo, INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(A), INTCAST(lda), DOUBLECAST(X), INTCAST(incX), 
                    DOUBLECAST(beta), DOUBLECAST(Y), INTCAST(incY));
}

コード例 #10

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dger__(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) {
    EigenFunc_dger(INTCAST(M), INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Y), INTCAST(incY), 
                   DOUBLECAST(A), INTCAST(lda));
}

コード例 #11

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dtpsv__(char* Uplo, char* TransA, char* Diag, const int* N, const double* Ap, double* X, const int* incX) {
    EigenFunc_dtpsv(Uplo, TransA, Diag, INTCAST(N), DOUBLECAST(Ap), DOUBLECAST(X), INTCAST(incX));
}

コード例 #12

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dtbsv__(char* Uplo, char* TransA, char* Diag, const int* N, const int* K, const double* A, const int* lda, double* X, 
               const int* incX) {
    EigenFunc_dtbsv(Uplo, TransA, Diag, INTCAST(N), INTCAST(K), DOUBLECAST(A), INTCAST(lda), DOUBLECAST(X), INTCAST(incX));
}

コード例 #13

ファイル: blasCDouble.cpp プロジェクト: Crobin83/WinObjC

void cblas_zdrot(const int N, void* X, const int incX, void* Y, const int incY, const double c, const double s) {
    EigenFunc_zdrot(INTCAST(&N), VDOUBLECAST(X), INTCAST(&incX), VDOUBLECAST(Y), INTCAST(&incY), DOUBLECAST(&c), DOUBLECAST(&s));
}

コード例 #14

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dasum_sub__(const int* N, const double* X, const int* incX, double* asum) {
    *asum = EigenFunc_dasum(INTCAST(N), DOUBLECAST(X), INTCAST(incX));
}

コード例 #15

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dspr2__(char* Uplo, const int* N, const double* alpha, const double* X, const int* incX, const double* Y, const int* incY, 
               double* A) {
    EigenFunc_dspr2(Uplo, INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Y), INTCAST(incY), DOUBLECAST(A));
}

コード例 #16

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dnrm2_sub__(const int* N, double* X, const int* incX, double* nrm2) {
    *nrm2 = EigenFunc_dnrm2(INTCAST(N), DOUBLECAST(X), INTCAST(incX));
}

コード例 #17

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dgemm__(char* TransA, char* 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) {
    EigenFunc_dgemm(TransA, TransB, INTCAST(M), INTCAST(N), INTCAST(K), DOUBLECAST(alpha), DOUBLECAST(A), 
                    INTCAST(lda), DOUBLECAST(B), INTCAST(ldb), DOUBLECAST(beta), DOUBLECAST(C), INTCAST(ldc));
}

コード例 #18

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __daxpy__(const int* N, const double* alpha, const double* X, const int* incX, double* Y, const int* incY) {
    EigenFunc_daxpy(INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Y), INTCAST(incY));
}

コード例 #19

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dsymm__(char* Side, char* 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) {
    EigenFunc_dsymm(Side, Uplo, INTCAST(M), INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(A), INTCAST(lda), 
                    DOUBLECAST(B), INTCAST(ldb), DOUBLECAST(beta), DOUBLECAST(C), INTCAST(ldc));
}

コード例 #20

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __drot__(const int* N, double* X, const int* incX, double* Y, const int* incY, const double* c, const double* s) {
    EigenFunc_drot(INTCAST(N), DOUBLECAST(X), INTCAST(incX), DOUBLECAST(Y), INTCAST(incY), DOUBLECAST(c), DOUBLECAST(s));
}

コード例 #21

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dsyr2k__(char* Uplo, char* 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) {
    EigenFunc_dsyr2k(Uplo, Trans, INTCAST(N), INTCAST(K), DOUBLECAST(alpha), DOUBLECAST(A), INTCAST(lda), 
                     DOUBLECAST(B), INTCAST(ldb), DOUBLECAST(beta), DOUBLECAST(C), INTCAST(ldc));
}

コード例 #22

ファイル: blasDouble.cpp プロジェクト: Acorld/WinObjC-Heading

void __dgemv__(char* 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) {
    EigenFunc_dgemv(TransA, INTCAST(M), INTCAST(N), DOUBLECAST(alpha), DOUBLECAST(A), INTCAST(lda), DOUBLECAST(X),
                    INTCAST(incX), DOUBLECAST(beta), DOUBLECAST(Y), INTCAST(incY));
}

コード例 #23

ファイル: blasCDouble.cpp プロジェクト: Crobin83/WinObjC

void __zhpr__(char* Uplo, const int* N, const double* alpha, const void* X, const int* incX, void* A) {
    EigenFunc_zhpr(Uplo, INTCAST(N), DOUBLECAST(alpha), VDOUBLECAST(X), INTCAST(incX), RDOUBLECAST(A));
}