Modal Companion

Gödel-McKensey-Tarski Theorem

Through a translation called Gödel Translation from propositional logic formula to modal logic formula, intuitionistic logic can be embedded into . (This theorem is known as Gödel-McKensey-Tarski Theorem.)

def GoedelTranslation : Superintuitionistic.Formula α → Formula α

postfix:75 "ᵍ" => GoedelTranslation

theorem provable_efq_iff_provable_S4
  {p : Superintuitionistic.Formula α}
  : 𝐈𝐧𝐭 ⊢! p ↔ 𝐒𝟒 ⊢! pᵍ

The generalized version of this relationship is called Modal Companion. has modal companion.

class ModalCompanion (i𝓓 : Superintuitionistic.DeductionParameter α) (m𝓓 : Modal.Standard.DeductionParameter α) where
  companion : ∀ {p : Superintuitionistic.Formula α}, i𝓓 ⊢! p ↔ m𝓓 ⊢! pᵍ

instance : ModalCompanion 𝐈𝐧𝐭 𝐒𝟒