src/Pure/Isar/proof_context.ML
changeset 14780 949a3f558a43
parent 14720 ceff6d4fb836
child 14828 15d12761ba54
equal deleted inserted replaced
14779:e15d4bd7fe71 14780:949a3f558a43
    23   val init: theory -> context
    23   val init: theory -> context
    24   val is_fixed: context -> string -> bool
    24   val is_fixed: context -> string -> bool
    25   val default_type: context -> string -> typ option
    25   val default_type: context -> string -> typ option
    26   val used_types: context -> string list
    26   val used_types: context -> string list
    27   val read_typ: context -> string -> typ
    27   val read_typ: context -> string -> typ
    28   val read_typ_no_norm: context -> string -> typ
    28   val read_typ_raw: context -> string -> typ
    29   val cert_typ: context -> typ -> typ
    29   val cert_typ: context -> typ -> typ
    30   val cert_typ_no_norm: context -> typ -> typ
    30   val cert_typ_raw: context -> typ -> typ
    31   val get_skolem: context -> string -> string
    31   val get_skolem: context -> string -> string
    32   val extern_skolem: context -> term -> term
    32   val extern_skolem: context -> term -> term
    33   val read_termTs: context -> (string -> bool) -> (indexname -> typ option)
    33   val read_termTs: context -> (string -> bool) -> (indexname -> typ option)
    34     -> (indexname -> sort option) -> string list -> (string * typ) list
    34     -> (indexname -> sort option) -> string list -> (string * typ) list
    35     -> term list * (indexname * typ) list
    35     -> term list * (indexname * typ) list
   411 
   411 
   412 in
   412 in
   413 
   413 
   414 (* Read/certify type, using default sort information from context. *)
   414 (* Read/certify type, using default sort information from context. *)
   415 
   415 
   416 val read_typ = read_typ_aux Sign.read_typ';
   416 val read_typ     = read_typ_aux Sign.read_typ';
   417 val read_typ_no_norm = read_typ_aux Sign.read_typ_no_norm';
   417 val read_typ_raw = read_typ_aux Sign.read_typ_raw';
   418 val cert_typ = cert_typ_aux Sign.certify_typ;
   418 val cert_typ     = cert_typ_aux Sign.certify_typ;
   419 val cert_typ_no_norm = cert_typ_aux Sign.certify_typ_no_norm;
   419 val cert_typ_raw = cert_typ_aux Sign.certify_typ_raw;
   420 
   420 
   421 end;
   421 end;
   422 
   422 
   423 
   423 
   424 (* internalize Skolem constants *)
   424 (* internalize Skolem constants *)