QuickLaTeX.lagda.tex 384 B

123456789101112131415161718192021222324252627
  1. \documentclass{article}
  2. \usepackage{agda}
  3. \begin{document}
  4. \begin{code}
  5. {-# OPTIONS --sized-types #-}
  6. {-# BUILTIN SIZE Size #-}
  7. record Sigma (A : Set) (B : A → Set) : Set where
  8. coinductive
  9. constructor c
  10. field
  11. proj₁ : A
  12. proj₂ : B proj₁
  13. data D : Set where
  14. c : D
  15. f : {A : Set} {B : A → Set} (x : A) → B x → Sigma A B
  16. f = c
  17. \end{code}
  18. \end{document}