5b9fb5e09f 2024-02-13 1: local s = {}
77f6e5c564 2024-02-08 2: -- 启
77f6e5c564 2024-02-08 3: --~ 排
77f6e5c564 2024-02-08 4: --~ 能
a4c0b3bd26 2024-02-13 5: function s.历排(u1_0, u1)
89f423ff38 2024-02-13 6: local h1
a4c0b3bd26 2024-02-13 7: for u2 = 1, #u1_0 do
77f6e5c564 2024-02-08 8: --~ 值
89f423ff38 2024-02-13 9: h1 = s.模(h1, u1_0[u2], u1)
77f6e5c564 2024-02-08 10: end
89f423ff38 2024-02-13 11: return h1
77f6e5c564 2024-02-08 12: end
77f6e5c564 2024-02-08 13: -- 模
77f6e5c564 2024-02-08 14: --~ 值
77f6e5c564 2024-02-08 15: --~ 排中值
4c19907139 2024-02-13 16: function s.模(u1, u2, u3)
a4c0b3bd26 2024-02-13 17: if u1 == nil then
a4c0b3bd26 2024-02-13 18: return u2
4c19907139 2024-02-13 19: elseif u3(u1, u2) then
a4c0b3bd26 2024-02-13 20: return u2
77f6e5c564 2024-02-08 21: else
a4c0b3bd26 2024-02-13 22: return u1
77f6e5c564 2024-02-08 23: end
77f6e5c564 2024-02-08 24: end
77f6e5c564 2024-02-08 25: -- 最短
77f6e5c564 2024-02-08 26: --~ 最短文
77f6e5c564 2024-02-08 27: --~ 值
a4c0b3bd26 2024-02-13 28: function s._筛最短文(u1, u2)
a4c0b3bd26 2024-02-13 29: if #u1 > #u2 then
77f6e5c564 2024-02-08 30: return true
77f6e5c564 2024-02-08 31: end
77f6e5c564 2024-02-08 32: end
77f6e5c564 2024-02-08 33: --~ 排
5b69db85ea 2024-02-13 34: function s.筛最短文(u1_0)
5b69db85ea 2024-02-13 35: return s.历排(u1_0, s._筛最短文)
77f6e5c564 2024-02-08 36: end
5b9fb5e09f 2024-02-13 37: return s