anchor.diff:        FixedPoint#(2,16) ifimg = fxptTruncate(ifc.img);
         outfifo.enq(Complex{rel: ifrel, img: ifimg});
         lo.y.deq();
  +      $write("loout ");
  +      $display(fshow(Complex{rel: ifrel, img: ifimg}));
      endrule
      
      interface PipeIn rfreq = toPipeIn(infifo);
  
positive.code:       if (m.filterPhase == 1)
  	 begin
  	    accum[0] <= m.y;
  	    $display("muloutaccumin0 ph 1 pd.re %x pd.im %x\n",
  	       m.y.rel, m.y.img);
  	    accumout[0].enq(accum[0]);
  	 end
        else
  	 begin
  	    $display("muloutaccumin0 ph 0 pd.re %x pd.im %x\n",
  	       m.y.rel, m.y.img);
  	    accum[0] <= accum[0] + m.y;
  	 end
     endrule
  
negative.code:        mkBRAM2Server(cfg);
     BRAM2Port#(Bit#(10), Complex#(FixedPoint#(2,23))) coeffRam1 <- 
         mkBRAM2Server(cfg);
     Reg#(Bit#(10)) filterPhase <- mkReg(0);
     FIFO#(Bit#(1)) delayFilterPhase <- mkSizedFIFO(3);  // length > bram read latency
     FIFOF#(Vector#(2, Complex#(Signal))) infifo <- mkFIFOF();
     FIFOF#(Complex#(Signal)) outfifo <- mkFIFOF();
  