From da3bcabb94594d31ed3e215c15ad2bd31163c82d Mon Sep 17 00:00:00 2001
From: wadler <wadler@inf.ed.ac.uk>
Date: Tue, 10 Jul 2018 17:09:38 -0300
Subject: [PATCH] more text for Bisimulation

---
 index.md                    |  2 +-
 src/plfa/Bisimulation.lagda | 63 +++++++++++++++++++++++++++++++++++++
 2 files changed, 64 insertions(+), 1 deletion(-)

diff --git a/index.md b/index.md
index 0fa0d06c..57e68125 100644
--- a/index.md
+++ b/index.md
@@ -43,10 +43,10 @@ are encouraged.
   - [Lambda: Introduction to Lambda Calculus]({{ site.baseurl }}{% link out/plfa/Lambda.md %})
   - [Properties: Progress and Preservation]({{ site.baseurl }}{% link out/plfa/Properties.md %})
   - [DeBruijn: Inherently typed De Bruijn representation]({{ site.baseurl }}{% link out/plfa/DeBruijn.md %})
+  - [More: Additional constructs of simply-typed lambda calculus]({{ site.baseurl }}{% link out/plfa/More.md %}) 
 
 (The following is not yet ready for review.)
 
-  - [More: Additional constructs of simply-typed lambda calculus]({{ site.baseurl }}{% link out/plfa/More.md %}) 
   - [Bisimulation: Relating reductions systems]({{ site.baseurl }}{% link out/plfa/Bisimulation.md %}) 
   - [Inference: Bidirectional type inference]({{ site.baseurl }}{% link out/plfa/Inference.md %})
   - [Untyped: Untyped lambda calculus with full normalisation]({{ site.baseurl }}{% link out/plfa/Untyped.md %})
diff --git a/src/plfa/Bisimulation.lagda b/src/plfa/Bisimulation.lagda
index 93d916a3..3f006ee8 100644
--- a/src/plfa/Bisimulation.lagda
+++ b/src/plfa/Bisimulation.lagda
@@ -8,6 +8,67 @@ permalink : /Bisimulation/
 module plfa.Bisimulation where
 \end{code}
 
+Some constructs can be defined in terms of other constructs.  In the
+previous chapter, we saw how _let_ terms can be rewritten as an
+application of an abstraction, and how two alternative formulations of
+products — one with projections and one with case — can be formulated
+in terms of each other.  In this chapter, we look at how to formalise
+these claims.  In particular, we explain what it means to claim that
+two different systems, with different terms and reduction rules, are
+equivalent.
+
+The relevant concept is _bisimulation_.  Consider two different
+systems, let's call them _source_ and _target_.  Let `M`, `N` range
+over terms of the source, and `M†`, `N†` range over terms of the
+target.  We define a relation
+
+    M ~ M†
+
+between corresponding terms of the two systems. We have a
+_simulation_ of the source by the target if every reduction
+step in the source has a corresponding reduction step
+in the target:
+
+> For every `M`, `M†`, and `N`:
+> If `M ~ M†` and `M —→ N`
+> then `M† —→ N†` and `N ~ N†`
+> for some `N†`.
+        
+Or, in symbols:
+
+    M  —→ N
+    ~     ~
+    M† —→ N†
+
+We are particularly interested in the situation where every
+reduction step in the target also has a corresponding reduction
+step in the source; this is called a _bisimulation_.
+
+For instance, `S` might be lambda calculus with _let_
+added, and `T` the same system with `let` translated out. 
+The key rule defining our relation will be:
+
+    M ~ M†
+    N ~ N†
+    ------------------------------
+    let x = M in N ~ ((ƛ x ⇒ N) M)
+
+All the other rules are congruences: variables relate to
+themselves, and abstractions and applications relate if their
+components relate.
+
+    -----
+    x ~ x
+
+    N ~ N†
+    ------------------
+    ƛ x ⇒ N ~ ƛ x ⇒ N†
+
+    L ~ L†
+    M ~ M†
+    ---------------
+    L · M ~ L† · M†
+
 
 ## Imports
 
@@ -121,6 +182,8 @@ data _~_ : ∀ {Γ A} → Γ ⊢ A → Γ ⊢ A → Set where
 
 ## The given relation is a bisimulation
 
+**Actually, I think this is just a simulation!**
+
 \begin{code}
 data Bisim {Γ A} (Mₛ Mₜ Mₛ′ : Γ ⊢ A) : Set where