Skip to content

Instantly share code, notes, and snippets.

@aochagavia
Last active March 23, 2017 10:51
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save aochagavia/82a731dcecd0e9b9ba11af517ec3a889 to your computer and use it in GitHub Desktop.
Save aochagavia/82a731dcecd0e9b9ba11af517ec3a889 to your computer and use it in GitHub Desktop.
data _==_ {a : Set} (x : a) : a -> Set where
Refl : x == x
data List (a : Set) : Set where
Nil : List a
Cons : a -> List a -> List a
-- ~~~~~~~~~~~~~~~~~~~~~~~~ Highlighted as yellow
lemma : {a : Set} (x y : a) (xs ys : List a) -> x == y -> xs == ys -> (Cons x xs == Cons y ys)
lemma = {!!}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment