(* --------------------------------------------------------------------
* Copyright (c) - 2012--2016 - IMDEA Software Institute
* Copyright (c) - 2012--2021 - Inria
* Copyright (c) - 2012--2021 - Ecole Polytechnique
*
* Distributed under the terms of the CeCILL-C-V1 license
* -------------------------------------------------------------------- *)
(* -------------------------------------------------------------------- *)
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