theorem
  args (x-term) = {}
  proof
    (x-term).{} = [x,s] & x-term = [x,s]-tree {} by TREES_4:3,20;
    hence thesis by ABCMIZ_A:def 10;
  end;
