rotateObjNumeric

$dot rotateObjNumeric arc xC yC: rotates dot by arc degrees around xC, yC

obj method dot rotateObjNumeric {arc xC yC} {
  $self transform rotate "$arc $xC $yC"
}