reserve n for Element of NAT,
  p,q,r,s for Element of HP-WFF;
reserve V for SetValuation;

theorem
  SetVal(V,VERUM) = 1 by Def2;
