anchor.diff:        Bit#(32) cVac = compute_cVac(rVac, oldPattMultiOcc, oldPattV, oldIdxR);
         cVacR <= cVac;
         pe_vac.oht.put(cVac);
  -      $display("vacram %d: response rVac = %x, oldPattMultiOcc = %x, oldPattV = %x, oldIdx = %x", cycle, rVac, oldPattMultiOcc, oldPattV, oldIdxR);
  +      $display("vacram %d: response cVac=%x, rVac = %x, oldPattMultiOcc = %x, oldPattV = %x, oldIdx = %x", cycle, cVac, rVac, oldPattMultiOcc, oldPattV, oldIdxR);
      endrule
   
      rule vacram_write;
         let wAddr <- toGet(wAddrPipes[0]).get;
         let wEnb <- toGet(wEnb_vacram_fifo).get;
  +      let vacFLocR <- toGet(vacFLoc_fifo0).get;
         Vector#(wAddrHWidth, Bit#(1)) wAddrH = takeAt(5, unpack(wAddr));
         Bit#(32) wVac = compute_wVac(vacFLocR, newPattMultiOccR, cVacR);
         $display("vacram %d: vacFLoc=%x, newPattMultiOcc=%x, cVac=%x", cycle, vacFLocR, newPattMultiOccR, cVacR);
  
positive.code:    rule pe_vac_out;
        let bin <- toGet(pe_vac.bin).get;
        let vld <- toGet(pe_vac.vld).get;
        vacFLocR <= bin;
        $display("vacram %d: bin=%x vld=%x", cycle, bin, vld);
     endrule
  
  
negative.code:    rule newPatt;
        let newPattMultiOcc <- toGet(newPattMultiOcc_fifo).get;
        let oldNewbPattWr <- toGet(oldNewbPattWr_fifo).get;
        let vacFLocR <- toGet(vacFLoc_fifo1).get;
        newPattMultiOccR <= newPattMultiOcc;
        Bit#(5) oldIdx_ = oldPattMultiOccR ? oldIdxR : 0;
        Bit#(5) newIdx_ = newPattMultiOcc ? newIdxR : vacFLocR;
  