matita/components/ng_paramodulation/nCicParamod.mli

   1 (*
   2     ||M||  This file is part of HELM, an Hypertextual, Electronic
   3     ||A||  Library of Mathematics, developed at the Computer Science
   4     ||T||  Department, University of Bologna, Italy.
   5     ||I||
   6     ||T||  HELM is free software; you can redistribute it and/or
   7     ||A||  modify it under the terms of the GNU General Public License
   8     \   /  version 2 or (at your option) any later version.
   9      \ /   This software is distributed as is, NO WARRANTY.
  10       V_______________________________________________________________ *)
  11
  12 (* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *)
  13
  14 val nparamod :
  15   #NCicCoercion.status ->
  16   NCic.metasenv -> NCic.substitution -> NCic.context ->
  17     (NCic.term * NCic.term) -> (NCic.term * NCic.term) list ->
  18      (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
  19
  20 type state
  21 val empty_state: state
  22 val forward_infer_step: state -> NCic.term -> NCic.term -> state
  23 val index_obj: #NCic.status -> state -> NUri.uri -> state
  24 val is_equation:
  25  #NCic.status -> NCic.metasenv -> NCic.substitution -> NCic.context ->
  26   NCic.term -> bool
  27 val paramod :
  28   #NCicCoercion.status ->
  29   NCic.metasenv -> NCic.substitution -> NCic.context ->
  30   state ->
  31   (NCic.term * NCic.term) ->
  32   (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
  33 val fast_eq_check :
  34   #NCicCoercion.status ->
  35   NCic.metasenv -> NCic.substitution -> NCic.context ->
  36   state ->
  37   (NCic.term * NCic.term) ->
  38   (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
  39 val demod :
  40   #NCicCoercion.status ->
  41   NCic.metasenv -> NCic.substitution -> NCic.context ->
  42   state ->
  43   (NCic.term * NCic.term) ->
  44   (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list