Definition var_env''le (ve1 ve2 : var_env'') :=
forall x : ad, in_dom _ x ve1 = true -> in_dom _ x ve2 = true.

Lemma bool_expr_to_var_env''_card :
forall (L U n : nat) (be : bool_expr),
be_ok (var_lu L U) be ->
cardinal _ (bool_expr_to_var_env'' L U be) n -> n <= two_power (U - L).