swh:1:snp:f06d4d1f1c56d17a2f00ca108b0c7636a874db0d
Tip revision: 3f4a0bd5596888cd8d28b97687d477942187aa5f authored by Pierre-Yves Strub on 11 June 2022, 06:10:21 UTC
In loop fusion/fission, add more constraints on the epilog
In loop fusion/fission, add more constraints on the epilog
Tip revision: 3f4a0bd
ecSearch.mli
(* -------------------------------------------------------------------- *)
open EcPath
open EcFol
open EcTyping
(* -------------------------------------------------------------------- *)
type pattern = (ptnmap * EcUnify.unienv) * form
type search = [
| `ByPath of Sp.t
| `ByPattern of pattern
| `ByOr of search list
]
type search_result =
(path * [`Axiom of EcDecl.axiom | `Schema of EcDecl.ax_schema]) list
val search : EcEnv.env -> search list -> search_result
val sort : Sp.t -> search_result -> search_result