helm/software/components/ng_kernel/nCicPp.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$ *)
  13
  14 val set_head_beta_reduce: (upto:int -> NCic.term -> NCic.term) -> unit
  15 val set_get_obj: (NUri.uri -> NCic.obj) -> unit
  16
  17 val r2s: bool -> NReference.reference -> string
  18
  19 val ppterm:
  20   context:NCic.context ->
  21   subst:NCic.substitution ->
  22   metasenv:NCic.metasenv ->
  23   ?margin:int ->
  24   ?inside_fix:bool ->
  25    NCic.term -> string
  26
  27 val ppcontext:
  28   ?sep:string ->
  29   subst:NCic.substitution ->
  30   metasenv:NCic.metasenv ->
  31   NCic.context -> string
  32
  33 val ppmetasenv:
  34   subst:NCic.substitution -> NCic.metasenv -> string
  35
  36 val ppsubst: metasenv:NCic.metasenv -> NCic.substitution -> string
  37
  38 val ppobj: NCic.obj -> string
  39
  40 (* variants that use a formatter
  41 module Format : sig
  42   val ppterm:
  43     formatter:Format.formatter ->
  44     context:NCic.context ->
  45     subst:NCic.substitution ->
  46     metasenv:NCic.metasenv ->
  47     ?margin:int ->
  48     ?inside_fix:bool ->
  49      NCic.term -> unit
  50
  51   val ppcontext:
  52     ?sep:string ->
  53     formatter:Format.formatter ->
  54     subst:NCic.substitution ->
  55     metasenv:NCic.metasenv ->
  56     NCic.context -> unit
  57
  58   val ppmetasenv:
  59     formatter:Format.formatter ->
  60     subst:NCic.substitution -> NCic.metasenv -> unit
  61
  62   val ppsubst:
  63     formatter:Format.formatter ->
  64     metasenv:NCic.metasenv -> NCic.substitution -> unit
  65
  66   val ppobj:
  67     formatter:Format.formatter -> NCic.obj -> unit
  68 end
  69 *)