ParMooN
Main Page
Related Pages
Classes
Files
File List
All
Classes
Functions
Variables
Friends
Pages
include
PBE
BrAgg.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
* v,
double
* grad_v,
double
* temp,
double
* output,
double
* grid,
double
L_max,
double
f_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
}
Generated on Tue May 10 2016 09:08:01 for ParMooN by
1.8.5