(* Generated by Frama-C WP *)

Goal typed_lemma_mult_simplification.
Hint mult_simplification,property.
Proof.
  intros. destruct(Cdiv_cases (i*i_1) i) as [HH _].
  now rewrite HH, Z.mul_comm, Z_div_mult 
    by (try apply Z.le_ge; auto with zarith).
Qed.


