NewPoint revised

$forceSinglePoint is a global variable to switch whether multiple new points are created or multiple points at the face layers below. The default is True.

NewPoint[ P ->{x,y}, Duplicate -> arg ], where arg is the argument of function DuplicatePoint.
1. if arg is { Q, R}, {Q, R} may be constructed
2. if arg is { }, points of default names may be constructed
3. if arg is True, points of default names may be constructed
4. if arg is False, the only P is constructed