Lemma list_sort_id (A: hSet) : support (list_algebra A) list_sort_idx = listset A. Proof. reflexivity. Qed.
Require Import UniMath.MoreFoundations.Notations. Require Import UniMath.Combinatorics.StandardFiniteSets. Require Import UniMath.Combinatorics.MoreLists. Require Import UniMath.Algebra.Universal.Algebras. Require Import UniMath.Algebra.Universal.Terms.