coff_l.v

這是一個二維的上提式9/7離散小波的Verilog的源碼,此為Encoder

module coff_l(
	indata,
	sel,
	outdata
	);

parameter Data_Width = 20;

input	[Data_Width-1:0]	indata;
input				sel;
output	[Data_Width-1:0]	outdata;
reg	[Data_Width-1:0]	outdata;
reg	[Data_Width-2:0]	temp;

//parameter l = 0.443506852

always @(indata or sel) begin
	if(sel) begin	//+
		temp = (indata[Data_Width-2:0] >> 2) + (indata[Data_Width-2:0] >> 3) +
		       (indata[Data_Width-2:0] >> 4) + (indata[Data_Width-2:0] >> 5) +
		       (indata[Data_Width-2:0] >> 9) + (indata[Data_Width-2:0] >> 11) +
		       (indata[Data_Width-2:0] >> 12) + (indata[Data_Width-2:0] >> 13) +
		       (indata[Data_Width-2:0] >> 14) + (indata[Data_Width-2:0] >> 17) + (indata[Data_Width-2:0] >> 18);
		outdata = {indata[Data_Width-1], temp};
	end
	else begin	//-
		temp = (indata[Data_Width-2:0] >> 2) + (indata[Data_Width-2:0] >> 3) +
		       (indata[Data_Width-2:0] >> 4) + (indata[Data_Width-2:0] >> 5) +
		       (indata[Data_Width-2:0] >> 9) + (indata[Data_Width-2:0] >> 11) +
		       (indata[Data_Width-2:0] >> 12) + (indata[Data_Width-2:0] >> 13) +
		       (indata[Data_Width-2:0] >> 14) + (indata[Data_Width-2:0] >> 17) + (indata[Data_Width-2:0] >> 18);
		outdata = {~indata[Data_Width-1], temp};
	end
end


endmodule