diff --git a/rtl/ser_lt.v b/rtl/ser_lt.v
deleted file mode 100644
index eefe917..0000000
--- a/rtl/ser_lt.v
+++ /dev/null
@@ -1,20 +0,0 @@
-`default_nettype none
-module ser_lt
-  (
-   input wire  i_clk,
-   input wire  i_a,
-   input wire  i_b,
-   input wire  i_clr,
-   input wire  i_sign,
-   output wire o_q);
-
-   reg        lt_r;
-
-   wire       lt = (i_sign ? (i_a & ~i_b) : (~i_a & i_b)) | ((i_a == i_b) & lt_r);
-   assign o_q = lt;
-
-   always @(posedge i_clk) begin
-      lt_r <= lt & ~i_clr;
-   end
-
-endmodule
diff --git a/rtl/serv_alu.v b/rtl/serv_alu.v
index 3970a17..f5c5ea4 100644
--- a/rtl/serv_alu.v
+++ b/rtl/serv_alu.v
@@ -71,14 +71,14 @@ module serv_alu
    assign {add_cy,result_add}   = i_rs1+add_b+add_cy_r;
    assign {b_inv_plus_1_cy,b_inv_plus_1} = {1'b0,~op_b}+plus_1+b_inv_plus_1_cy_r;
 
-   ser_lt ser_lt
-     (
-      .i_clk (clk),
-      .i_a   (i_rs1),
-      .i_b   (op_b),
-      .i_clr (!i_en),
-      .i_sign (i_cnt_done & !i_cmp_uns),
-      .o_q   (result_lt));
+   reg        lt_r;
+
+   wire       lt_sign = i_cnt_done & !i_cmp_uns;
+
+   wire       eq = (i_rs1 == op_b);
+
+   assign result_eq = eq & eq_r;
+   assign result_lt = eq ? lt_r : op_b^lt_sign;
 
    assign plus_1 = i_en & !en_r;
    assign o_cmp = i_cmp_eq ? result_eq : result_lt;
@@ -98,6 +98,8 @@ module serv_alu
       add_cy_r <= i_en & add_cy;
       b_inv_plus_1_cy_r <= i_en & b_inv_plus_1_cy;
 
+      lt_r <= result_lt & i_en;
+
       if (i_en) begin
 	 result_lt_r <= result_lt;
       end
@@ -108,6 +110,4 @@ module serv_alu
 	shamt_msb <= b_inv_plus_1_cy;
    end
 
-   assign result_eq = eq_r & (i_rs1 == op_b);
-
 endmodule
diff --git a/serv.core b/serv.core
index 43c0ee5..31ec1b2 100644
--- a/serv.core
+++ b/serv.core
@@ -7,7 +7,6 @@ filesets:
     files:
       - rtl/serv_params.vh : {is_include_file : true}
       - rtl/shift_reg.v
-      - rtl/ser_lt.v
       - rtl/ser_shift.v
       - rtl/serv_bufreg.v
       - rtl/serv_alu.v