(* Copyright 2014 INRIA *) val parse : string -> Smt.Tseitin.t list