End HARDWARE_ALIGNOF_FACTS.
Module hardware_alignof_facts: HARDWARE_ALIGNOF_FACTS.

Lemma hardware_alignof_completeness (cenv: composite_env) (ha_env: PTree.t Z):
ha_env = hardware_alignof_env cenv ->
forall i,
(exists co, cenv ! i = Some co) <->
(exists ha, ha_env ! i = Some ha).