Skip to content

Instantly share code, notes, and snippets.

@VictorTaelin

VictorTaelin/foo.hvm

Created October 26, 2022 21:56
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save VictorTaelin/cb241931c69ba9c0bc5a82f2fd117bd3 to your computer and use it in GitHub Desktop.
Save VictorTaelin/cb241931c69ba9c0bc5a82f2fd117bd3 to your computer and use it in GitHub Desktop.
Download ZIP
A configurable busy function meant to test parallel implementations
Raw
foo.hvm
// A configurable busy function meant to test parallel implementations
// - 1st arg = parallel recursion depth
// - 2nd arg = sequential recursion length
(Foo 0 0) = 1
(Foo 0 m) = (Foo 0 (- m 1))
(Foo n m) = (+ (Foo (- n 1) m) (Foo (- n 1) m))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment