punitOfNonemptyOfSubsingleton

Mathlib.Logic.Equiv.Basic

URI: https://scilib.ai/kg/mathlib#Equiv.punitOfNonemptyOfSubsingleton

Lean4

/-- A nonempty subsingleton type is (noncomputably) equivalent to `PUnit`. -/
noncomputable def punitOfNonemptyOfSubsingleton [h : Nonempty α] [Subsingleton α] : α ≃ PUnit :=
  equivOfSubsingletonOfSubsingleton (fun _ => PUnit.unit) fun _ => h.some

Похожие утверждения

Научная платформа российской исследовательской школы.

Разделы

MathLib Explorer
Graph RAG
Лаборатория
Блог
О проекте
Команда

Аффилиация

Вычислительный центр им. А. А. Дороницына при ФИЦ «Информатика и Управление» РАН frccsc.ru