From 9dc6d7180438031d25daf6a68a3959c3cfa9312d Mon Sep 17 00:00:00 2001
From: joshua <joshua@joshuayun.com>
Date: Tue, 14 Dec 2021 01:46:40 -0600
Subject: Initial Commit

---
 verilog/fpu/exp_calc.v | 152 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 152 insertions(+)
 create mode 100644 verilog/fpu/exp_calc.v

(limited to 'verilog/fpu/exp_calc.v')

diff --git a/verilog/fpu/exp_calc.v b/verilog/fpu/exp_calc.v
new file mode 100644
index 0000000..89838f4
--- /dev/null
+++ b/verilog/fpu/exp_calc.v
@@ -0,0 +1,152 @@
+///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+//File Name: Priority Encoder.v
+//Created By: Sheetal Swaroop Burada
+//Date: 30-04-2019
+//Project Name: Design of 32 Bit Floating Point ALU Based on Standard IEEE-754 in Verilog and its implementation on FPGA.
+//University: Dayalbagh Educational Institute
+////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+
+module exp_calc(
+			input [24:0] significand,
+			input [7:0] Exponent_a,
+			output reg [24:0] Significand,
+			output [7:0] Exponent_sub
+			);
+
+reg [4:0] shift;
+
+always @(significand)
+begin
+	casex (significand)
+		25'bx_1xxx_xxxx_xxxx_xxxx_xxxx_xxxx :	begin
+													Significand = significand;
+									 				shift = 5'd0;
+								 			  	end
+		25'bx_01xx_xxxx_xxxx_xxxx_xxxx_xxxx : 	begin
+										 			Significand = significand << 1;
+									 				shift = 5'd1;
+								 			  	end
+		25'bx_001x_xxxx_xxxx_xxxx_xxxx_xxxx : 	begin
+										 			Significand = significand << 2;
+									 				shift = 5'd2;
+								 				end
+		25'bx_0001_xxxx_xxxx_xxxx_xxxx_xxxx : 	begin
+													Significand = significand << 3;
+								 	 				shift = 5'd3;
+								 				end
+
+		25'bx_0000_1xxx_xxxx_xxxx_xxxx_xxxx : 	begin
+									 				Significand = significand << 4;
+								 	 				shift = 5'd4;
+								 				end
+
+		25'bx_0000_01xx_xxxx_xxxx_xxxx_xxxx : 	begin
+									 				Significand = significand << 5;
+								 	 				shift = 5'd5;
+								 				end
+
+		25'bx_0000_001x_xxxx_xxxx_xxxx_xxxx : 	begin						// 24'h020000
+									 				Significand = significand << 6;
+								 	 				shift = 5'd6;
+								 				end
+
+		25'bx_0000_0001_xxxx_xxxx_xxxx_xxxx : 	begin						// 24'h010000
+									 				Significand = significand << 7;
+								 	 				shift = 5'd7;
+								 				end
+
+		25'bx_0000_0000_1xxx_xxxx_xxxx_xxxx : 	begin						// 24'h008000
+									 				Significand = significand << 8;
+								 	 				shift = 5'd8;
+								 				end
+
+		25'bx_0000_0000_01xx_xxxx_xxxx_xxxx : 	begin						// 24'h004000
+									 				Significand = significand << 9;
+								 	 				shift = 5'd9;
+								 				end
+
+		25'bx_0000_0000_001x_xxxx_xxxx_xxxx : 	begin						// 24'h002000
+									 				Significand = significand << 10;
+								 	 				shift = 5'd10;
+								 				end
+
+		25'bx_0000_0000_0001_xxxx_xxxx_xxxx : 	begin						// 24'h001000
+									 				Significand = significand << 11;
+								 	 				shift = 5'd11;
+								 				end
+
+		25'bx_0000_0000_0000_1xxx_xxxx_xxxx : 	begin						// 24'h000800
+									 				Significand = significand << 12;
+								 	 				shift = 5'd12;
+								 				end
+
+		25'bx_0000_0000_0000_01xx_xxxx_xxxx : 	begin						// 24'h000400
+									 				Significand = significand << 13;
+								 	 				shift = 5'd13;
+								 				end
+
+		25'bx_0000_0000_0000_001x_xxxx_xxxx : 	begin						// 24'h000200
+									 				Significand = significand << 14;
+								 	 				shift = 5'd14;
+								 				end
+
+		25'bx_0000_0000_0000_0001_xxxx_xxxx  : 	begin						// 24'h000100
+									 				Significand = significand << 15;
+								 	 				shift = 5'd15;
+								 				end
+
+		25'bx_0000_0000_0000_0000_1xxx_xxxx : 	begin						// 24'h000080
+									 				Significand = significand << 16;
+								 	 				shift = 5'd16;
+								 				end
+
+		25'bx_0000_0000_0000_0000_01xx_xxxx : 	begin						// 24'h000040
+											 		Significand = significand << 17;
+										 	 		shift = 5'd17;
+												end
+
+		25'bx_0000_0000_0000_0000_001x_xxxx : 	begin						// 24'h000020
+									 				Significand = significand << 18;
+								 	 				shift = 5'd18;
+								 				end
+
+		25'bx_0000_0000_0000_0000_0001_xxxx : 	begin						// 24'h000010
+									 				Significand = significand << 19;
+								 	 				shift = 5'd19;
+												end
+
+		25'bx_0000_0000_0000_0000_0000_1xxx :	begin						// 24'h000008
+									 				Significand = significand << 20;
+								 					shift = 5'd20;
+								 				end
+
+		25'bx_0000_0000_0000_0000_0000_01xx : 	begin						// 24'h000004
+									 				Significand = significand << 21;
+								 	 				shift = 5'd21;
+								 				end
+
+		25'bx_0000_0000_0000_0000_0000_001x : 	begin						// 24'h000002
+									 				Significand = significand << 22;
+								 	 				shift = 5'd22;
+								 				end
+
+		25'bx_0000_0000_0000_0000_0000_0001 : 	begin						// 24'h000001
+									 				Significand = significand << 23;
+								 	 				shift = 5'd23;
+								 				end
+
+		25'bx_0000_0000_0000_0000_0000_0000 : 	begin						// 24'h000000
+								 					Significand = significand << 24;
+							 	 					shift = 5'd24;
+								 				end
+		default : 	begin
+						Significand = significand;
+						shift = 8'd0;
+					end
+
+	endcase
+end
+assign Exponent_sub = Exponent_a - shift;
+
+endmodule
-- 
cgit v1.2.3