Public Sub AddAutoConstraints( _
   ByVal dist_tol As Double, _
   ByVal angle_tol As Double, _
   ByVal NumElements As Long, _
   ByRef Elements() As Object, _
   ByVal NumCnstrTypes As Long, _
   ByRef CnstrTypes() As Long, _
   ByRef NumCnstrs As Long, _
   ByRef Cnstrs() As Object, _
   Optional ByVal varXOriginUnk As Variant, _
   Optional ByVal varYOriginUnk As Variant, _
   Optional ByVal Xdim_pos_x As Variant, _
   Optional ByVal Xdim_pos_y As Variant, _
   Optional ByVal Ydim_pos_x As Variant, _
   Optional ByVal Ydim_pos_y As Variant, _
   Optional ByVal DimPlacementOptions As Variant, _
   Optional ByVal LinearDimOptions As Variant, _
   Optional ByVal PlaceRadiusDimOnCircle As Boolean = False, _
   Optional ByVal PlaceRadiusDimOnArc As Boolean = False, _
   Optional ByVal PlaceDistanceDimFromCircleCenter As Boolean = False _
)