changeset 54504 | 096f7d452164 |
parent 53149 | c4e41658307a |
child 54700 | 64177ce0a7bd |
54503:b490e15a5e19 | 54504:096f7d452164 |
---|---|
291 | _ =>*) (if i <> 1 then "prefer " ^ string_of_int i ^ "\n" else "") ^ |
291 | _ =>*) (if i <> 1 then "prefer " ^ string_of_int i ^ "\n" else "") ^ |
292 of_indent 0 ^ "proof -\n" ^ of_proof 1 ctxt proof ^ |
292 of_indent 0 ^ "proof -\n" ^ of_proof 1 ctxt proof ^ |
293 of_indent 0 ^ (if n <> 1 then "next" else "qed") |
293 of_indent 0 ^ (if n <> 1 then "next" else "qed") |
294 end |
294 end |
295 |
295 |
296 end |
296 end; |