Skip to content

Instantly share code, notes, and snippets.

View jmchapman's full-sized avatar

James Chapman jmchapman

View GitHub Profile

Keybase proof

I hereby claim:

  • I am jmchapman on github.
  • I am jmchapman (https://keybase.io/jmchapman) on keybase.
  • I have a public key ASAwCpkx877cthVn_DjmKwouY8nqUlX00GiQPWwwcP7V1go

To claim this, I am signing this object:

@jmchapman
jmchapman / Groups.agda
Created April 30, 2014 14:44
Integers
{-# OPTIONS --type-in-type #-}
module _ where
open import Relation.Binary.HeterogeneousEquality
open ≅-Reasoning renaming (begin_ to proof_)
open import Function
record Group : Set₁ where
field G : Set
e : G