theorem Th4:
  len f > 1 implies len Ant(f) > 0
proof
  assume len f > 1;
  then len Ant(f)+1 > 1 by Th2;
  hence thesis by NAT_1:13;
end;
