testActivePair.c 22.1 KB
Newer Older
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
/*******************************************************************************
 * This file is part of SWIFT.
 * Copyright (C) 2015 Matthieu Schaller (matthieu.schaller@durham.ac.uk).
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as published
 * by the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 ******************************************************************************/
#include "../config.h"

/* Some standard headers. */
#include <fenv.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
26
#include <time.h>
James Willis's avatar
James Willis committed
27
#include <unistd.h>
28
29
30
31

/* Local headers. */
#include "swift.h"

32
33
#define NODE_ID 1

34
35
/* Typdef function pointer for interaction function. */
typedef void (*interaction_func)(struct runner *, struct cell *, struct cell *);
36
37
typedef void (*init_func)(struct cell *, const struct cosmology *);
typedef void (*finalise_func)(struct cell *, const struct cosmology *);
38

39
40
41
42
43
44
45
46
47
48
49
50
51
52
/**
 * @brief Constructs a cell and all of its particle in a valid state prior to
 * a DOPAIR or DOSELF calcuation.
 *
 * @param n The cube root of the number of particles.
 * @param offset The position of the cell offset from (0,0,0).
 * @param size The cell size.
 * @param h The smoothing length of the particles in units of the inter-particle
 * separation.
 * @param density The density of the fluid.
 * @param partId The running counter of IDs.
 * @param pert The perturbation to apply to the particles in the cell in units
 * of the inter-particle separation.
 * @param h_pert The perturbation to apply to the smoothing length.
53
54
 * @param fraction_active The fraction of particles that should be active in the
 * cell.
55
56
 */
struct cell *make_cell(size_t n, double *offset, double size, double h,
57
                       double density, long long *partId, double pert,
58
                       double h_pert, double fraction_active) {
59
60
  const size_t count = n * n * n;
  const double volume = size * size * size;
61
  float h_max = 0.f;
62
  struct cell *cell = (struct cell *)malloc(sizeof(struct cell));
63
64
65
66
67
68
69
70
71
72
73
74
75
76
  bzero(cell, sizeof(struct cell));

  if (posix_memalign((void **)&cell->parts, part_align,
                     count * sizeof(struct part)) != 0) {
    error("couldn't allocate particles, no. of particles: %d", (int)count);
  }
  bzero(cell->parts, count * sizeof(struct part));

  /* Construct the parts */
  struct part *part = cell->parts;
  for (size_t x = 0; x < n; ++x) {
    for (size_t y = 0; y < n; ++y) {
      for (size_t z = 0; z < n; ++z) {
        part->x[0] =
James Willis's avatar
James Willis committed
77
78
            offset[0] +
            size * (x + 0.5 + random_uniform(-0.5, 0.5) * pert) / (float)n;
79
        part->x[1] =
James Willis's avatar
James Willis committed
80
81
            offset[1] +
            size * (y + 0.5 + random_uniform(-0.5, 0.5) * pert) / (float)n;
82
        part->x[2] =
James Willis's avatar
James Willis committed
83
84
            offset[2] +
            size * (z + 0.5 + random_uniform(-0.5, 0.5) * pert) / (float)n;
85
86
87
        part->v[0] = random_uniform(-0.05, 0.05);
        part->v[1] = random_uniform(-0.05, 0.05);
        part->v[2] = random_uniform(-0.05, 0.05);
88
89
90
91
92
93

        if (h_pert)
          part->h = size * h * random_uniform(1.f, h_pert) / (float)n;
        else
          part->h = size * h / (float)n;
        h_max = fmaxf(h_max, part->h);
94
        part->id = ++(*partId);
95

96
/* Set the mass */
97
#if defined(GIZMO_MFV_SPH) || defined(SHADOWFAX_SPH)
98
        part->conserved.mass = density * volume / count;
99
100
101
102
103

#ifdef SHADOWFAX_SPH
        double anchor[3] = {0., 0., 0.};
        double side[3] = {1., 1., 1.};
        voronoi_cell_init(&part->cell, part->x, anchor, side);
104
#endif /* SHADOWFAX_SPH */
105

106
107
#else
        part->mass = density * volume / count;
108
#endif /* GIZMO_MFV_SPH */
109

110
111
112
/* Set the thermodynamic variable */
#if defined(GADGET2_SPH)
        part->entropy = 1.f;
113
#elif defined(MINIMAL_SPH) || defined(HOPKINS_PU_SPH)
114
115
        part->u = 1.f;
#elif defined(HOPKINS_PE_SPH)
116
117
118
        part->entropy = 1.f;
        part->entropy_one_over_gamma = 1.f;
#endif
119
120

        /* Set the time-bin */
James Willis's avatar
James Willis committed
121
122
        if (random_uniform(0, 1.f) < fraction_active)
          part->time_bin = 1;
123
124
        else
          part->time_bin = num_time_bins + 1;
125
126
127
128
129
130
131
132
133
134
135
136
137

#ifdef SWIFT_DEBUG_CHECKS
        part->ti_drift = 8;
        part->ti_kick = 8;
#endif

        ++part;
      }
    }
  }

  /* Cell properties */
  cell->split = 0;
138
  cell->h_max = h_max;
139
140
141
  cell->count = count;
  cell->dx_max_part = 0.;
  cell->dx_max_sort = 0.;
142
143
144
  cell->width[0] = size;
  cell->width[1] = size;
  cell->width[2] = size;
145
146
147
148
149
  cell->loc[0] = offset[0];
  cell->loc[1] = offset[1];
  cell->loc[2] = offset[2];

  cell->ti_old_part = 8;
150
151
  cell->ti_hydro_end_min = 8;
  cell->ti_hydro_end_max = 10;
Matthieu Schaller's avatar
Matthieu Schaller committed
152
  cell->nodeID = NODE_ID;
153
154
155
156

  shuffle_particles(cell->parts, cell->count);

  cell->sorted = 0;
James Willis's avatar
James Willis committed
157
  for (int k = 0; k < 13; k++) cell->sort[k] = NULL;
James Willis's avatar
James Willis committed
158

159
160
161
162
163
  return cell;
}

