49 Context.generic -> Context.generic |
49 Context.generic -> Context.generic |
50 val add_typ_uncheck: int -> string -> (Proof.context -> typ list -> typ list) -> |
50 val add_typ_uncheck: int -> string -> (Proof.context -> typ list -> typ list) -> |
51 Context.generic -> Context.generic |
51 Context.generic -> Context.generic |
52 val add_term_uncheck: int -> string -> (Proof.context -> term list -> term list) -> |
52 val add_term_uncheck: int -> string -> (Proof.context -> term list -> term list) -> |
53 Context.generic -> Context.generic |
53 Context.generic -> Context.generic |
54 val typ_check: Proof.context -> typ list -> typ list |
54 val apply_typ_check: Proof.context -> typ list -> typ list |
55 val term_check: Proof.context -> term list -> term list |
55 val apply_term_check: Proof.context -> term list -> term list |
56 val typ_uncheck: Proof.context -> typ list -> typ list |
56 val apply_typ_uncheck: Proof.context -> typ list -> typ list |
57 val term_uncheck: Proof.context -> term list -> term list |
57 val apply_term_uncheck: Proof.context -> term list -> term list |
58 val check_sort: Proof.context -> sort -> sort |
58 val check_sort: Proof.context -> sort -> sort |
59 val check_typ: Proof.context -> typ -> typ |
59 val check_typ: Proof.context -> typ -> typ |
60 val check_term: Proof.context -> term -> term |
60 val check_term: Proof.context -> term -> term |
61 val check_prop: Proof.context -> term -> term |
61 val check_prop: Proof.context -> term -> term |
62 val check_typs: Proof.context -> typ list -> typ list |
62 val check_typs: Proof.context -> typ list -> typ list |
320 |> not uncheck ? map rev; |
320 |> not uncheck ? map rev; |
321 in #1 (perhaps (check_all funs) (xs0, ctxt0)) end; |
321 in #1 (perhaps (check_all funs) (xs0, ctxt0)) end; |
322 |
322 |
323 in |
323 in |
324 |
324 |
325 val typ_check = check fst false; |
325 val apply_typ_check = check fst false; |
326 val term_check = check snd false; |
326 val apply_term_check = check snd false; |
327 val typ_uncheck = check fst true; |
327 val apply_typ_uncheck = check fst true; |
328 val term_uncheck = check snd true; |
328 val apply_term_uncheck = check snd true; |
329 |
329 |
330 val check_typs = operation #check_typs; |
330 val check_typs = operation #check_typs; |
331 val check_terms = operation #check_terms; |
331 val check_terms = operation #check_terms; |
332 val check_props = operation #check_props; |
332 val check_props = operation #check_props; |
333 |
333 |