End hardware_alignof_facts.
Export hardware_alignof_facts.

(* Specifications: *)
Lemma hardware_alignof_two_p: forall (cenv: composite_env) (ha_env: PTree.t Z),
composite_env_consistent cenv ->
hardware_alignof_env_consistent cenv ha_env ->
hardware_alignof_env_complete cenv ha_env ->
forall t, exists n,
hardware_alignof ha_env t = two_power_nat n.
Lemma hardware_alignof_pos: forall (cenv: composite_env) (ha_env: PTree.t Z),
composite_env_consistent cenv ->
hardware_alignof_env_consistent cenv ha_env ->
hardware_alignof_env_complete cenv ha_env ->
forall t,
hardware_alignof ha_env t > 0.
Lemma hardware_alignof_composite_two_p: forall (cenv: composite_env) (ha_env: PTree.t Z),
composite_env_consistent cenv ->
hardware_alignof_env_consistent cenv ha_env ->
hardware_alignof_env_complete cenv ha_env ->
forall m, exists n,
hardware_alignof_composite ha_env m = two_power_nat n.