Skip to content

Instantly share code, notes, and snippets.

@funrep
Created November 24, 2013 16:09
Show Gist options
  • Save funrep/7628782 to your computer and use it in GitHub Desktop.
Save funrep/7628782 to your computer and use it in GitHub Desktop.
integral :: Additive a => Event t Time -> Behavior t a -> Behavior t a
integral t b = sumB $ (\v dt -> dt *^ v) <$> b <@> diffE t
@funrep
Copy link
Author

funrep commented Nov 24, 2013

game.hs:35:54:
    Expecting one more argument to `a'
    In the type signature for `integral':
      integral :: Additive a =>
                  Event t Time -> Behavior t a -> Behavior t a

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