module sum10(input [3:0] A, input [3:0] B, input carry_in, output [3:0] out, output carry_out);

wire intermidiate_carry;
wire [3:0] intermidiate_sum;

assign {intermidiate_carry,intermidiate_sum}  = A + B + carry_in; // Обычный сумматор с переносом

wire do_dec_fixup = !intermidiate_carry & (intermidiate_sum>=10); // Определяем, не надо ли скорректировать результат, т.к. он вылез за 10

assign carry_out = do_dec_fixup | intermidiate_carry; // Формируем выходной перенос
assign out = do_dec_fixup?intermidiate_sum+6:intermidiate_sum; // И выходное значение (если надо - корректируем, прибавляя константу)

endmofule