Regular reduction expressions parallelize too, so just use that.
This commit is contained in:
parent
cf78dc036c
commit
277d198d17
34
day1.chpl
34
day1.chpl
|
@ -114,10 +114,15 @@ class MaxThree : ReduceScanOp {
|
||||||
|
|
||||||
/*
|
/*
|
||||||
Let's make it possible to select which part we want to solve from the
|
Let's make it possible to select which part we want to solve from the
|
||||||
command line. This can be easily achieved via a `config const`. We'll
|
command line. This can be easily achieved via a `config const`. A
|
||||||
also add a `config const` to enable/disable parallel computation. */
|
variable like this can be set when running the program from the command
|
||||||
|
line as follows:
|
||||||
|
|
||||||
|
```bash
|
||||||
|
./my-program --part=1
|
||||||
|
```
|
||||||
|
*/
|
||||||
config const part = 1;
|
config const part = 1;
|
||||||
config const parallel = false;
|
|
||||||
|
|
||||||
/* Here's how we use our solution. */
|
/* Here's how we use our solution. */
|
||||||
if part == 1 {
|
if part == 1 {
|
||||||
|
@ -125,25 +130,8 @@ if part == 1 {
|
||||||
the one maximum number. */
|
the one maximum number. */
|
||||||
writeln(max reduce elves());
|
writeln(max reduce elves());
|
||||||
} else if part == 2 {
|
} else if part == 2 {
|
||||||
if !parallel {
|
// Need to read all the numbers into memory to make sure we can distribute
|
||||||
/* For the non-parallel version, we can just use `MaxThree` in the
|
var elfList = elves();
|
||||||
reduce expression, which gives us our top-3 tuple. To solve
|
writeln(+ reduce (MaxThree reduce elfList));
|
||||||
the puzzle, all that's left is to sum the elements of that tuple,
|
|
||||||
which we achieve via another `+ reduce`. */
|
|
||||||
writeln(+ reduce (MaxThree reduce elves()));
|
|
||||||
} else {
|
|
||||||
/* For the parallel case, we have to use a `forall` loop, which is
|
|
||||||
Chapel's way of expressing parallelism. `forall` loops have
|
|
||||||
support for `reduce expression`. In all, the code looks like the
|
|
||||||
following. */
|
|
||||||
var max3 = (0,0,0);
|
|
||||||
// Need to read all the numbers into memory to make sure we can distribute
|
|
||||||
var elfList = elves();
|
|
||||||
// To make a reduction parallel, we use a forall loop with a reduce intent
|
|
||||||
forall elf in elfList with (MaxThree(int) reduce max3) {
|
|
||||||
max3 reduce= elf;
|
|
||||||
}
|
|
||||||
writeln(+ reduce max3);
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user