proposition: Lemma pow_ne_zero : forall n:nat, n <> 0%nat -> 0 ^ n = 0.
proof: Proof. simple induction n. - simpl; auto. intros; elim H; reflexivity. - intros; simpl; apply Rmult_0_l. Qed.
imports: ArithRing Rdefinitions Raxioms RIneq Rpow_def R_Ifp Rbasic_fun R_sqr SplitAbsolu SplitRmult ArithProp Zpower Ztac