clear warning, unused var

dev/science/spectune.c

@@ -2007,14 +2007,14 @@ int specget(double *pitch,chvptr *partials,dataptr dz)
     int vc;
     chvptr here, there;
     float minamp;
-    double /* loudest_partial_frq, nextloudest_partial_frq,  lo_loud_partial, hi_loud_partial,*/ sum;
+    /* double  loudest_partial_frq, nextloudest_partial_frq,  lo_loud_partial, hi_loud_partial, sum; */
     if((exit_status = initialise_ring_vals(MAXIMI,-1.0,dz))<0)
         return(exit_status);
     if((exit_status = rectify_frqs(dz->flbufptr[0],dz))<0)
         return(exit_status);
-    sum = 0.0;
+//    sum = 0.0;
     for(vc=0;vc<dz->wanted;vc+=2) {
-        sum += dz->flbufptr[0][AMPP];
+//        sum += dz->flbufptr[0][AMPP];
         here = dz->ringhead;
         if(dz->flbufptr[0][FREQ] > SPEC_MINFRQ) {                   /* 1 */
             do {