diff --git a/code/awk/mkunion.awk b/code/awk/mkunion.awk
index 2210feb..7dd7117 100755
--- a/code/awk/mkunion.awk
+++ b/code/awk/mkunion.awk
@@ -2,6 +2,7 @@
 
 # create the sdl object: an union of sphere
 BEGIN	{
+	nbre = 0
         print "#declare Bubules = object"
 	print "{ \nunion  { "
 	}
@@ -10,9 +11,11 @@ BEGIN	{
 	{
 	printf("  sphere { <%f, %f, %f>, %f }\n", 	\
 			    $1, $2, $3, $4 )
+	nbre++
 	}
 
 # closing sdl structure
 END	{
-	print "  }\n}\n"
+	print  "  }\n}"
+	printf "// %d bubulles\n", nbre
 	}