-
Notifications
You must be signed in to change notification settings - Fork 0
/
temp_gpu.cpp
101 lines (79 loc) · 2.33 KB
/
temp_gpu.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
#include <limits>
#include <string>
#include <fstream>
#include <iomanip>
#include <iostream>
#include <stdlib.h>
#include <armadillo>
#include <random>
#include <typeinfo>
#include <cuda_runtime.h>
#include "cublas_v2.h"
using namespace std;
using namespace arma;
int main() {
// rowvec a = ones<rowvec>(4);
int k = 2;
int l = 3;
cudaError_t cudaStat;
cublasStatus_t stat;
cublasHandle_t handle;
cout << "Creating Cublas Handler...";
stat = cublasCreate(&handle);
cout << " created.\n";
double al = 1.0;
double bet = 0.0;
// COMPUTE C = A*B -----
double* C = (double*) malloc(2 * 3 * sizeof(double)); // matrix 2 x 3
for (int i=0; i < 6; i++)
C[i] = 0.0;
cout << "C before: ";
for (int i=0; i < 2*3; i++)
cout << C[i] << ", ";
cout << "\n";
double* A = (double*) malloc(2 * 2 * 2 * sizeof(double)); // cube 2 x 2 x 2
A[0] = 2.0;
for (int i=1; i < 8; i++)
A[i] = A[i-1] + 1.0;
cout << "A before: ";
for (int i=0; i < 8; i++)
cout << A[i] << ", ";
cout << "\n";
double* dA;
cudaStat = cudaMalloc((void**)& dA, 2 * 2 * 2 * sizeof(double));
for (int i = 0; i < 2; i++) {
int ind = (2 * 2) * i;
double* dAi = &dA[ind];
stat = cublasSetMatrix(2, 2, sizeof(double), A, 2, dAi, 2);
}
cout << "A after: ";
for (int i=0; i < 8; i++)
cout << A[i] << ", ";
cout << "\n";
double* B = (double*) malloc(2 * 3 * sizeof(double)); // matrix 2 x 3
for (int i=0; i < 6; i++)
B[i] = 3.0;
cout << "B: ";
for (int i=0; i < 6; i++)
cout << B[i] << ", ";
cout << "\n";
double* dB;
cudaStat = cudaMalloc((void**)& dB, 2 * 3 * sizeof(double));
stat = cublasSetMatrix(2, 3, sizeof(double), B, 2, dB, 2);
double* dC;
cudaStat = cudaMalloc((void**)& dC, 2 * 3 * sizeof(double));
int ind = (2 * 2) * 1;
double* dAi = &dA[ind];
double* Ai = &A[ind];
cout << "Ai: ";
for (int i=0; i < 4; i++)
cout << Ai[i] << ", ";
cout << "\n";
stat = cublasDgemm(handle, CUBLAS_OP_N, CUBLAS_OP_N, 2, 3, 2, &al, dAi, 2, dB, 2, &bet, dC, 2);
stat = cublasGetMatrix(2, 3, sizeof(double), dC, 2, C, 2);
cout << "C after: ";
for (int i=0; i < 2*3; i++)
cout << C[i] << ", ";
cout << "\n";
// END ---------------
}