open System
open Parser
open CS334

[<EntryPoint>]
let main argv =
    let input = debug argv.[0]
    match grammar input with
    | Success(res,_) ->
        printfn "%A" (eval res)
        0
    | Failure _ ->
        printfn "Failure!"
        1