anchor.diff:        descriptorC <= MatrixDescriptor { pointer: pointerC, base: 0, numRows: numRowsA, numColumns: numRowsB};
         dotprodCount <= numRowsA*numRowsB;
   
  -      $display("mm pointerA=%d pointerB=%d pointerC=%d\n", pointerA, pointerB, pointerC);
  +      if (verbose) $display("mm pointerA=%d pointerB=%d pointerC=%d\n", pointerA, pointerB, pointerC);
         if (verbose) $display("mm.start ra=%d ca=%d rb=%d cb=%d dotprodCount=%d", numRowsA, numColumnsA, numRowsB, numColumnsB, dotprodCount);
         if (verbose) $display($format(fshow("mm.start ")+fshow(xycfg)));
         xypipeifc.start(xycfg);
      endmethod
      method ActionValue#(Bool) finish();
  -      $display("mm.finish()");
  +      if (verbose) $display("mm.finish()");
         doneFifo.deq();
         return True;
      endmethod
  
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: 
  	  if (i == 0) begin
  	     sourceA[0].start(descriptorA.pointer, pack(truncate(startA>>nshift)), pack(truncate(descriptorA.numColumns>>nshift)));
  	     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);
  	 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;
  	     if (verbose) $display($format(fshow(cycles)+fshow("    sourceA[0].finish ")));
  	     let b <- sourceA[0].finish();
  	  endrule
        rule finishSourceB;
  	 UInt#(TLog#(n)) in = fromInteger(i);
  	 if (verbose) $display($format(fshow(cycles)+fshow("    sourceB[")+fshow(in)+fshow("].finish")));
  	 let b <- sourceB[i].finish();
        endrule
        
  