fact: Fixpoint batcher_merge_rec_aux m : network (`2^ m.+1) := if m is m1.+1 then rcons (neodup (batcher_merge_rec_aux m1)) batcher_merge else [:: cswap ord0 ord_max].
imports: mathcomp(all_ssreflect perm algebra.zmodp) mathcomp(zify) more_tuple nsort