theorem
  A+^1 = succ A
proof
  thus A+^1 = succ(A+^0) by Lm1,Th28
    .= succ A by Th27;
end;
