Structure computeLib


Source File Identifier index Theory binding index

signature computeLib =
sig
  include Abbrev
  type compset

  val auto_import_definitions : bool ref

  val monitoring      : (term -> bool) option ref
  val stoppers        : (term -> bool) option ref

  val new_compset     : thm list -> compset
  val bool_compset    : unit -> compset

  val add_thms        : thm list -> compset -> unit
  val add_conv        : term * int * conv -> compset -> unit
  val add_thmset      : string -> compset -> unit
  val set_skip        : compset -> term -> int option -> unit

  val scrub_const     : compset -> term -> unit
  val scrub_thms      : thm list -> compset -> unit

  val lazyfy_thm      : thm -> thm
  val strictify_thm   : thm -> thm

  val CBV_CONV        : compset -> conv
  val WEAK_CBV_CONV   : compset -> conv

  val the_compset     : compset
  val add_funs        : thm list -> unit
  val add_convs       : (term * int * conv) list -> unit

  val del_consts      : term list -> unit
  val del_funs        : thm list -> unit

  val EVAL_CONV       : conv
  val EVAL_RULE       : thm -> thm
  val EVAL_TAC        : tactic

  val RESTR_EVAL_CONV : term list -> conv
  val RESTR_EVAL_RULE : term list -> thm -> thm
  val RESTR_EVAL_TAC  : term list -> tactic

  val add_datatype_info : compset -> TypeBasePure.tyinfo -> unit
  val write_datatype_info : TypeBasePure.tyinfo -> unit

  val add_persistent_funs : string list -> unit
  val del_persistent_consts : term list -> unit
  val pp_compset : compset Parse.pprinter

  type transform = clauses.transform

  val listItems : compset -> ((string * string) * transform list) list
  val unmapped  : compset -> (string * string) list

  datatype compset_element =
      Convs of (term * int * conv) list
    | Defs of thm list
    | Extenders of (compset -> unit) list
    | Tys of hol_type list

  val compset_conv: compset -> compset_element list -> conv
  val extend_compset: compset_element list -> compset -> unit
end


Source File Identifier index Theory binding index

HOL 4, Kananaskis-13