fun main: void = do
    let str: string = "Hello, World"

    -- Matching string(s)
    match str with
        | "Hello, World" -> @write("yes\n")
        | else @write("no\n")
    end

    -- Indexing character in string
    let foo: string = @get(str, 0)
    match foo with
        | "H" -> @write("still yes")
        | else @write("no H")
    end
end