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
|
local 字集库 = require("u8_to_a")
local 返参库 = require(字集库.u8_to_a("算机_程语_月_基类_能_返参"))
local 历对库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_对_取全"))
local d = {}
-- 连对
--~ 对
--~ 对
function d.连两对(o1_0, o2_0)
local k1_0
--~ 合对
k1_0 = 历对库.历对(o1_0, 返参库.二参)
for o1, o2 in pairs(o2_0) do
k1_0[o1] = o2
end
return k1_0
end
-- 对长
--~ 对
function d.对长(o1_0)
local k1
--~ 对长
k1 = 0
for _ in pairs(o1_0) do
k1 = k1 + 1
end
return k1
end
return d
|
|
|
|
|
|
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
|
local 字集库 = require("u8_to_a")
local 返参库 = require(字集库.u8_to_a("算机_程语_月_基类_能_返参"))
local 历对库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_对_取全"))
local s = {}
-- 连对
--~ 对
--~ 对
function s.连两对(o1_0, o2_0)
local k1_0
--~ 合对
k1_0 = 历对库.历对(o1_0, 返参库.二参)
for o1, o2 in pairs(o2_0) do
k1_0[o1] = o2
end
return k1_0
end
-- 对长
--~ 对
function s.对长(o1_0)
local k1
--~ 对长
k1 = 0
for _ in pairs(o1_0) do
k1 = k1 + 1
end
return k1
end
return s
|