void clean_up(struct cell *ci) {
  free(ci->parts);
James Willis's avatar
James Willis committed
164
165
  for (int k = 0; k < 13; k++)
    if (ci->sort[k] != NULL) free(ci->sort[k]);
166
167
168
169
170
171
  free(ci);
}

/**
 * @brief Initializes all particles field to be ready for a density calculation
 */
172
173
void zero_particle_fields_density(struct cell *c,
                                  const struct cosmology *cosmo) {
174
175
176
177
178
  for (int pid = 0; pid < c->count; pid++) {
    hydro_init_part(&c->parts[pid], NULL);
  }
}

179
/**
180
 * @brief Initializes all particles field to be ready for a force calculation
181
 */
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
void zero_particle_fields_force(struct cell *c, const struct cosmology *cosmo) {
  for (int pid = 0; pid < c->count; pid++) {
    struct part *p = &c->parts[pid];
    struct xpart *xp = &c->xparts[pid];

/* Mimic the result of a density calculation */
#ifdef GADGET2_SPH
    p->rho = 1.f;
    p->density.rho_dh = 0.f;
    p->density.wcount = 48.f / (kernel_norm * pow_dimension(p->h));
    p->density.wcount_dh = 0.f;
    p->density.rot_v[0] = 0.f;
    p->density.rot_v[1] = 0.f;
    p->density.rot_v[2] = 0.f;
    p->density.div_v = 0.f;
197
#endif /* GADGET-2 */
198
199
200
201
202
#ifdef MINIMAL_SPH
    p->rho = 1.f;
    p->density.rho_dh = 0.f;
    p->density.wcount = 48.f / (kernel_norm * pow_dimension(p->h));
    p->density.wcount_dh = 0.f;
203
#endif /* MINIMAL */
204
205
206
207
208
209
210
#ifdef HOPKINS_PE_SPH
    p->rho = 1.f;
    p->rho_bar = 1.f;
    p->density.rho_dh = 0.f;
    p->density.pressure_dh = 0.f;
    p->density.wcount = 48.f / (kernel_norm * pow_dimension(p->h));
    p->density.wcount_dh = 0.f;
211
212
213
214
215
216
217
218
219
#endif /* PRESSURE-ENTROPY */
#ifdef HOPKINS_PU_SPH
    p->rho = 1.f;
    p->pressure_bar = 0.6666666;
    p->density.rho_dh = 0.f;
    p->density.pressure_bar_dh = 0.f;
    p->density.wcount = 48.f / (kernel_norm * pow_dimension(p->h));
    p->density.wcount_dh = 0.f;
#endif /* PRESSURE-ENERGY */
220
221
222
223
224
225
226
227
228
229
230

    /* And prepare for a round of force tasks. */
    hydro_prepare_force(p, xp, cosmo);
    hydro_reset_acceleration(p);
  }
}

