diff logic.agda @ 422:44a484f17f26

syntax *, &, ⟪ , ⟫
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sat, 01 Aug 2020 11:06:29 +0900
parents 8b0715e28b33
children 94392feeebc5
line wrap: on
line diff
--- a/logic.agda	Fri Jul 31 17:54:52 2020 +0900
+++ b/logic.agda	Sat Aug 01 11:06:29 2020 +0900
@@ -17,6 +17,7 @@
    false : Bool
 
 record  _∧_  {n m : Level} (A  : Set n) ( B : Set m ) : Set (n ⊔ m) where
+   constructor ⟪_,_⟫
    field
       proj1 : A
       proj2 : B