Skip to content

Commit 6311ef1

Browse files
authored
doc: add wikidata attribute for Church-Rosser theorems (#626)
See [this thread](https://leanprover.zulipchat.com/#narrow/channel/113488-general/topic/Wikipedia.20Day.202026.20Talk/with/582363210) for context.
1 parent d5148c0 commit 6311ef1

3 files changed

Lines changed: 3 additions & 0 deletions

File tree

Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullBetaConfluence.lean

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -203,6 +203,7 @@ theorem para_confluence : Confluent (@Parallel Var) :=
203203
para_diamond.toConfluent
204204

205205
/-- β-reduction is confluent. -/
206+
@[wikidata Q1308502]
206207
theorem confluence_beta : Confluent (@FullBeta Var) := by
207208
have eq : ReflTransGen (@Parallel Var) = ReflTransGen (@FullBeta Var) := by
208209
ext

Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullBetaEtaConfluence.lean

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -92,6 +92,7 @@ lemma stronglyCommute_eta_beta : StronglyCommute (@FullEta Var) FullBeta := by
9292

9393
open Commute in
9494
/-- βη-reduction is confluent. -/
95+
@[wikidata Q1308502]
9596
theorem confluent_beta_eta : Confluent (@FullBetaEta Var) := by
9697
apply join_confluent
9798
· exact confluence_beta

Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullEtaConfluence.lean

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -34,6 +34,7 @@ open Relation
3434
variable [HasFresh Var] [DecidableEq Var]
3535

3636
open FullEta in
37+
@[wikidata Q1308502]
3738
lemma stronglyConfluent_eta : StronglyConfluent (@FullEta Var) := by
3839
intro _ y z h₁ h₂
3940
suffices ∃ w, ReflGen FullEta y w ∧ ReflGen FullEta z w by grind

0 commit comments

Comments
 (0)