anchor.diff:  
   	  if (i == 0) begin
   	     sourceA[0].start(descriptorA.pointer, pack(truncate(startA>>nshift)), pack(truncate(descriptorA.numColumns>>nshift)));
  -	     $display($format(fshow(cycles)+fshow("    sourceA[0].start")+fshow(startA)));
  +	     if (verbose) $display($format(fshow(cycles)+fshow("    sourceA[0].start")+fshow(startA)));
   	  end
   	 sourceB[i].start(descriptorB.pointer, pack(truncate(startB>>nshift)), pack(truncate(descriptorB.numColumns>>nshift)));
   	 UInt#(TLog#(n)) in = fromInteger(i);
   	 Bit#(TAdd#(1,TLog#(n))) nn = fromInteger(n);
  -	 $display($format(fshow(cycles)+fshow("    sourceB[")+fshow(in)+fshow("].start")+fshow(startB)));
  +	 if (verbose) $display($format(fshow(cycles)+fshow("    sourceB[")+fshow(in)+fshow("].start")+fshow(startB)));
   	  if (i == 0)
   	     sinkC.vector.start(descriptorC.pointer, pack(truncate(startC>>nshift)), 1);
          endrule
          if (i == 0)
   	  rule finishSourceA;
  -	     $display($format(fshow(cycles)+fshow("    sourceA[0].finish ")));
  +	     if (verbose) $display($format(fshow(cycles)+fshow("    sourceA[0].finish ")));
   	     let b <- sourceA[0].finish();
   	  endrule
         rule finishSourceB;
   	 UInt#(TLog#(n)) in = fromInteger(i);
  -	 $display($format(fshow(cycles)+fshow("    sourceB[")+fshow(in)+fshow("].finish")));
  +	 if (verbose) $display($format(fshow(cycles)+fshow("    sourceB[")+fshow(in)+fshow("].finish")));
   	 let b <- sourceB[i].finish();
         endrule
         
  
positive.code: 
     let n = valueOf(n);
     let nshift = valueOf(nshift);
     Bool verbose = True;
  
     Reg#(Bool) doneReg <- mkReg(False);
     Reg#(MatrixDescriptor#(UInt#(addrwidth))) descriptorA <- mkReg(unpack(0));
  
negative.code:       xypipes[n+1].deq;
        let b <- sinkC.vector.finish();
        let c = dotprodCount-fromInteger(n);
        if (verbose) $display($format(fshow(cycles)+fshow("    sinkDone c")+fshow(c)+fshow("    xy=")+fshow(xy)));
        dotprodCount <= c;
        if (c == 0) begin
  	 running <= False;
  