mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-09-11 16:36:13 +03:00
10 lines
200 B
Plaintext
10 lines
200 B
Plaintext
new
|
|
: ∀(M: ∀(T: *) *)
|
|
∀(bind: ∀(A: *) ∀(B: *) ∀(a: (M A)) ∀(b: ∀(a: A) (M B)) (M B))
|
|
∀(pure: ∀(A: *) ∀(a: A) (M A))
|
|
(Monad M)
|
|
|
|
λM λbind λpure
|
|
~λP λnew
|
|
(new bind pure)
|