/**
 * @brief Ends the density loop by adding the appropriate coefficients
 */
void end_calculation_density(struct cell *c, const struct cosmology *cosmo) {
231
  for (int pid = 0; pid < c->count; pid++) {
232
    hydro_end_density(&c->parts[pid], cosmo);
233
234
235
236
237
238
239

    /* Recover the common "Neighbour number" definition */
    c->parts[pid].density.wcount *= pow_dimension(c->parts[pid].h);
    c->parts[pid].density.wcount *= kernel_norm;
  }
}

240
241
242
243
244
245
246
247
248
/**
 * @brief Ends the force loop by adding the appropriate coefficients
 */
void end_calculation_force(struct cell *c, const struct cosmology *cosmo) {
  for (int pid = 0; pid < c->count; pid++) {
    hydro_end_force(&c->parts[pid], cosmo);
  }
}

249
250
251
252
/**
 * @brief Dump all the particles to a file
 */
void dump_particle_fields(char *fileName, struct cell *ci, struct cell *cj) {
253
  FILE *file = fopen(fileName, "a");
254
255

  /* Write header */
256
  fprintf(file, "# %4s %13s %13s\n", "ID", "wcount", "h_dt");
257
258
259
260

  fprintf(file, "# ci --------------------------------------------\n");

  for (int pid = 0; pid < ci->count; pid++) {
261
    fprintf(file, "%6llu %13e %13e\n", ci->parts[pid].id,
James Willis's avatar
James Willis committed
262
            ci->parts[pid].density.wcount, ci->parts[pid].force.h_dt);
263
264
265
266
267
  }

  fprintf(file, "# cj --------------------------------------------\n");

  for (int pjd = 0; pjd < cj->count; pjd++) {
268
    fprintf(file, "%6llu %13e %13e\n", cj->parts[pjd].id,
James Willis's avatar
James Willis committed
269
            cj->parts[pjd].density.wcount, cj->parts[pjd].force.h_dt);
270
271
272
273
274
275
276
  }

  fclose(file);
}

/* Just a forward declaration... */
void runner_dopair1_density(struct runner *r, struct cell *ci, struct cell *cj);
James Willis's avatar
James Willis committed
277
278
void runner_dopair2_force_vec(struct runner *r, struct cell *ci,
                              struct cell *cj);
279
280
281
void runner_doself1_density_vec(struct runner *r, struct cell *ci);
void runner_dopair1_branch_density(struct runner *r, struct cell *ci,
                                   struct cell *cj);
282
void runner_dopair2_branch_force(struct runner *r, struct cell *ci,
James Willis's avatar
James Willis committed
283
                                 struct cell *cj);
284

285
/**
James Willis's avatar
James Willis committed
286
287
 * @brief Computes the pair interactions of two cells using SWIFT and a brute
 * force implementation.
288
 */
