Module Sound_KripkeIntuitionistic.

Lemma sound_stable_andp_sepcon1 {L: Language} {minL: MinimumLanguage L} {pL: PropositionalLanguage L} {sepconL: SepconLanguage L} {MD: Model} {kMD: KripkeModel MD} {M: Kmodel} {R1: KI.Relation (Kworlds M)} {R2: SS.Relation (Kworlds M)} {J: Join (Kworlds M)} {SAabs: SeparationAlgebraAbsorbStable (Kworlds M)} {SM: Semantics L MD} {kiSM: KripkeIntuitionisticSemantics L MD M SM} {kminSM: KripkeMinimumSemantics L MD M SM} {kpSM: KripkePropositionalSemantics L MD M SM} {fsepconSM: SepconSemantics L MD M SM} {stableSM: SemanticStable L MD M SM}:
forall x y z, semantic_stable x ->
forall m: Kworlds M, KRIPKE: M, m |= (x && y) * z <--> x && (y * z).