This commit is contained in:
ajeffrey@roblox.com 2022-02-18 17:57:27 -06:00
parent cd9182ca5f
commit fcccd9443a
2 changed files with 15 additions and 0 deletions

View file

@ -3,4 +3,7 @@
Main Main
MAlonzo MAlonzo
PrettyPrinter PrettyPrinter
Interpreter
!Tests/Interpreter
!Tests/PrettyPrinter
.ghc.* .ghc.*

View file

@ -0,0 +1,12 @@
module Properties.Product where
record Σ {A : Set} (B : A Set) : Set where
constructor _,_
field fst : A
field snd : B fst
open Σ public
_×_ : Set Set Set
A × B = Σ (λ (a : A) B)