Attention une mise à jour du serveur va être effectuée le lundi 17 mai entre 13h et 13h30. Cette mise à jour va générer une interruption du service de quelques minutes.

Commit a3749c0b authored by MARCHE Claude's avatar MARCHE Claude

transf compute: comments in .mli

parent 367307fe
......@@ -4,6 +4,8 @@ open Decl
open Task
open Theory
(* obsolete
type env = {
tknown : Decl.known_map;
vsenv : term Mvs.t;
......@@ -328,7 +330,7 @@ let () =
(fun env -> (compute env))
~desc:"Compute@ as@ much@ as@ possible"
(* compute with rewrite rules *)
......@@ -68,15 +68,30 @@ terms are normalized with respect to
type engine
(** abstract type for reduction engines *)
val create : Env.env -> Decl.decl Ident.Mid.t -> engine
(** [create env known_map] creates a reduction engine with
. builtins theories (int.Int, etc.) extracted from [env]
. known declarations from [known_map]
. empty set of rewrite rules
exception NotARewriteRule of string
val add_rule : Term.term -> engine -> engine
(** [add_rule t e] turns [t] into a new rewrite rule and returns the
new engine.
raise NotARewriteRule if [t] cannot be seen as a rewrite rule
according to the general rules given above.
val normalize : engine -> Term.term -> Term.term
(** [normalize e t] normalizes the term [t] with respect to the engine
TODO: specify the behavior when non-termination...
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment