Mercurial > hg > Papers > 2018 > ryokka-thesis

comparison final_pre/src/AgdaRecordProj.agda @ 7:28f900230c26

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add final_pre
author ryokka
date Mon, 19 Feb 2018 23:32:24 +0900
parents
children
comparison
equal deleted inserted replaced
6:d927f6b3d2b3 7:28f900230c26
1 getX : Point -> Nat
2 getX p = Point.x p
3
4 getY : Point -> Nat
5 getY record { x = a ; y = b} = b
6
7 xPlus5 : Point -> Point
8 xPlus5 p = record p { x = (Point.x p) + 5}