Require Logic.MinimunLogic.Semantics.Kripke.
Require Logic.MinimunLogic.Semantics.Trivial.
Local Open Scope logic_base.
Local Open Scope syntax.
Local Open Scope kripke_model.
Section SemanticEquiv.
Context {L: Language}
{minL: MinimunLanguage L}
{MD: Model}
{SM: Semantics L MD}.

Lemma eqR_KripkeIntuitionistic: @Kripke.KripkeIntuitionisticSemantics L MD (unit_kMD _) tt eq SM.