Section KripkeSemantics.
Context {L: Language}
{minL: MinimumLanguage L}
{pL: PropositionalLanguage L}
{MD: Model}
{kMD: KripkeModel MD}
{M: Kmodel}
{R: Relation (Kworlds M)}
{SM: Semantics L MD}
{kminSM: KripkeMinimumSemantics L MD M SM}
{kpSM: KripkePropositionalSemantics L MD M SM}.

Lemma sat_orp: forall m x y, KRIPKE: M , m |= x || y <-> (KRIPKE: M , m |= x \/ KRIPKE: M , m |= y).