import Spa.Lattice

/-!

# Unit Lattice

This file provides a proof that in addition to being a lattice,
`PUnit` is a `Spa.FiniteHeightLattice`. This is fairly trivial result,
but the unit is used as a placeholder in various contexts (e.g.,
as a base case for the iterated product `Spa/Lattice/IterProd.lean`). -/

namespace Spa

instance : FiniteHeightLattice PUnit := FiniteHeightLattice.ofUnique PUnit

end Spa