Local Open Scope logic_base.
Local Open Scope syntax.
Section Sound.
Context {L: Language}
{minL: MinimunLanguage L}
{MD: Model}
{SM: Semantics L MD}
{tminSM: TrivialMinimunSemantics L MD SM}.

Lemma sound_modus_ponens:
forall x y m,
m |= (x --> y) -> m |= x -> m |= y.