theorem Th40:
  Vars(FALSUM(A),V) = {}
proof
  FALSUM(A) = 'not' VERUM(A) by QC_LANG2:def 1;
  hence Vars(FALSUM(A),V) = Vars(VERUM(A),V) by Th39 .= {} by Lm2;
end;
