Advertisement
Guest User

Untitled

a guest
Apr 23rd, 2017
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.12 KB | None | 0 0
  1. type LFun v w = v -> w
  2. (+++) :: VectorSpace w => LFun u w -> LFun v w -> LFun (u,v) w
  3. (f+++g) (u,v) = f u ^+^ g v
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement