PatternSynonyms2.lagda 252 B

12345678910111213141516171819
  1. \documentclass{article}
  2. \usepackage{agda}
  3. \begin{document}
  4. \begin{code}
  5. data Nat : Set where
  6. zero : Nat
  7. suc : Nat → Nat
  8. module _ where
  9. pattern two = suc (suc zero)
  10. pattern three = suc two
  11. data Bot : Set where
  12. \end{code}
  13. \end{document}