Namespace Svc
	Partial Public Class Motor
		Public Overrides Function Equals(ByVal obj As Object) As Boolean
			If Not TypeOf obj Is Motor Then
				Return False
			End If
			Return CType(obj, Motor).ID = Me.ID
		End Function
	End Class
End Namespace