Section DerivableRulesFromAxiomatization1.
Context {L: Language}
{minL: MinimumLanguage L}
{pL: PropositionalLanguage L}
{Gamma: Provable L}
{minAX: MinimumAxiomatization L Gamma}
{ipAX: IntuitionisticPropositionalLogic L Gamma}
{cpAX: ClassicalPropositionalLogic L Gamma}.

Lemma double_negp: forall (x: expr),
|-- ~~ (~~ x) <--> x.