diff --git a/examples/spiral/dragon.scad b/examples/spiral/dragon.scad
index 01aa866b..657dca23 100644
--- a/examples/spiral/dragon.scad
+++ b/examples/spiral/dragon.scad
@@ -119,23 +119,23 @@ module head(angy_angz) {
         rotate([90, 0, -90]) 
             sweep(paths2sections([path1, path2, path3, path4, path5]));
 
-        translate([0, 0, -3]) 
+        translate([0, 0, -4]) 
         rotate([90, 0, -90]) 
             ellipse_extrude(5.5, slices = 4) 
                 polygon(
-                shape_trapezium([6, 20], 
-                h = 20,
-                corner_r = 0)
-            );    
+                shape_trapezium([5, 18], 
+                    h = 20,
+                    corner_r = 3.25, $fn = 5)
+                );    
                     
         mirror([1, 0, 0]) 
         translate([0, 0, -3]) 
         rotate([85, 0, -90])
         ellipse_extrude(4, slices = 2) 
             polygon(
-                shape_trapezium([6, 19], 
+                shape_trapezium([5, 18], 
                 h = 20,
-                corner_r = 0)
+                corner_r = 3.25, $fn = 5)
             );       
     }
     
@@ -151,11 +151,11 @@ module head(angy_angz) {
     }
     
     module one_beard() {
-        translate([-11, -12, -11])
+        translate([-11.25, -12, -11])
         rotate(180) 
         linear_extrude(8, scale = 0.2, twist = 90) 
         translate([-10, -10, 0]) 
-            circle(1.25, $fn = 6);    
+            circle(1, $fn = 6);    
     }
     
     rotate([0, angy_angz[0] + 15, angy_angz[1]]) 
@@ -207,7 +207,7 @@ module dragon() {
         
     translate([19, 0, 65]) 
     rotate([95, 0, 0]) 
-    head(angy_angz);
+        head(angy_angz);
 }
 
 module flame_mountain(beginning_radius, fn, amplitude,curve_step, smoothness) {
diff --git a/examples/turtle/hilbert_dragon.scad b/examples/turtle/hilbert_dragon.scad
index 458b254e..006a8b07 100644
--- a/examples/turtle/hilbert_dragon.scad
+++ b/examples/turtle/hilbert_dragon.scad
@@ -115,23 +115,23 @@ module hilbert_dragon() {
             rotate([90, 0, -90]) 
                 sweep(paths2sections([path1, path2, path3, path4, path5]));
 
-            translate([0, 0, -3]) 
+            translate([0, 0, -4]) 
             rotate([90, 0, -90]) 
                 ellipse_extrude(5.5, slices = 4) 
                     polygon(
-                    shape_trapezium([6, 20], 
-                    h = 20,
-                    corner_r = 0)
-                );    
+                    shape_trapezium([5, 18], 
+                        h = 20,
+                        corner_r = 3.25, $fn = 5)
+                    );    
                         
             mirror([1, 0, 0]) 
             translate([0, 0, -3]) 
             rotate([85, 0, -90])
             ellipse_extrude(4, slices = 2) 
                 polygon(
-                    shape_trapezium([6, 19], 
+                    shape_trapezium([5, 18], 
                     h = 20,
-                    corner_r = 0)
+                    corner_r = 3.25, $fn = 5)
                 );       
         }
         
@@ -147,11 +147,11 @@ module hilbert_dragon() {
         }
         
         module one_beard() {
-            translate([-11, -12, -11])
+            translate([-11.25, -12, -11])
             rotate(180) 
             linear_extrude(8, scale = 0.2, twist = 90) 
             translate([-10, -10, 0]) 
-                circle(1.25, $fn = 6);    
+                circle(1, $fn = 6);    
         }
         
         rotate([0, angy_angz[0] + 15, angy_angz[1]])