[sledge] Expose Formula.t = Fml.t

Reviewed By: da319 Differential Revision: D24532350 fbshipit-source-id: c5ea45dde
4 years ago · fcc27cf7a2
parent b5b4cdd6a8
commit fcc27cf7a2
1 changed files with 1 additions and 1 deletions
--- a/sledge/src/fol.mli
+++ b/sledge/src/fol.mli
@ -85,7 +85,7 @@ end

 (** Formulas *)
 and Formula : sig
-  type t [@@deriving compare, equal, sexp]
+  type t = Fml.t [@@deriving compare, equal, sexp]

  val inject : t -> Term.t
  val project : Term.t -> t option