fact: Example chain2_prop : forall c₁ c₂ : Prop, forall e, (c₁ -> c₂) -> Id↓e ⊩ prop c₁ → prop c₂.
imports: Morphisms ClassicalRealizability.Tactics ClassicalRealizability.BasicResults ClassicalRealizability.Subtyping