Kind/book/Kind.Term.parser.hol.kind2
2024-03-01 20:40:31 -03:00

19 lines
357 B
Plaintext

Kind.Term.parser.hol
: (Parser.Guard Kind.PreTerm)
= (Parser.Guard.text
Kind.PreTerm
"?"
(Kind.Term.parser.bind
Unit
(Parser.text "?")
λ_
(Kind.Term.parser.bind
String
Parser.name
λnam
(Kind.Term.parser.pure
λscp (Kind.hol nam (List.nil Kind.Term))
)
)
)
)