{A : Type} (l : list A) : l ++ nil = l. Proof. induction l as [|a l IHl]. 1: reflexivity. simpl; f_ap. Defined.
Require Import Basics.Overture Basics.Tactics Basics.PathGroupoids Basics.Trunc Require Import Types.Paths Types.Unit Types.Prod Types.Sigma Types.Sum