Index: common_subc.awk
===================================================================
--- common_subc.awk	(revision 27196)
+++ common_subc.awk	(revision 27197)
@@ -496,7 +496,7 @@
 	s = s "     y = " unit(y) NL
 	s = s "     rot = " rot+0 NL
 	s = s "     smirror = 0; xmirror = 0" NL
-	s = s "     clearance = " either(clearance, DEFAULT["pin_clearance"]) NL
+	s = s "     clearance = " unit(either(clearance, DEFAULT["pin_clearance"])/2) NL
 	s = s "     ha:attributes {" NL
 	s = s "      term = " termid NL
 	if (name != "")