program
many11
        literal "-"
        else seq14
        call name
        assert
        dedent
        copyinput
        writeline
        literal ":"
        assert
        call terms
        assert
        say "return"
        writeline
seq14
        continue choice13
        literal "#"
        else seq63
many66
        notin ""
        else seq69
seq69
choice68
        continue many66
        assert
seq63
choice13
        continue many11
        else seq10
seq10
choice9
        return
terms
        call term
        else seq101
many110
        literal ","
        else seq113
        say "continue "
        gen choice
        writeline
        call term
        assert
seq113
choice112
        continue many110
        assert
        dedent
        gen choice
        writeline
seq101
choice100
        return
term
        call factor
        else seq189
        say "else "
        gen seq
        writeline
seq189
        continue choice188
        call output
        else seq226
seq226
choice188
        else seq185
many243
        call factor
        else seq246
        say "assert"
        writeline
seq246
        continue choice245
        call output
        else seq277
seq277
choice245
        continue many243
        assert
        dedent
        gen seq
        writeline
seq185
choice184
        return
factor
        call string
        else seq321
        say "literal "
        copyinput
        writeline
seq321
        continue choice320
        literal "("
        else seq356
        call terms
        assert
        literal ")"
        assert
seq356
        continue choice320
        literal "["
        else seq376
        dedent
        gen many
        writeline
        call terms
        assert
        say "continue "
        gen many
        writeline
        literal "]"
        assert
seq376
        continue choice320
        call name
        else seq434
        say "call "
        copyinput
        writeline
seq434
        continue choice320
        literal "<<"
        else seq464
        say "begin"
        writeline
        call terms
        assert
        literal ">>"
        assert
        say "end"
        writeline
seq464
        continue choice320
        literal ":fnord"
        else seq508
        say "fnord"
        writeline
        call factor
        assert
seq508
        continue choice320
        literal ":notin"
        else seq540
        call string
        assert
        say "notin "
        copyinput
        writeline
seq540
        continue choice320
        literal ":between"
        else seq575
        call string
        assert
        say "between "
        copyinput
        writeline
seq575
choice320
        return
output
        call quasiquote
        else seq625
seq625
        continue choice624
        literal "@"
        else seq646
        say "dedent"
        writeline
        call var
        else seq666
seq666
        continue choice665
        call quasiquote
        else seq680
seq680
choice665
        assert
seq646
choice624
        else seq621
        say "writeline"
        writeline
seq621
choice620
        return
quasiquote
        literal "{"
        else seq743
many746
        begin
        call ch
        else seq759
many766
        call ch
        else seq769
seq769
choice768
        continue many766
        assert
seq759
choice758
        end
        else seq753
seq753
        continue choice752
        literal "\"
        else seq794
        begin
        notin ""
        else seq802
seq802
choice801
        end
        assert
seq794
choice752
        else seq749
        say "say ""
        copyinput
        say """
        writeline
seq749
        continue choice748
        literal "$"
        else seq843
        call var
        assert
seq843
choice748
        continue many746
        assert
        literal "}"
        assert
seq743
choice742
        return
ch
        notin "$}\"
        else seq872
seq872
choice871
        return
var
        literal "it"
        else seq890
        say "copyinput"
        writeline
seq890
        continue choice889
        call name
        else seq916
        say "gen "
        copyinput
        writeline
seq916
choice889
        return
string
        fnord
        begin
        literal '"'
        else seq964
many967
        notin '"'
        else seq970
seq970
choice969
        continue many967
        assert
        literal '"'
        assert
seq964
        continue choice963
        literal "'"
        else seq990
many993
        notin "'"
        else seq996
seq996
choice995
        continue many993
        assert
        literal "'"
        assert
seq990
choice963
        end
        else seq954
seq954
choice953
        return
name
        fnord
        begin
        call letter
        else seq1039
many1050
        call letter
        else seq1053
seq1053
        continue choice1052
        between "09"
        else seq1070
seq1070
choice1052
        continue many1050
        assert
seq1039
choice1038
        end
        else seq1029
seq1029
choice1028
        return
letter
        between "az"
        else seq1103
seq1103
        continue choice1102
        between "AZ"
        else seq1115
seq1115
        continue choice1102
        between "__"
        else seq1127
seq1127
choice1102
        return