-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathsequential_heatmap_flipflop.cpp
170 lines (134 loc) · 6.57 KB
/
sequential_heatmap_flipflop.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
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
//COMMANDLINE PARAMETERS: int matrixsize; int number of iterations; int heatsource 1; int heatsource 2; int heatsource 3; int heatsource 4; double heat; double radius heatsource
#include <cmath>
#include <chrono>
#include <iostream>
double**** init_matrix(int d1, int d2, int d3, int d4); //reserves heap memory for the matrix and ititializes the matrix to 0.0
void delete_matrix(double**** matrix, int d1, int d2, int d3); //frees up the heap memory for the matrix when it isn't needed any longer to avoid memory leaks
double distance(int x0a, int x1a, int x2a, int x3a, int y0a, int y1a, int y2a, int y3a); //calculates the distance between point x and y with their respective 4d positions
void hf (double**** &G, int i, int j, int k, int l); //runs the defined heatfuntion on entry i,j,k,l of the given matrix
void hf_iterator(double**** &matrix, int size); //iterates over the whole matrix except the boundaries and calls the heatfunction
void hf_flipflop(double**** &matrix,double**** &matrix2, int size, int number_of_iterations);
void heater (int i, int j, int k , int l, double dist, double heat, int size, double**** matrix); //"heats up" all points in a radius "distance" around point i,j,k,l to "heat",
//size is the matrixlength in one dimension, matrix specifies the matrix to be altered
int main(int argc, char** argv) {
if (argc < 8) { //checks whether we have enough commandline paramters given
printf("Insufficient input parameters!\nCOMMANDLINE PARAMETERS: integer matrixsize, integer number of iterations,");
printf("integer heatsource 1, integer heatsource 2, integer heatsource 3, integer heatsource 4, doubleprecision floating point heat, doubleprecision floating point radius heatsource \n");
exit(1);
}
auto begin = std::chrono::high_resolution_clock::now();
int number_of_iterations = atoi(argv[2]);
int heatsourcepos1 = atoi(argv[3]);
int heatsourcepos2 = atoi(argv[4]);
int heatsourcepos3 = atoi(argv[5]);
int heatsourcepos4 = atoi(argv[6]);
double heat = atoi(argv[7]);
double radius = atoi(argv[8]);
int d1 = atoi(argv[1]);
int d2 = atoi(argv[1]);
int d3 = atoi(argv[1]);
int d4 = atoi(argv[1]);
double**** G = init_matrix(d1, d2, d3, d4);
double**** P = init_matrix(d1, d2, d3, d4);
heater(heatsourcepos1, heatsourcepos2, heatsourcepos3, heatsourcepos4, radius, heat, d1, G);
heater(heatsourcepos1, heatsourcepos2, heatsourcepos3, heatsourcepos4, radius, heat, d1, P);
hf_flipflop(G, P, d1, number_of_iterations);
/*int size = d1;
for (int index1 = 0; index1<size; index1++){
printf("\n");
printf("\n");
printf("\n");
for (int index2 = 0; index2<size;index2++){
printf("\n");
printf("\n");
for (int index3 = 0; index3<size;index3++){
printf("\n");
for (int index4 = 0; index4<size;index4++){
printf("%f ", P[index1][index2][index3][index4]);}}}}*/
delete_matrix(G, d1, d2, d3);
delete_matrix(P, d1, d2, d3);
auto end = std::chrono::high_resolution_clock::now();
std::cout << std::chrono::duration_cast<std::chrono::nanoseconds>(end-begin).count() << "ns" << std::endl;
}
double**** init_matrix(int d1, int d2, int d3, int d4) // function init_matrix reserves memory for a d1*d2*d3*d4 matrix on the heap and initializes the matrix values with 0.0
{
double**** matrix = (double****) malloc(sizeof(double***) * d1);
for (int i1 = 0; i1 < d1; i1++) {
matrix[i1] = (double***) malloc(sizeof(double**) * d2);
for (int i2 = 0; i2 < d2; i2++) {
matrix[i1][i2] = (double**) malloc(sizeof(double*) * d3);
for (int i3 = 0; i3 < d3; i3++) {
matrix[i1][i2][i3] = (double*) malloc(sizeof(double) * d4);
for (int i4 = 0; i4 < d4; i4++) {
matrix[i1][i2][i3][i4] = .0;
}
}
}
}
return matrix;
}
void delete_matrix(double**** matrix, int d1, int d2, int d3) // frees up the allocated memory of the matrix when we don't need it anymore
{
for (int i1 = 0; i1 < d1; i1++) {
for (int i2 = 0; i2 < d2; i2++) {
for (int i3 = 0; i3 < d3; i3++) {
free(matrix[i1][i2][i3]);
}
free(matrix[i1][i2]);
}
free(matrix[i1]);
}
free(matrix);
}
double distance(int x0a, int x1a, int x2a, int x3a, int y0a, int y1a, int y2a, int y3a) //function distance calculates the distance between two points in 4d, and takes the coordiantes of the first point as integers first, the ones of the other one second
{
double x0 = (int) x0a;
double x1 = (int) x1a;
double x2 = (int) x2a;
double x3 = (int) x3a;
double y0 = (int) y0a;
double y1 = (int) y1a;
double y2 = (int) y2a;
double y3 = (int) y3a;
double sq0 = pow(x0-y0, 2.0);
double sq1 = pow(x1-y1, 2.0);
double sq2 = pow(x2-y2, 2.0);
double sq3 = pow(x3-y3, 2.0);
return (sqrt(sq0+sq1+sq2+sq3));
}
void hf (double**** &G,double**** &matrix, int i, int j, int k, int l){ //defining the 4dimensional heatfunction
matrix[i][j][k][l] = G[i][j][k][l] + 0.123 * ((-8.0)*G[i][j][k][l]
+ G[i+1][j][k][l] + G[i-1][j][k][l] + G[i][j+1][k][l] + G[i][j-1][k][l]
+ G[i][j][k+1][l] + G[i][j][k-1][l] + G[i][j][k][l+1] + G[i][j][k][l-1]
);
}
void hf_iterator(double**** &matrix,double**** &matrix2, int size){
for (int index1 = 1; index1<size-1; index1++){
for (int index2 = 1; index2<size-1;index2++){
for (int index3 = 1; index3<size-1;index3++){
for (int index4 = 1; index4<size-1;index4++){
hf(matrix, matrix2, index1, index2, index3, index4);
}}}}}
void hf_flipflop(double**** &matrix,double**** &matrix2, int size, int number_of_iterations){
for (int t = 0; t < number_of_iterations; t++){
if ((t%2) == 0){
hf_iterator(matrix, matrix2, size);
}
else{
hf_iterator(matrix2, matrix, size);
}
}
}
void heater (int i, int j, int k , int l, double dist, double heat, int size, double**** matrix){ //first four parameters are the coordinates of the middle of the heatsphere, dist is the radius of the heatsphere, heat is its heat, size is the length of each matrix dimension and matrix is the Matrix itself
for (int index1 = 0; index1<size; index1++){
for (int index2 = 0; index2<size;index2++){
for (int index3 = 0; index3<size;index3++){
for (int index4 = 0; index4<size;index4++){
if (distance(i,j,k,l,index1, index2, index3, index4)<dist){
matrix[index1][index2][index3][index4]=heat;
}
}
}
}
}
}