1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
-
-
+
+
-
-
+
+
|
local s = {}
local 简文件库 = require("lfs")
local ffi = require("ffi")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, u4)
local h1_0
--~ 集排
h1_0 = {}
for o5 = 1, #u1_0 do
h1_0[#h1_0 + 1] = u1(u1_0[o5], u2, u3, u4)
for u5 = 1, #u1_0 do
h1_0[#h1_0 + 1] = u1(u1_0[u5], u2, u3, u4)
end
return h1_0
end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, u4)
local h1_0
--~ 集排
h1_0 = {}
for o5 in u2(u1, u3, u4) do
h1_0[#h1_0 + 1] = o5
for u5 in u2(u1, u3, u4) do
h1_0[#h1_0 + 1] = u5
end
return h1_0
end
--~ 排
--~ 能
function s.历排取一(u1_0, u1)
local k1
|
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
-
+
-
+
|
for u2, u2_0 in pairs(u1_0) do
--~ 键
--~ 值
k1, k2 = s.历对取一的模(k1, k2, u2, u2_0, u1)
end
return k1, k2
end
function s.历对取一的模(u1, u2, u3, u4, o5)
function s.历对取一的模(u1, u2, u3, u4, u5)
if u1 == nil then
return u3, u4
elseif o5(u1, u2, u3, u4) then
elseif u5(u1, u2, u3, u4) then
return u3, u4
else
return u1, u2
end
end
function s.历对(u1_0, u1, u2)
local k1
|