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
|
local s = {}
local 简文件库 = require("lfs")
local ffi = require("ffi")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, o4)
local k1_0
--~ 集排
k1_0 = {}
for o5 = 1, #u1_0 do
k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, o4)
end
return k1_0
end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, o4)
local k1_0
--~ 集排
k1_0 = {}
for o5 in u2(u1, u3, o4) do
k1_0[#k1_0 + 1] = o5
end
return k1_0
end
--~ 排
--~ 能
function s.历排取一(u1_0, u1)
|
|
|
|
|
|
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
|
local s = {}
local 简文件库 = require("lfs")
local ffi = require("ffi")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, u4)
local k1_0
--~ 集排
k1_0 = {}
for o5 = 1, #u1_0 do
k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, u4)
end
return k1_0
end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, u4)
local k1_0
--~ 集排
k1_0 = {}
for o5 in u2(u1, u3, u4) do
k1_0[#k1_0 + 1] = o5
end
return k1_0
end
--~ 排
--~ 能
function s.历排取一(u1_0, u1)
|
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
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, o4, o5)
if u1 == nil then
return u3, o4
elseif o5(u1, u2, u3, o4) then
return u3, o4
else
return u1, u2
end
end
function s.历对(u1_0, u1, u2)
local k1
local k1_0, k2_0
|
|
|
|
|
|
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
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)
if u1 == nil then
return u3, u4
elseif o5(u1, u2, u3, u4) then
return u3, u4
else
return u1, u2
end
end
function s.历对(u1_0, u1, u2)
local k1
local k1_0, k2_0
|
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
return u1_0
end
end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function s.全筛文(u1, u2, u3, o4)
print(4)
if string.find(u1, u2, u3, o4) then
return u1
end
end
--~ 文
--~ 前缀
function s.加前缀(u1, u2)
return (u2 or "") .. u1
|
|
|
|
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
return u1_0
end
end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function s.全筛文(u1, u2, u3, u4)
print(4)
if string.find(u1, u2, u3, u4) then
return u1
end
end
--~ 文
--~ 前缀
function s.加前缀(u1, u2)
return (u2 or "") .. u1
|
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
|
function s.位右移(u1, u2)
return bit.rshift(u1, u2)
end
--~ 键
--~ 最大值
--~ 键
--~ 值
function s.筛对中最大值(u1, u2, u3, o4)
if u2 < o4 then
return true
end
end
--~ 最短键
--~ 值
--~ 键
--~ 值
function s.筛对中最短键(u1, u2, u3, o4)
if #u1 > #u3 then
return true
end
end
--~ 最短文
--~ 值
function s.筛排中最短文(u1, u2)
|
|
|
|
|
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
|
function s.位右移(u1, u2)
return bit.rshift(u1, u2)
end
--~ 键
--~ 最大值
--~ 键
--~ 值
function s.筛对中最大值(u1, u2, u3, u4)
if u2 < u4 then
return true
end
end
--~ 最短键
--~ 值
--~ 键
--~ 值
function s.筛对中最短键(u1, u2, u3, u4)
if #u1 > #u3 then
return true
end
end
--~ 最短文
--~ 值
function s.筛排中最短文(u1, u2)
|