可变大小阵列与LAPACK/BLAS

Variable Size array with LAPACK/BLAS

本文关键字:LAPACK BLAS 阵列      更新时间:2023-10-16

我的最后一个问题不是很清楚。所以再发一遍。我试图做矩阵乘法使用BLAS例程。由于我希望输入到dgemm的数组的大小是不固定的,我正在创建一个可变大小的数组。但这似乎不工作,因为我不断得到异常错误。我的代码如下:

#include "stdafx.h"
#include<iostream>
using namespace std;
extern "C" void dgemm_(const char *TRANSA, const char *TRANSB, const int *M, const int *N, const int *K, double *ALPHA, double **A, const int *LDA, double **B, const int *LDB, double *BETA, double **C, const int *LDC);
int main(void)
{
    int MatSize = 2;
    double **A= new double *[MatSize];
    double **B= new double *[MatSize]; 
    double **C= new double *[MatSize];
    for (int i=0; i<MatSize; i++)
    {
        A[i] = new double[MatSize];
        B[i] = new double[MatSize];
        C[i] = new double[MatSize];
    }
    A[0][0] =  1;
    A[0][1]= 2;
    A[1][0] = 1;
    A[1][1]=2;
    B[0][0] = -2;
    B[0][1]= 3;
    B[1][0]= 2;
    B[1][1]= 2;
    char TRANS = 'N';
    char TRANS2 = 'N';
    double ALPHA = 1;
    double BETA = 0;
    dgemm_(&TRANS, &TRANS, &MatSize, &MatSize, &MatSize, &ALPHA, A, &MatSize, B, &MatSize, &BETA, C, &MatSize);
    cout << C[0][0] << C[0][1] << endl;
    cout << C[1][0] << C[1][1] << endl;
    getchar();
    return 0;
}

任何意见都将大有帮助。

您尝试将数组的数组传递给dgemm,即指针的数组(指向数组)。当然这是不可能的,你必须传递一个双精度类型的数组。