apply L_15_7 P P P.primeSet V (P.primeSet.image (evalPrimeFfToNot V))
case h2
P : Formula
h1 : P.IsTautoPrime
V : VarBoolAssignment
⊢ IsDeduct (↑(Finset.image (evalPrimeFfToNot V) P.primeSet)) P
case h2.h1
P : Formula
h1 : P.IsTautoPrime
V : VarBoolAssignment
⊢ ↑P.primeSet ⊆ ↑P.primeSet

case h2.h2
P : Formula
h1 : P.IsTautoPrime
V : VarBoolAssignment
⊢ ↑(Finset.image (evalPrimeFfToNot V) P.primeSet) = evalPrimeFfToNot V '' ↑P.primeSet

case h2.h3
P : Formula
h1 : P.IsTautoPrime
V : VarBoolAssignment
⊢ P = evalPrimeFfToNot V P