let get = function 
    | Arith(op), _ -> op
    | _ -> raise Not_found