structure foo (α : Type) extends has_le α structure bar (α : Type) extends foo α