int_mul_1_r@{} (x : Int) : x * 1 = x. Proof. induction x as [|x IHx|x IHx]. - reflexivity. - by rewrite int_mul_succ_l, IHx. - by rewrite int_mul_pred_l, IHx. Defined.
Require Import Basics.Overture Basics.Nat Basics.Tactics Basics.Decidable Basics.Equivalences Basics.PathGroupoids Types.Paths Types.Universe. Require Import Spaces.Nat.Core.