Mercurial > hg > Papers > 2020 > ryokka-master
view paper/src/AgdaProduct.agda.replaced @ 2:c7acb9211784
add code, figure. and paper fix content
author | ryokka |
---|---|
date | Mon, 27 Jan 2020 20:41:36 +0900 |
parents | |
children |
line wrap: on
line source
data _@$\times$@_ (A B : Set) : Set where <_,_> : A @$\rightarrow$@ B @$\rightarrow$@ A @$\times$@ B fst : {A B : Set} @$\rightarrow$@ A @$\times$@ B @$\rightarrow$@ A fst < a , _ > = a snd : {A B : Set} @$\rightarrow$@ A @$\times$@ B @$\rightarrow$@ B snd < _ , b > = b