Hash :
99f3ddcd
Author :
Date :
2021-06-13T22:00:43
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
record Fin (n : Nat) : Set where
constructor _[_]
field
⟦_⟧ : Nat
proof : suc ⟦_⟧ ≤ n
open Fin
----------------------------------------------------
[
["keyword", "record"],
["class-name", "Fin"],
["punctuation", "("],
["function", "n "],
["operator", ":"],
" Nat",
["punctuation", ")"],
["operator", ":"],
["keyword", "Set"],
["keyword", "where"],
["keyword", "constructor"],
" _[_]\r\n\t",
["keyword", "field"],
["function", "⟦_⟧ "],
["operator", ":"],
" Nat\r\n\t\t",
["function", "proof "],
["operator", ":"],
" suc ⟦_⟧ ≤ n\r\n",
["keyword", "open"],
" Fin"
]
----------------------------------------------------
Agda's record is like objects, but different in many aspects and much more powerful.