Add additional recursive, non immediately-duplicative birds.
parent
b3ebddc119
commit
6d03a9383a
|
@ -51,6 +51,13 @@ Cardinal
|
||||||
-/
|
-/
|
||||||
def C (x : α → β → δ) (y : β) (z : α) := x z y
|
def C (x : α → β → δ) (y : β) (z : α) := x z y
|
||||||
|
|
||||||
|
/--
|
||||||
|
Converse Warbler
|
||||||
|
|
||||||
|
`W'xy = yxx`
|
||||||
|
-/
|
||||||
|
def W' (x : α) (y : α → α → β) := y x x
|
||||||
|
|
||||||
/--
|
/--
|
||||||
Dickcissel
|
Dickcissel
|
||||||
|
|
||||||
|
@ -195,6 +202,13 @@ Robin
|
||||||
-/
|
-/
|
||||||
def R (x : α) (y : β → α → γ) (z : β) := y z x
|
def R (x : α) (y : β → α → γ) (z : β) := y z x
|
||||||
|
|
||||||
|
/--
|
||||||
|
Sage Bird
|
||||||
|
|
||||||
|
`Θx = x(Θx)`
|
||||||
|
-/
|
||||||
|
partial def Θ [Inhabited α] (x : α → α) := x (Θ x)
|
||||||
|
|
||||||
/--
|
/--
|
||||||
Starling
|
Starling
|
||||||
|
|
||||||
|
@ -224,3 +238,10 @@ Vireo
|
||||||
`Vxyz = zxy`
|
`Vxyz = zxy`
|
||||||
-/
|
-/
|
||||||
def V (x : α) (y : β) (z : α → β → γ) := z x y
|
def V (x : α) (y : β) (z : α → β → γ) := z x y
|
||||||
|
|
||||||
|
/--
|
||||||
|
Warbler
|
||||||
|
|
||||||
|
`Wxy = xyy`
|
||||||
|
-/
|
||||||
|
def W (x : α → α → β) (y : α) := x y y
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
\documentclass{article}
|
\documentclass{article}
|
||||||
|
|
||||||
\input{../../preamble}
|
\input{../preamble}
|
||||||
|
|
||||||
\begin{document}
|
\begin{document}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue