ParMooN
 All Classes Functions Variables Friends Pages
interface.h
1 #include "aggregation.h"
2 //#include "timer.h"
3 #include "constants.h"
4 #include "MooNMD_Io.h"
5 
6 int apply_integral_operator(int nx, int ny, int nz, int na, double* input, double* grad_v, double* temp, double* output, double* grid, double L_max, double* params) {
7  static paggregation pa = new aggregation(0, L_max, na, nx, ny, nz, grid, params);
8 // print_vector(pa->psd.grid, pa->psd.n + 1);
9 
10  clear_vector(output, nx * ny * nz * na);
11 
12 // timer t;
13 // t.start_timer();
14 // scale_vector(input, nx * ny * nz * na, 1.0 / f_max);
15 // printf("Input norm is %g\n", euclidean_norm(input, na * nx * ny * nz));
16  pa->apply_aggregation(input, output, grad_v, temp);
17 // t.stop_timer();
18 // printf("Total time for aggregation was %g sec.\n", t.get_time());
19 // scale_vector(output, nx * ny * nz * na, 1.0 / f_max);
20 // print_vector(input, na);
21 // printf("\n\n");
22 // print_vector(output, na);
23 // printf("Output norm is %g\n\n", euclidean_norm(output, na * nx * ny * nz));
24 // pa->~Aggregation();
25 
26  //delete pa;
27 
28  return 0;
29 }