13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
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, u2, u3, o4)
if #u1 > #u3 then
return true
end
end
--~ 对
function s.筛最短键(u1_0)
return s.历对(u1_0, s._筛最短键)
end
-- 最大
--~ 键
--~ 最大值
--~ 键
--~ 值
function s._筛最大值(u1, u2, u3, o4)
if u2 < o4 then
return true
end
end
--~ 对
function s.筛最大值(u1_0)
return s.历对(u1_0, s._筛最大值)
end
|
|
|
|
|
|
|
|
|
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
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, u2, u3, u4)
if #u1 > #u3 then
return true
end
end
--~ 对
function s.筛最短键(u1_0)
return s.历对(u1_0, s._筛最短键)
end
-- 最大
--~ 键
--~ 最大值
--~ 键
--~ 值
function s._筛最大值(u1, u2, u3, u4)
if u2 < u4 then
return true
end
end
--~ 对
function s.筛最大值(u1_0)
return s.历对(u1_0, s._筛最大值)
end
|