correct-parse.clj

{:c ({:c (), :t :whitespace}
     {:c ({:c ({:c ("l" "e" "t"), :t :let-raw}
               {:c ({:c (" "), :t :whitespace-chunk}), :t :nonempty-whitespace}),
           :t :let}
          {:c ({:c ({:c ("x"), :t :ALPHA}), :t :simple-label}
               {:c ({:c (" "), :t :whitespace-chunk}), :t :whitespace}),
           :t :label}
          {:c ("=" {:c ({:c (" "), :t :whitespace-chunk}), :t :whitespace}), :t :equal}
          {:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ("1"),
                                                                                                                    :t :DIGIT}),
                                                                                                               :t :natural-literal-raw}
                                                                                                              {:c ({:c ({:c ("\n"),
                                                                                                                         :t :end-of-line}),
                                                                                                                    :t :whitespace-chunk}),
                                                                                                               :t :whitespace}),
                                                                                                          :t :natural-literal}),
                                                                                                     :t :primitive-expression}),
                                                                                                :t :selector-expression}),
                                                                                           :t :import-expression}),
                                                                                      :t :application-expression}),
                                                                                 :t :not-equal-expression}),
                                                                            :t :equal-expression}),
                                                                       :t :times-expression}),
                                                                  :t :combine-types-expression}),
                                                             :t :prefer-expression}),
                                                        :t :combine-expression}),
                                                   :t :and-expression}),
                                              :t :list-append-expression}),
                                         :t :text-append-expression}),
                                    :t :plus-expression}),
                               :t :or-expression}),
                          :t :import-alt-expression}),
                     :t :operator-expression}),
                :t :annotated-expression}),
           :t :expression}
          {:c ({:c ("i" "n"), :t :in-raw}
               {:c ({:c (" "), :t :whitespace-chunk} {:c (" "), :t :whitespace-chunk}),
                :t :nonempty-whitespace}),
           :t :in}
          {:c ({:c ({:c ("l" "e" "t"), :t :let-raw}
                    {:c ({:c (" "), :t :whitespace-chunk}), :t :nonempty-whitespace}),
                :t :let}
               {:c ({:c ({:c ("y"), :t :ALPHA}), :t :simple-label}
                    {:c ({:c (" "), :t :whitespace-chunk}), :t :whitespace}),
                :t :label}
               {:c (":" {:c ({:c (" "), :t :whitespace-chunk}), :t :nonempty-whitespace}),
                :t :colon}
               {:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ("Natural"
                                                                                                                   {:c ({:c (" "),
                                                                                                                         :t :whitespace-chunk}),
                                                                                                                    :t :whitespace}),
                                                                                                               :t :keyword}),
                                                                                                          :t :primitive-expression}),
                                                                                                     :t :selector-expression}),
                                                                                                :t :import-expression}),
                                                                                           :t :application-expression}),
                                                                                      :t :not-equal-expression}),
                                                                                 :t :equal-expression}),
                                                                            :t :times-expression}),
                                                                       :t :combine-types-expression}),
                                                                  :t :prefer-expression}),
                                                             :t :combine-expression}),
                                                        :t :and-expression}),
                                                   :t :list-append-expression}),
                                              :t :text-append-expression}),
                                         :t :plus-expression}),
                                    :t :or-expression}),
                               :t :import-alt-expression}),
                          :t :operator-expression}),
                     :t :annotated-expression}),
                :t :expression}
               {:c ("=" {:c ({:c (" "), :t :whitespace-chunk}), :t :whitespace}), :t :equal}
               {:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ("2"),
                                                                                                                         :t :DIGIT}),
                                                                                                                    :t :natural-literal-raw}
                                                                                                                   {:c ({:c ({:c ("\n"),
                                                                                                                              :t :end-of-line}),
                                                                                                                         :t :whitespace-chunk}),
                                                                                                                    :t :whitespace}),
                                                                                                               :t :natural-literal}),
                                                                                                          :t :primitive-expression}),
                                                                                                     :t :selector-expression}),
                                                                                                :t :import-expression}),
                                                                                           :t :application-expression}),
                                                                                      :t :not-equal-expression}),
                                                                                 :t :equal-expression}),
                                                                            :t :times-expression}),
                                                                       :t :combine-types-expression}),
                                                                  :t :prefer-expression}),
                                                             :t :combine-expression}),
                                                        :t :and-expression}),
                                                   :t :list-append-expression}),
                                              :t :text-append-expression}),
                                         :t :plus-expression}),
                                    :t :or-expression}),
                               :t :import-alt-expression}),
                          :t :operator-expression}),
                     :t :annotated-expression}),
                :t :expression}
               {:c ({:c ("i" "n"), :t :in-raw}
                    {:c ({:c (" "), :t :whitespace-chunk} {:c (" "), :t :whitespace-chunk}),
                     :t :nonempty-whitespace}),
                :t :in}
               {:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ({:c ("x"),
                                                                                                                              :t :ALPHA}),
                                                                                                                         :t :simple-label}
                                                                                                                        {:c (),
                                                                                                                         :t :whitespace}),
                                                                                                                    :t :label}),
                                                                                                               :t :identifier}),
                                                                                                          :t :primitive-expression}),
                                                                                                     :t :selector-expression}),
                                                                                                :t :import-expression}),
                                                                                           :t :application-expression}),
                                                                                      :t :not-equal-expression}),
                                                                                 :t :equal-expression}),
                                                                            :t :times-expression}),
                                                                       :t :combine-types-expression}),
                                                                  :t :prefer-expression}),
                                                             :t :combine-expression}),
                                                        :t :and-expression}),
                                                   :t :list-append-expression}),
                                              :t :text-append-expression}),
                                         :t :plus-expression}),
                                    :t :or-expression}),
                               :t :import-alt-expression}),
                          :t :operator-expression}),
                     :t :annotated-expression}),
                :t :expression}),
           :t :expression}),
      :t :expression}),
 :t :complete-expression}