Rewrite CalcNewPoint