Section DerivableRulesFromSequentCalculus1.
Context {L: Language}
{minL: MinimumLanguage L}
{pL: PropositionalLanguage L}
{Gamma: Derivable L}
{bSC: BasicSequentCalculus L Gamma}
{minSC: MinimumSequentCalculus L Gamma}
{ipSC: IntuitionisticPropositionalSequentCalculus L Gamma}.

Lemma derivable_double_negp_intros: forall (Phi: context) (x: expr),
Phi |-- x --> ~~ ~~ x.