poster-tube-lid: tuning ImplHeadCup

[reprap-play.git] / poster-tube-lid-parametric.scad.pl

diff --git a/poster-tube-lid-parametric.scad.pl b/poster-tube-lid-parametric.scad.pl
index be5f17ba4c5afa15d1335e75b64c92f4edbadf93..019523ad1c73e2b482f8764f4ccbc3c27f01d25a 100755 (executable)
--- a/poster-tube-lid-parametric.scad.pl
+++ b/poster-tube-lid-parametric.scad.pl
@@ -16,9 +16,9 @@ my $slope_angle = 45 * TAU/360;
 my $jcurverad = 5;
 my $tall = 50;
 
-my $lin_len = 4;
+my $lin_len = 2;
 my $sine_size = 5;
-my $sine_angle = 1.2 * TAU/8;
+my $sine_angle = 1.20 * TAU/8;
 
 my $ballend_xr = $thick/2;
 
@@ -28,7 +28,7 @@ my @i_sections = qw(ball0  -6
                    sine0  -10
                    -
                    lin0    2
-                   circle 20
+                   circle 40
                    lin1    2
                    sine1  10
                    -