Definition in_Mset (M : Z) := 1 <= M <= 2 ^ (w - 1).Definition Mset := sig in_Mset.Coercion Z_from_Mset (M : Mset) := proj1_sig (P := in_Mset) M.

Lemma logsuplew : forall (M : Mset), Zlog_sup M <= w.