Skip to content

abuse more parallelism.#37

Open
julialongtin wants to merge 2 commits into
masterfrom
speedups
Open

abuse more parallelism.#37
julialongtin wants to merge 2 commits into
masterfrom
speedups

Conversation

@julialongtin

Copy link
Copy Markdown
Member

No description provided.

Comment thread programs/extcuraengine.hs
shiftedTris = [shiftTri centerPoint tri | tri <- tris] `using` parListChunk (div (length tris) (fromFastℕ threads)) rseq
xs = [ xOf.fst <$> triPoints | triPoints <- sidesOf <$> tris ] `using` parListChunk (div (length tris) (fromFastℕ threads)) rseq
ys = [ yOf.fst <$> triPoints | triPoints <- sidesOf <$> tris ] `using` parListChunk (div (length tris) (fromFastℕ threads)) rseq
zs = [ zOf.fst <$> triPoints | triPoints <- sidesOf <$> tris ] `using` parListChunk (div (length tris) (fromFastℕ threads)) rseq

Copy link
Copy Markdown
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Lots of repetition here, maybe refactor common parListChunk (div (length tris) (fromFastℕ threads)) rseq.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

2 participants