diff options
Diffstat (limited to 'src/disjoint.sig')
| -rw-r--r-- | src/disjoint.sig | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/disjoint.sig b/src/disjoint.sig index 16afa885..025269cf 100644 --- a/src/disjoint.sig +++ b/src/disjoint.sig @@ -30,9 +30,14 @@ signature DISJOINT = sig type env val empty : env - val assert : ElabEnv.env -> env -> Elab.con * Elab.con -> env val enter : env -> env - val prove : ElabEnv.env -> env -> Elab.con * Elab.con * ErrorMsg.span -> (Elab.con * Elab.con) list + type goal = ErrorMsg.span * ElabEnv.env * env * Elab.con * Elab.con + + val assert : ElabEnv.env -> env -> Elab.con * Elab.con -> env * goal list + + val prove : ElabEnv.env -> env -> Elab.con * Elab.con * ErrorMsg.span -> goal list + + val hnormCon : ElabEnv.env * env -> Elab.con -> Elab.con * goal list end |