2017-02-23 21:06:49 +03:00
|
|
|
(Program
|
|
|
|
(Module
|
|
|
|
(Identifier))
|
2017-10-31 20:33:37 +03:00
|
|
|
(Function
|
|
|
|
(Empty)
|
2017-11-30 04:55:52 +03:00
|
|
|
(
|
|
|
|
(Identifier))
|
2017-11-10 04:01:19 +03:00
|
|
|
([])
|
2017-10-31 20:33:37 +03:00
|
|
|
(Match
|
2017-11-15 21:57:12 +03:00
|
|
|
([])
|
2017-10-31 20:33:37 +03:00
|
|
|
(
|
|
|
|
(Pattern
|
|
|
|
(LessThan
|
|
|
|
{ (Identifier)
|
|
|
|
->(Identifier) }
|
|
|
|
{ (Identifier)
|
|
|
|
->(Identifier) })
|
|
|
|
(Call
|
|
|
|
(Identifier)
|
|
|
|
(Empty)))
|
|
|
|
(Pattern
|
2017-11-20 22:07:21 +03:00
|
|
|
(LessThan
|
2017-10-31 20:33:37 +03:00
|
|
|
{ (Identifier)
|
|
|
|
->(Identifier) }
|
2017-11-20 22:07:21 +03:00
|
|
|
{ (Identifier)
|
|
|
|
->(Identifier) })
|
|
|
|
{+(Context
|
|
|
|
{+(Comment)+}
|
|
|
|
(Call
|
|
|
|
(Identifier)
|
|
|
|
(Empty)))+})
|
|
|
|
{+(Context
|
|
|
|
{+(Comment)+}
|
|
|
|
(Pattern
|
|
|
|
(Equal
|
|
|
|
{ (Identifier)
|
|
|
|
->(Identifier) }
|
|
|
|
(Integer))
|
|
|
|
(Call
|
|
|
|
{ (Identifier)
|
|
|
|
->(Identifier) }
|
|
|
|
(Empty))))+}))))
|