Unnamed repository; edit this file 'description' to name the repository.
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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
SOURCE_FILE
  FN
    FN_KW "fn"
    WHITESPACE " "
    NAME
      IDENT "main"
    PARAM_LIST
      L_PAREN "("
      R_PAREN ")"
    WHITESPACE " "
    BLOCK_EXPR
      STMT_LIST
        L_CURLY "{"
        WHITESPACE "\n    "
        LET_STMT
          LET_KW "let"
          WHITESPACE " "
          TUPLE_PAT
            L_PAREN "("
            IDENT_PAT
              NAME
                IDENT "a"
            COMMA ","
            WHITESPACE " "
            IDENT_PAT
              NAME
                IDENT "b"
            COMMA ","
            WHITESPACE " "
            REST_PAT
              DOT2 ".."
            R_PAREN ")"
          WHITESPACE " "
          EQ "="
          WHITESPACE " "
          TUPLE_EXPR
            L_PAREN "("
            R_PAREN ")"
          SEMICOLON ";"
        WHITESPACE "\n    "
        LET_STMT
          LET_KW "let"
          WHITESPACE " "
          TUPLE_PAT
            L_PAREN "("
            IDENT_PAT
              NAME
                IDENT "a"
            COMMA ","
            R_PAREN ")"
          WHITESPACE " "
          EQ "="
          WHITESPACE " "
          TUPLE_EXPR
            L_PAREN "("
            R_PAREN ")"
          SEMICOLON ";"
        WHITESPACE "\n    "
        LET_STMT
          LET_KW "let"
          WHITESPACE " "
          TUPLE_PAT
            L_PAREN "("
            REST_PAT
              DOT2 ".."
            R_PAREN ")"
          WHITESPACE " "
          EQ "="
          WHITESPACE " "
          TUPLE_EXPR
            L_PAREN "("
            R_PAREN ")"
          SEMICOLON ";"
        WHITESPACE "\n    "
        LET_STMT
          LET_KW "let"
          WHITESPACE " "
          TUPLE_PAT
            L_PAREN "("
            R_PAREN ")"
          WHITESPACE " "
          EQ "="
          WHITESPACE " "
          TUPLE_EXPR
            L_PAREN "("
            R_PAREN ")"
          SEMICOLON ";"
        WHITESPACE "\n    "
        LET_STMT
          LET_KW "let"
          WHITESPACE " "
          TUPLE_PAT
            L_PAREN "("
            OR_PAT
              PIPE "|"
              WHITESPACE " "
              IDENT_PAT
                NAME
                  IDENT "a"
              WHITESPACE " "
              PIPE "|"
              WHITESPACE " "
              IDENT_PAT
                NAME
                  IDENT "a"
            COMMA ","
            WHITESPACE " "
            OR_PAT
              PIPE "|"
              WHITESPACE " "
              IDENT_PAT
                NAME
                  IDENT "b"
            R_PAREN ")"
          WHITESPACE " "
          EQ "="
          WHITESPACE " "
          TUPLE_EXPR
            L_PAREN "("
            TUPLE_EXPR
              L_PAREN "("
              R_PAREN ")"
            COMMA ","
            TUPLE_EXPR
              L_PAREN "("
              R_PAREN ")"
            R_PAREN ")"
          SEMICOLON ";"
        WHITESPACE "\n"
        R_CURLY "}"
  WHITESPACE "\n"