James Willis's avatar
James Willis committed
289
290
void test_pair_interactions(struct runner *runner, struct cell **ci,
                            struct cell **cj, char *swiftOutputFileName,
James Willis's avatar
James Willis committed
291
292
                            char *bruteForceOutputFileName,
                            interaction_func serial_interaction,
293
294
                            interaction_func vec_interaction, init_func init,
                            finalise_func finalise) {
295

296
297
  runner_do_sort(runner, *ci, 0x1FFF, 0, 0);
  runner_do_sort(runner, *cj, 0x1FFF, 0, 0);
298
299

  /* Zero the fields */
300
301
  init(*ci, runner->e->cosmology);
  init(*cj, runner->e->cosmology);
302
303

  /* Run the test */
304
  vec_interaction(runner, *ci, *cj);
305
306

  /* Let's get physical ! */
307
308
  finalise(*ci, runner->e->cosmology);
  finalise(*cj, runner->e->cosmology);
James Willis's avatar
James Willis committed
309

310
311
312
313
314
315
  /* Dump if necessary */
  dump_particle_fields(swiftOutputFileName, *ci, *cj);

  /* Now perform a brute-force version for accuracy tests */

  /* Zero the fields */
316
317
  init(*ci, runner->e->cosmology);
  init(*cj, runner->e->cosmology);
318
319

  /* Run the brute-force test */
320
  serial_interaction(runner, *ci, *cj);
321
322

  /* Let's get physical ! */
323
324
  finalise(*ci, runner->e->cosmology);
  finalise(*cj, runner->e->cosmology);
325
326
327
328

  dump_particle_fields(bruteForceOutputFileName, *ci, *cj);
}

329
330
331
/**
 * @brief Computes the pair interactions of two cells in various configurations.
 */
James Willis's avatar
James Willis committed
332
333
334
335
void test_all_pair_interactions(
    struct runner *runner, double *offset2, size_t particles, double size,
    double h, double rho, long long *partId, double perturbation, double h_pert,
    char *swiftOutputFileName, char *bruteForceOutputFileName,
336
337
    interaction_func serial_interaction, interaction_func vec_interaction,
    init_func init, finalise_func finalise) {
338
339
340
341

  double offset1[3] = {0, 0, 0};
  struct cell *ci, *cj;

342
  /* Only one particle in each cell. */
James Willis's avatar
James Willis committed
343
344
  ci = make_cell(1, offset1, size, h, rho, partId, perturbation, h_pert, 1.);
  cj = make_cell(1, offset2, size, h, rho, partId, perturbation, h_pert, 1.);
345
346

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
347
                         bruteForceOutputFileName, serial_interaction,
348
                         vec_interaction, init, finalise);
349
350
351
352

  clean_up(ci);
  clean_up(cj);

353
  /* All active particles. */
James Willis's avatar
James Willis committed
354
355
356
357
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 1.);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 1.);
358

James Willis's avatar
James Willis committed
359
  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
360
                         bruteForceOutputFileName, serial_interaction,
361
                         vec_interaction, init, finalise);
362
363
364
365
366

  clean_up(ci);
  clean_up(cj);

  /* Half particles are active. */
James Willis's avatar
James Willis committed
367
368
369
370
371
372
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 0.5);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 0.5);

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
373
                         bruteForceOutputFileName, serial_interaction,
374
                         vec_interaction, init, finalise);
375
376
377
378
379

  clean_up(ci);
  clean_up(cj);

  /* All particles inactive. */
James Willis's avatar
James Willis committed
380
381
382
383
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 0.);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 0.);
384

James Willis's avatar
James Willis committed
385
  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
386
                         bruteForceOutputFileName, serial_interaction,
387
                         vec_interaction, init, finalise);
388
389
390
391
392

  clean_up(ci);
  clean_up(cj);

  /* 10% of particles active. */
James Willis's avatar
James Willis committed
393
394
395
396
397
398
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 0.1);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 0.1);

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
399
                         bruteForceOutputFileName, serial_interaction,
400
                         vec_interaction, init, finalise);
