Module Jslogic.JSLCmd

type t =
  1. | Fold of JSAsrt.t * (string * (string * JSExpr.t) list) option
    (*

    Fold

    *)
  2. | Unfold of JSAsrt.t * (string * string) list option
    (*

    Single Unfold

    *)
  3. | GUnfold of string
    (*

    Global unfold

    *)
  4. | Flash of JSAsrt.t
    (*

    Unfold/fold

    *)
  5. | If of JSExpr.t * t list * t list
    (*

    If-then-else

    *)
  6. | Branch of JSAsrt.pt
  7. | ApplyLemma of string * JSExpr.t list
    (*

    Lemma

    *)
  8. | Macro of string * JSExpr.t list
    (*

    Macro

    *)
  9. | Assert of JSAsrt.t * string list
    (*

    Assert

    *)
  10. | Assume of JSAsrt.pt
    (*

    Assume

    *)
  11. | Invariant of JSAsrt.t * string list
    (*

    Invariant

    *)
  12. | UseSubst of string * (string * JSExpr.t) list
val str_of_folding_info : (string * string) list option -> string