X-Git-Url: http://git.joshuawise.com/mandelfpga.git/blobdiff_plain/79af494a1f40aff429c60355790bf6bb0c81c51e..6cdf39e2f6086d89e72e39b94235221a4d65fd99:/Main.v

diff --git a/Main.v b/Main.v
index 2ae7962..cff3b4e 100644
--- a/Main.v
+++ b/Main.v
@@ -114,14 +114,15 @@ module MandelUnit(
 	output reg rsout, isout,
 	output reg [7:0] obail, ocuriter);
 
-	wire [14:0] r2, i2, ri, diff;
+	wire [13:0] r2, i2;
+	wire [14:0] ri, diff;
 	wire [15:0] twocdiff;
 	wire r2sign, i2sign, risign, dsign;
-	wire [15:0] bigsum;
-	wire bigsum_ovf, rin_ovf, iin_ovf, throwaway;
+	wire [13:0] bigsum;
+	wire bigsum_ovf;
 
 	reg [12:0] xd, yd;
-	reg rd, id;
+	reg ineedbaild;
 	reg xsd, ysd;
 	reg [7:0] ibaild, curiterd;
 
@@ -131,13 +132,15 @@ module MandelUnit(
 	Multiplier i2m(clk, i[12:0], i[12:0], isign, isign, i2[12:0], i2sign, i2[13]);
 	Multiplier rim(clk, r[12:0], i[12:0], rsign, isign, ri[13:1], risign, ri[14]);
 
-	assign bigsum = r2 + i2;
-	assign bigsum_ovf = bigsum[15] | bigsum[14];
-	assign rin_ovf = rd;
-	assign iin_ovf = id;
+	assign bigsum = r2[12:0] + i2[12:0];
+	assign bigsum_ovf = bigsum[13] | r2[13] | i2[13];
+	
 	assign twocdiff = r2 - i2;
 	assign diff = twocdiff[15] ? -twocdiff : twocdiff;
 	assign dsign = twocdiff[15];
+	
+	wire [15:0] twocrout = xd - diff;
+	wire [15:0] twociout = yd - ri;
 
 	always @ (posedge clk)
 	begin
@@ -151,28 +154,29 @@ module MandelUnit(
 		ysout <= ysd;
 		ibaild <= ibail;
 		curiterd <= icuriter;
-		rd <= r[13] | r[14];
-		id <= i[13] | i[14];
+		ineedbaild <= r[13] | r[14] | i[13] | i[14];
 
+		// r^2 - i^2 + x
 		if (xsd ^ dsign) begin
-			if (diff > xd) begin
-				rout <= diff - xd;
+			if (twocrout[15]) begin	// diff > xd
+				rout <= -twocrout;
 				rsout <= dsign;
 			end else begin
-				rout <= xd - diff;
+				rout <= twocrout;
 				rsout <= xsd;
 			end
 		end else begin
 			rout <= diff + xd;
-			rsout <= xsd;
+			rsout <= xsd;	// xsd == dsign
 		end
 		
+		// 2 * r * i + y
 		if (ysd ^ risign) begin
-			if (ri > yd) begin
-				iout <= ri - yd;
+			if (twociout[15]) begin	// ri > yd
+				iout <= -twociout;
 				isout <= risign;
 			end else begin
-				iout <= yd - ri;
+				iout <= twociout;
 				isout <= ysd;
 			end
 		end else begin
@@ -182,7 +186,7 @@ module MandelUnit(
 		
 		// If we haven't bailed out, and we meet any of the bailout conditions,
 		// bail out now.  Otherwise, leave the bailout at whatever it was before.
-		if ((ibaild == 255) && (bigsum_ovf | rin_ovf | iin_ovf))
+		if ((ibaild == 255) && (bigsum_ovf | ineedbaild))
 			obail <= curiterd;
 		else
 			obail <= ibaild;
@@ -423,8 +427,6 @@ module MandelTop(
 	wire [2:0] mandelr, mandelg, logor, logog;
 	wire [1:0] mandelb, logob;
 	
-	
-
 	SyncGen sync(pixclk, vs, hs, x, y, realx, realy, border);
 	Mandelbrot mandel(mclk, pixclk, x, y, xofs, yofs, cycle ? colorcycle : 0, scale, mandelr, mandelg, mandelb);
 	Logo logo(pixclk, realx, realy, logoenb, logor, logog, logob);