diff --git a/data/tests/Crank.fcstd b/data/tests/Crank.fcstd
new file mode 100644
index 000000000..9562ca8c8
Binary files /dev/null and b/data/tests/Crank.fcstd differ
diff --git a/data/tests/Crank.py b/data/tests/Crank.py
new file mode 100644
index 000000000..a2cb4e4ce
--- /dev/null
+++ b/data/tests/Crank.py
@@ -0,0 +1,104 @@
+#import rpdb2
+#rpdb2.start_embedded_debugger("test")
+import FreeCAD
+import Part
+import Draft
+from FreeCAD import Base
+
+circ1= Part.makeCircle(
+	5,
+	FreeCAD.Vector(10,18,10), FreeCAD.Vector(1,0,0))
+
+circ2 = Part.makeCircle(5)
+
+def DrawMyPart(points, extrude):
+	obj1 = Draft.makeWire(points,closed=True,face=True,support=None)
+	face1 = Part.Face(obj1.Shape)
+	body1= face1.extrude(extrude)
+	Part.show(body1)
+
+# part1
+DrawMyPart([
+	FreeCAD.Vector(0,0,0),
+	FreeCAD.Vector(45,0,0),
+	FreeCAD.Vector(45,20,0),
+	FreeCAD.Vector(0,20,0),
+	], Base.Vector(0,0,4))
+DrawMyPart([
+	FreeCAD.Vector(0,20,0),
+	FreeCAD.Vector(0,180,0),
+	FreeCAD.Vector(25,180,0),
+	FreeCAD.Vector(25,20,0),
+	], Base.Vector(0,0,4))
+DrawMyPart([
+	FreeCAD.Vector(0,180,0),
+	FreeCAD.Vector(0,200,0),
+	FreeCAD.Vector(45,200,0),
+	FreeCAD.Vector(45,180,0),
+	], Base.Vector(0,0,4))
+
+DrawMyPart([
+	FreeCAD.Vector(25,20,0),
+	FreeCAD.Vector(25,180,0),
+ 	FreeCAD.Vector(25,180,9.2),
+ 	FreeCAD.Vector(25,20,9.2),
+	], Base.Vector(0,0,4))
+
+
+# part2
+points=[
+	FreeCAD.Vector(45,200,0),
+	FreeCAD.Vector(68,200,25),
+	FreeCAD.Vector(68,0,25),
+	FreeCAD.Vector(45,0,0),
+	FreeCAD.Vector(45,200,0),
+]
+DrawMyPart([
+	FreeCAD.Vector(45,200,0),
+	FreeCAD.Vector(68,200,25),
+	FreeCAD.Vector(68,180,25),
+	FreeCAD.Vector(45,180,0),
+	], Base.Vector(0,0,4))
+DrawMyPart([
+	FreeCAD.Vector(68,180,25),
+	FreeCAD.Vector(56.7,180,13),
+	FreeCAD.Vector(56.7,20,13),
+	FreeCAD.Vector(68,20,25),
+	], Base.Vector(0,0,4))
+DrawMyPart([
+	FreeCAD.Vector(45,0,0),
+	FreeCAD.Vector(68,0,25),
+	FreeCAD.Vector(68,20,25),
+	FreeCAD.Vector(45,20,0),
+	], Base.Vector(0,0,4))
+
+DrawMyPart([
+ 	FreeCAD.Vector(25,20,0),
+ 	FreeCAD.Vector(45,20,0),
+ 	FreeCAD.Vector(45,20,9.2),
+ 	FreeCAD.Vector(25,20,9.2),
+ 	], Base.Vector(0,0,4))
+DrawMyPart([
+ 	FreeCAD.Vector(25,180,0),
+ 	FreeCAD.Vector(45,180,0),
+ 	FreeCAD.Vector(45,180,9.2),
+ 	FreeCAD.Vector(25,180,9.2),
+ 	], Base.Vector(0,0,4))
+
+
+# part3
+DrawMyPart([
+	FreeCAD.Vector(68,200,25),
+	FreeCAD.Vector(68,200,35),
+	FreeCAD.Vector(68,0,35),
+	FreeCAD.Vector(68,0,25),
+	FreeCAD.Vector(68,200,25),
+	], Base.Vector(0,0,4))
+
+
+circ1= Draft.makeCircle(
+	5,
+	Base.Placement(10,18,10),
+	FreeCAD.Vector(1,0,0))
+
+circ2 = Draft.makeCircle(5)
\ No newline at end of file