End HARDWARE_ALIGNOF_FACTS.
Module hardware_alignof_facts: HARDWARE_ALIGNOF_FACTS.

Lemma hardware_alignof_consistency (cenv: composite_env) (ha_env: PTree.t Z):
composite_env_consistent cenv ->
ha_env = hardware_alignof_env cenv ->
forall i co ha,
cenv ! i = Some co ->
ha_env ! i = Some ha ->
ha = hardware_alignof_composite ha_env (co_members co).