From 813e9aa4d196962f47c784aeedeaf1cddf54dc4f Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 8 Jun 2008 16:02:26 -0400 Subject: Beta reductions for expressions --- src/core_util.sig | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/core_util.sig') diff --git a/src/core_util.sig b/src/core_util.sig index 07350798..45ee7dfd 100644 --- a/src/core_util.sig +++ b/src/core_util.sig @@ -80,6 +80,11 @@ structure Exp : sig con : Core.con' -> Core.con', exp : Core.exp' -> Core.exp'} -> Core.exp -> Core.exp + val mapB : {kind : Core.kind' -> Core.kind', + con : 'context -> Core.con' -> Core.con', + exp : 'context -> Core.exp' -> Core.exp', + bind : 'context * binder -> 'context} + -> 'context -> (Core.exp -> Core.exp) val exists : {kind : Core.kind' -> bool, con : Core.con' -> bool, exp : Core.exp' -> bool} -> Core.exp -> bool -- cgit v1.2.3