theorem Th47:
  1 = { 0 }
proof
  thus 1 = succ 0
    .= { 0 };
end;
