Instance L: Language := MinimunLanguage.L Var.Instance minL: MinimunLanguage L := MinimunLanguage.minL Var.Instance G: ProofTheory L := MinimunLogic.G Var.Instance AX: NormalAxiomatization L G := MinimunLogic.AX Var.Instance minAX: MinimunAxiomatization L G := MinimunLogic.minAX Var.Instance Kripke_MD: Model := KripkeSemantics.MD Var.Instance Kripke_kMD: KripkeModel Kripke_MD := KripkeSemantics.kMD Var.Instance Kripke_R (M: Kmodel): Relation (Kworlds M) := KripkeSemantics.R Var M.Instance Kripke_SM: Semantics L Kripke_MD := KripkeSemantics.SM Var.Instance Kripke_kminSM (M: Kmodel): KripkeMinimunSemantics L Kripke_MD M Kripke_SM := KripkeSemantics.kminSM Var M.

(* Specifications: *)
Theorem sound_intuitionistic_Kripke_all: sound G Kripke_SM (KripkeModelClass _ (Kmodel_Monotonic + Kmodel_PreOrder)).