seq_seq'@{} (n : nat) : list_map pr1 (seq' n) = seq n. Proof. lhs nrapply list_map_reverse_acc. apply (ap reverse). apply seq_rev_seq_rev'. Defined.
Require Import Basics.Overture Basics.Tactics Basics.PathGroupoids Basics.Trunc Require Import Types.Paths Types.Unit Types.Prod Types.Sigma Types.Sum