have hr : [(p ⋏ q) ⋏ r] ⊢[𝓢]! r := conj₂'! id!
case h₁.h
F : Type u_1
inst✝⁴ : LogicalConnective F
inst✝³ : DecidableEq F
S : Type u_2
inst✝² : System F S
𝓢 : S
inst✝¹ : Minimal 𝓢
p q r : F
Γ Δ : List F
inst✝ : System.NegationEquiv 𝓢
hp : [(p ⋏ q) ⋏ r] ⊢[𝓢]! p
hq : [(p ⋏ q) ⋏ r] ⊢[𝓢]! q
⊢ [(p ⋏ q) ⋏ r] ⊢[𝓢]! p ⋏ q ⋏ r
case h₁.h
F : Type u_1
inst✝⁴ : LogicalConnective F
inst✝³ : DecidableEq F
S : Type u_2
inst✝² : System F S
𝓢 : S
inst✝¹ : Minimal 𝓢
p q r : F
Γ Δ : List F
inst✝ : System.NegationEquiv 𝓢
hp : [(p ⋏ q) ⋏ r] ⊢[𝓢]! p
hq : [(p ⋏ q) ⋏ r] ⊢[𝓢]! q
hr : [(p ⋏ q) ⋏ r] ⊢[𝓢]! r
⊢ [(p ⋏ q) ⋏ r] ⊢[𝓢]! p ⋏ q ⋏ r