From: Enrico Tassi Date: Tue, 31 Jul 2007 10:39:31 +0000 (+0000) Subject: removed comments in proof presentation X-Git-Tag: 0.4.95@7852~267 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=645336bf3cafbd68223c927927829cc0cb71bc06;p=helm.git removed comments in proof presentation --- diff --git a/components/content_pres/content2pres.ml b/components/content_pres/content2pres.ml index a99278dbc..e25ff40d8 100644 --- a/components/content_pres/content2pres.ml +++ b/components/content_pres/content2pres.ml @@ -181,7 +181,9 @@ and proof2pres ?skip_initial_lambdas is_top_down term2pres p = | _ -> p.Con.proof_context) presacontext in +(* let body = B.V([],[B.b_kw ("(*<<" ^ p.Con.proof_conclude.Con.conclude_method ^ (if is_top_down then "(TD)" else "(NTD)") ^ "*)"); body; B.b_kw "(*>>*)"]) in +*) match p.Con.proof_name with None -> body | Some name ->