mirror of
https://github.com/Start9Labs/registry.git
synced 2026-03-30 11:51:57 +00:00
initial commit
This commit is contained in:
9
src/Util/Function.hs
Normal file
9
src/Util/Function.hs
Normal file
@@ -0,0 +1,9 @@
|
||||
module Util.Function where
|
||||
|
||||
import Startlude
|
||||
|
||||
(.*) :: (b -> c) -> (a0 -> a1 -> b) -> a0 -> a1 -> c
|
||||
(.*) = (.) . (.)
|
||||
|
||||
(.**) :: (b -> c) -> (a0 -> a1 -> a2 -> b) -> a0 -> a1 -> a2 -> c
|
||||
(.**) = (.) . (.*)
|
||||
Reference in New Issue
Block a user