Commit 9ffa68a4 authored by Robbert Krebbers's avatar Robbert Krebbers

Eta lemma for later.

parent e13d484b
......@@ -311,6 +311,8 @@ Inductive later (A : Type) : Type := Later { later_car : A }.
Add Printing Constructor later.
Arguments Later {_} _.
Arguments later_car {_} _.
Lemma later_eta {A} (x : later A) : Later (later_car x) = x.
Proof. by destruct x. Qed.
Section later.
Context {A : cofeT}.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment