Skip to content

Instantly share code, notes, and snippets.

@rightfold
Forked from anonymous/gist:24f235f84c8fcaed03b2
Last active August 29, 2015 14:05
Show Gist options
  • Save rightfold/c4a5bc632896097ad38d to your computer and use it in GitHub Desktop.
Save rightfold/c4a5bc632896097ad38d to your computer and use it in GitHub Desktop.
f :: obj1 -> obj2
class Diffable delta obj
applyDiff :: delta -> obj -> obj
instance Diffable obj1Delta obj1
instance Diffable obj2Delta obj2
class PipeThroughDiff o1 d1 o2 d2 where
pipeThroughDiff :: o1 -> d1 -> o2 -> d2
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment