-val nparamod :
- NCic.metasenv -> NCic.substitution -> NCic.context ->
- (NCic.term * NCic.term) -> (NCic.term * NCic.term) list ->
- unit
+(*
+ ||M|| This file is part of HELM, an Hypertextual, Electronic
+ ||A|| Library of Mathematics, developed at the Computer Science
+ ||T|| Department, University of Bologna, Italy.
+ ||I||
+ ||T|| HELM is free software; you can redistribute it and/or
+ ||A|| modify it under the terms of the GNU General Public License
+ \ / version 2 or (at your option) any later version.
+ \ / This software is distributed as is, NO WARRANTY.
+ V_______________________________________________________________ *)
+
+(* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *)
+
+module Paramod ( B : Terms.Blob ) :
+ sig
+ type bag = B.t Terms.bag * int
+ val mk_passive : bag -> B.t * B.t -> bag * B.t Terms.unit_clause
+ val mk_goal : bag -> B.t * B.t -> bag * B.t Terms.unit_clause
+ val paramod :
+ bag -> g_passives:B.t Terms.unit_clause list ->
+ passives:B.t Terms.unit_clause list ->
+ (B.t Terms.bag * int * int list) list
+ end