401
402
403
404
405

  clean_up(ci);
  clean_up(cj);

  /* One active cell one inactive cell. */
James Willis's avatar
James Willis committed
406
407
408
409
410
411
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 1.0);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 0.);

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
412
                         bruteForceOutputFileName, serial_interaction,
413
                         vec_interaction, init, finalise);
414
415
416
417
418

  clean_up(ci);
  clean_up(cj);

  /* One active cell one inactive cell. */
James Willis's avatar
James Willis committed
419
420
421
422
423
424
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 0.);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 1.0);

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
425
                         bruteForceOutputFileName, serial_interaction,
426
                         vec_interaction, init, finalise);
427
428
429
430
431
432
433
434

  clean_up(ci);
  clean_up(cj);

  /* Smaller cells, all active. */
  ci = make_cell(2, offset1, size, h, rho, partId, perturbation, h_pert, 1.0);
  cj = make_cell(2, offset2, size, h, rho, partId, perturbation, h_pert, 1.0);

James Willis's avatar
James Willis committed
435
  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
436
                         bruteForceOutputFileName, serial_interaction,
437
                         vec_interaction, init, finalise);
James Willis's avatar
James Willis committed
438

439
440
441
442
443
444
445
  clean_up(ci);
  clean_up(cj);

  /* Different numbers of particles in each cell. */
  ci = make_cell(10, offset1, size, h, rho, partId, perturbation, h_pert, 0.5);
  cj = make_cell(3, offset2, size, h, rho, partId, perturbation, h_pert, 0.75);

James Willis's avatar
James Willis committed
446
  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
447
                         bruteForceOutputFileName, serial_interaction,
448
                         vec_interaction, init, finalise);
James Willis's avatar
James Willis committed
449

450
451
452
453
  clean_up(ci);
  clean_up(cj);

  /* One cell inactive and the other only half active. */
James Willis's avatar
James Willis committed
454
455
456
457
458
459
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 0.5);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 0.);

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
460
                         bruteForceOutputFileName, serial_interaction,
461
                         vec_interaction, init, finalise);
462
463
464

  clean_up(ci);
  clean_up(cj);
James Willis's avatar
James Willis committed
465

466
  /* One cell inactive and the other only half active. */
James Willis's avatar
James Willis committed
467
468
469
470
471
472
  ci = make_cell(particles, offset1, size, h, rho, partId, perturbation, h_pert,
                 0.);
  cj = make_cell(particles, offset2, size, h, rho, partId, perturbation, h_pert,
                 0.5);

  test_pair_interactions(runner, &ci, &cj, swiftOutputFileName,
James Willis's avatar
James Willis committed
473
                         bruteForceOutputFileName, serial_interaction,
474
                         vec_interaction, init, finalise);
475
476
477
478
479
480

  /* Clean things to make the sanitizer happy ... */
  clean_up(ci);
  clean_up(cj);
}

