let A be non empty set ; :: thesis: for v being Element of Valuations_in A
for S being Element of CQC-Sub-WFF holds Val_S v,S = Val_S v,(Sub_not S)

let v be Element of Valuations_in A; :: thesis: for S being Element of CQC-Sub-WFF holds Val_S v,S = Val_S v,(Sub_not S)
let S be Element of CQC-Sub-WFF ; :: thesis: Val_S v,S = Val_S v,(Sub_not S)
Sub_not S = [('not' (S `1 )),(S `2 )] by SUBSTUT1:def 20;
hence Val_S v,S = Val_S v,(Sub_not S) by MCART_1:7; :: thesis: verum