diff --git a/vialtray/tray.pl b/vialtray/tray.pl
index b23da47..8c6006a 100755
--- a/vialtray/tray.pl
+++ b/vialtray/tray.pl
@@ -111,7 +111,7 @@ sub circ
 $z0 = -0.5;
 
 # floor depth
-$zf = -17;
+$zf = -18;
 
 # maximum depth step
 $zs = 2.5;
@@ -123,7 +123,7 @@ $xs = 24;
 $ys = 20;
 
 # vial diameter
-$vd = 18.6;
+$vd = 18.7;
 
 # minimum wall thickness
 $mw = 2.5;
@@ -218,9 +218,7 @@ sub do_cols
 
 	$x = $x0;
 	for ($c = 0; $c != $nc; $c++) {
-if ($c) {
 		&do_col($x);
-}
 		$x += $xs;
 		print "\n";
 	}
@@ -237,9 +235,7 @@ sub do_circles
 		$y = $y0;
 		for ($rw = 0; $rw != $nr; $rw++) {
 			for ($rr = $r0; $rr <= $r1; $rr += $rs) {
-if ($c) {
 				&circ($x, $y, $rr, 180);
-}
 			}
 			print "\n";
 			$y += $ys;