Refactor poking tuples

shader/arc.geom

@@ -2,9 +2,10 @@
 layout (points) in;
 layout (triangle_strip, max_vertices = 4) out;
 in vec4 vColor [];
-in float vRad [];
+in vec4 vparams [];
 out vec4 gColor;
 out float gRad;
+out float gWdth;
 out vec2 cenPosT;
 
 uniform vec2 winSize;
@@ -15,7 +16,8 @@ void main()
   vec3 cenPos = gl_in[0].gl_Position.xyz;
   //cenPos = vec3 (0.5,0,0);
   gColor = vColor[0];
-  gRad = vRad[0] * zoom * 2;
+  gRad = vparams[0].x * zoom * 2;
+  gWdth = vparams[0].w * zoom * 2;
 //  gRad = 0.2;
 
   cenPosT = vec2 ( (cenPos.x + 1) * 0.5 * winSize.x , (cenPos.y + 1) * 0.5 * winSize.y);