oh/common/hdl/oh_gray2bin.v

module oh_gray2bin (/*AUTOARG*/
   // Outputs
   bin,
   // Inputs
   gray
   );

   //###############################################################
   //# Interface
   //###############################################################

   input [DW-1:0]  gray;   //gray encoded input
   output [DW-1:0] bin;    //binary encoded output

   parameter DW = 64;         //width of converter
   
   //###############################################################
   //# BODY
   //###############################################################
   reg [DW-1:0]    bin;   
   integer 	   i,j;

   always @*
     begin
	bin[DW-1] = gray[DW-1];   
	for (i=0; i<(DW-1); i=i+1)
	  begin
	     bin[i] = 1'b0;	
	     for (j=i; j<DW; j=j+1)
	       bin[i] = bin[i] ^ gray [j];
	  end
     end
   
endmodule // oh_gray2bin