481
int main(int argc, char *argv[]) {
482
  size_t particles = 0, runs = 0, type = 0;
483
  double h = 1.23485, size = 1., rho = 1.;
484
  double perturbation = 0.1, h_pert = 1.1;
485
486
  struct space space;
  struct engine engine;
487
  struct cosmology cosmo;
488
  struct runner *runner;
489
  char c;
490
  static long long partId = 0;
491
  char outputFileNameExtension[100] = "";
492
493
  char swiftOutputFileName[200] = "";
  char bruteForceOutputFileName[200] = "";
494
495
496
497
498

  /* Initialize CPU frequency, this also starts time. */
  unsigned long long cpufreq = 0;
  clocks_set_cpufreq(cpufreq);

499
500
/* Choke on FP-exceptions */
#ifdef HAVE_FE_ENABLE_EXCEPT
501
  feenableexcept(FE_DIVBYZERO | FE_INVALID | FE_OVERFLOW);
502
#endif
503

504
505
  /* Generate a RNG seed from time. */
  unsigned int seed = time(NULL);
506

507
  while ((c = getopt(argc, argv, "h:p:n:r:t:d:s:f:")) != -1) {
508
509
510
511
512
    switch (c) {
      case 'h':
        sscanf(optarg, "%lf", &h);
        break;
      case 'p':
513
514
515
        sscanf(optarg, "%lf", &h_pert);
        break;
      case 'n':
516
517
518
519
520
521
522
523
524
525
526
        sscanf(optarg, "%zu", &particles);
        break;
      case 'r':
        sscanf(optarg, "%zu", &runs);
        break;
      case 't':
        sscanf(optarg, "%zu", &type);
        break;
      case 'd':
        sscanf(optarg, "%lf", &perturbation);
        break;
527
528
529
      case 's':
        sscanf(optarg, "%u", &seed);
        break;
530
531
532
533
534
535
536
537
538
539
540
      case 'f':
        strcpy(outputFileNameExtension, optarg);
        break;
      case '?':
        error("Unknown option.");
        break;
    }
  }

  if (h < 0 || particles == 0 || runs == 0 || type > 2) {
    printf(
541
        "\nUsage: %s -n PARTICLES_PER_AXIS -r NUMBER_OF_RUNS [OPTIONS...]\n"
542
543
544
545
        "\nGenerates a cell pair, filled with particles on a Cartesian grid."
        "\nThese are then interacted using runner_dopair1_density."
        "\n\nOptions:"
        "\n-t TYPE=0          - cells share face (0), edge (1) or corner (2)"
546
547
        "\n-h DISTANCE=1.2348 - smoothing length"
        "\n-p                 - Random fractional change in h, h=h*random(1,p)"
548
        "\n-d pert            - perturbation to apply to the particles [0,1["
549
        "\n-s seed            - seed for RNG"
550
551
552
553
554
        "\n-f fileName        - part of the file name used to save the dumps\n",
        argv[0]);
    exit(1);
  }

555
556
557
  /* Seed RNG. */
  message("Seed used for RNG: %d", seed);
  srand(seed);
James Willis's avatar
James Willis committed
558

559
  space.periodic = 0;
James Willis's avatar
James Willis committed
560
561
562
  space.dim[0] = 3.;
  space.dim[1] = 3.;
  space.dim[2] = 3.;
563
564
565
566
567

  engine.s = &space;
  engine.time = 0.1f;
  engine.ti_current = 8;
  engine.max_active_bin = num_time_bins;
568
  engine.nodeID = NODE_ID;
James Willis's avatar
James Willis committed
569

570
571
572
  cosmology_init_no_cosmo(&cosmo);
  engine.cosmology = &cosmo;

573
574
  if (posix_memalign((void **)&runner, SWIFT_STRUCT_ALIGNMENT,
                     sizeof(struct runner)) != 0) {
575
576
    error("couldn't allocate runner");
  }
James Willis's avatar
James Willis committed
577

578
  runner->e = &engine;
579

580
  /* Create output file names. */
lhausamm's avatar
Format    
lhausamm committed
581
582
  sprintf(swiftOutputFileName, "swift_dopair_%.150s.dat",
          outputFileNameExtension);
lhausamm's avatar
lhausamm committed
583
  sprintf(bruteForceOutputFileName, "brute_force_pair_%.150s.dat",
584
          outputFileNameExtension);
James Willis's avatar
James Willis committed
585

586
587
588
589
590
591
592
593
594
595
596
  /* Delete files if they already exist. */
  remove(swiftOutputFileName);
  remove(bruteForceOutputFileName);

#ifdef WITH_VECTORIZATION
  runner->ci_cache.count = 0;
  cache_init(&runner->ci_cache, 512);
  runner->cj_cache.count = 0;
  cache_init(&runner->cj_cache, 512);
#endif

James Willis's avatar
James Willis committed
597
  double offset[3] = {1., 0., 0.};
598

599
600
601
  /* Define which interactions to call */
  interaction_func serial_inter_func = &pairs_all_density;
  interaction_func vec_inter_func = &runner_dopair1_branch_density;
602
603
  init_func init = &zero_particle_fields_density;
  finalise_func finalise = &end_calculation_density;
604

605
  /* Test a pair of cells face-on. */
James Willis's avatar
James Willis committed
606
607
  test_all_pair_interactions(runner, offset, particles, size, h, rho, &partId,
                             perturbation, h_pert, swiftOutputFileName,
James Willis's avatar
James Willis committed
608
                             bruteForceOutputFileName, serial_inter_func,
609
                             vec_inter_func, init, finalise);
610
611
612
613
614
615
616

  /* Test a pair of cells edge-on. */
  offset[0] = 1.;
  offset[1] = 1.;
  offset[2] = 0.;
  test_all_pair_interactions(runner, offset, particles, size, h, rho, &partId,
                             perturbation, h_pert, swiftOutputFileName,
James Willis's avatar
James Willis committed
617
                             bruteForceOutputFileName, serial_inter_func,
618
                             vec_inter_func, init, finalise);
619
620
621
622
623
624
625

  /* Test a pair of cells corner-on. */
  offset[0] = 1.;
  offset[1] = 1.;
  offset[2] = 1.;
  test_all_pair_interactions(runner, offset, particles, size, h, rho, &partId,
                             perturbation, h_pert, swiftOutputFileName,
James Willis's avatar
James Willis committed
626
                             bruteForceOutputFileName, serial_inter_func,
627
                             vec_inter_func, init, finalise);
James Willis's avatar
James Willis committed
628

629
630
  /* Re-assign function pointers. */
  serial_inter_func = &pairs_all_force;
631
  vec_inter_func = &runner_dopair2_branch_force;
632
633
  init = &zero_particle_fields_force;
  finalise = &end_calculation_force;
634
635

  /* Create new output file names. */
lhausamm's avatar
lhausamm committed
636
  sprintf(swiftOutputFileName, "swift_dopair2_force_%.150s.dat",
James Willis's avatar
James Willis committed
637
          outputFileNameExtension);
lhausamm's avatar
lhausamm committed
638
  sprintf(bruteForceOutputFileName, "brute_force_dopair2_%.150s.dat",
639
640
641
642
643
          outputFileNameExtension);

  /* Delete files if they already exist. */
  remove(swiftOutputFileName);
  remove(bruteForceOutputFileName);
James Willis's avatar
James Willis committed
644

645
  /* Test a pair of cells face-on. */
646
647
648
  offset[0] = 1.;
  offset[1] = 0.;
  offset[2] = 0.;
James Willis's avatar
James Willis committed
649
650
  test_all_pair_interactions(runner, offset, particles, size, h, rho, &partId,
                             perturbation, h_pert, swiftOutputFileName,
James Willis's avatar
James Willis committed
651
                             bruteForceOutputFileName, serial_inter_func,
652
                             vec_inter_func, init, finalise);
James Willis's avatar
James Willis committed
653

654
  /* Test a pair of cells edge-on. */
James Willis's avatar
James Willis committed
655
656
657
658
659
  offset[0] = 1.;
  offset[1] = 1.;
  offset[2] = 0.;
  test_all_pair_interactions(runner, offset, particles, size, h, rho, &partId,
                             perturbation, h_pert, swiftOutputFileName,
James Willis's avatar
James Willis committed
660
                             bruteForceOutputFileName, serial_inter_func,
661
                             vec_inter_func, init, finalise);
662

663
  /* Test a pair of cells corner-on. */
James Willis's avatar
James Willis committed
664
665
666
667
668
  offset[0] = 1.;
  offset[1] = 1.;
  offset[2] = 1.;
  test_all_pair_interactions(runner, offset, particles, size, h, rho, &partId,
                             perturbation, h_pert, swiftOutputFileName,
James Willis's avatar
James Willis committed
669
                             bruteForceOutputFileName, serial_inter_func,
670
                             vec_inter_func, init, finalise);
671
672
  return 0;
}