proposition: Lemma cocone_source_oppc : forall c, is_cone c -> cocone_source (oppc c) = opp (cone_source c).
proof: Proof. ir. uf cocone_source. rw cosocle_oppc. rw source_oppf. tv. ap socle_axioms. am. am. Qed.
imports: Arith limits