游戏王残局简化版

Diff
Login

Diff

Differences From Artifact [7bddfd0dc4]:

To Artifact [a86c73f2f0]:


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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
local 字集库 = require("u8_to_a")
local 基算库 = require(字集库.u8_to_a("算机_程语_月_基类_数_基算"))
local math = math
local string = string
local d = {}
-- 指数
--~ 左加数
--~ 右加数
function d.指数(o1, o2, o3)
  local k1
  if o3 then
    --~ 指数次
    k1 = 基算库.除法(o2, o3)
    return o1 ^ k1
  else
    return o1 ^ o2
    end
  end
-- 指数次
--~ 数
--~ 指数底
function d.指数次(o1, o2)
  local k1
  --~ 指数次
  k1 = math.log(o1) / math.log(o2)
  return k1
  end
--~ 数
function d.二底指数次(o1)
  local k1
  --~ 指数次
  _, k1 = math.frexp(o1)
  return k1
  end
-- 向大取整和向小取整
--~ 数
function d.向小取整(o1)
  return math.floor(o1)
  end
-- 几位整数和几位小数
--~ 数
--~ 几位整数
function d.几位整数(o1, o2)
  return string.format("%0" .. o2 .. "d", o1)
  end
--~ 数
--~ 几位小数
function d.几位小数(o1, o2)
  return string.format("%." .. o2 .. "f", o1)
  end
-- 正数与负数
--~ 数
function d.正数(o1)
  if o1 >= 0 then
    return o1
  else
    return -o1
    end
  end
--~ 数
function d.负数(o1)
  if o1 >= 0 then
    return -o1
  else
    return o1
    end
  end
-- 递加
do
  local k1_0
  --~ 数表
  k1_0 = {}
  function d.递加(o1)
    if k1_0[o1] then
    else
      k1_0[o1] = 0
      end
    k1_0[o1] = k1_0[o1] + 1
    return k1_0[o1]
    end
  end
-- 最值
function d.最大值()
  return math.huge
  end
function d.最小值()
  local k1
  --~ 最大值
  k1 = d.最大值()
  return d.负数(k1)
  end
--~ 数
function d.是否最值(o1)
  if o1 == d.最大值()
  or o1 == d.最小值() then
    return true
  else
    end
  end
--~ 数
function d.是否无效值(o1)
  if o1 == o1 then
  else
    return true
    end
  end
--~ 数
function d.是否错值(o1)
  local k1, k2
  --~ 是否最值
  k1 = d.是否最值(o1)
  --~ 是否无效值
  k2 = d.是否无效值(o1)
  return k1 or k2
  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
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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
local 字集库 = require("u8_to_a")
local 基算库 = require(字集库.u8_to_a("算机_程语_月_基类_数_基算"))
local math = math
local string = string
local s = {}
-- 指数
--~ 左加数
--~ 右加数
function s.指数(o1, o2, o3)
  local k1
  if o3 then
    --~ 指数次
    k1 = 基算库.除法(o2, o3)
    return o1 ^ k1
  else
    return o1 ^ o2
    end
  end
-- 指数次
--~ 数
--~ 指数底
function s.指数次(o1, o2)
  local k1
  --~ 指数次
  k1 = math.log(o1) / math.log(o2)
  return k1
  end
--~ 数
function s.二底指数次(o1)
  local k1
  --~ 指数次
  _, k1 = math.frexp(o1)
  return k1
  end
-- 向大取整和向小取整
--~ 数
function s.向小取整(o1)
  return math.floor(o1)
  end
-- 几位整数和几位小数
--~ 数
--~ 几位整数
function s.几位整数(o1, o2)
  return string.format("%0" .. o2 .. "d", o1)
  end
--~ 数
--~ 几位小数
function s.几位小数(o1, o2)
  return string.format("%." .. o2 .. "f", o1)
  end
-- 正数与负数
--~ 数
function s.正数(o1)
  if o1 >= 0 then
    return o1
  else
    return -o1
    end
  end
--~ 数
function s.负数(o1)
  if o1 >= 0 then
    return -o1
  else
    return o1
    end
  end
-- 递加
do
  local k1_0
  --~ 数表
  k1_0 = {}
  function s.递加(o1)
    if k1_0[o1] then
    else
      k1_0[o1] = 0
      end
    k1_0[o1] = k1_0[o1] + 1
    return k1_0[o1]
    end
  end
-- 最值
function s.最大值()
  return math.huge
  end
function s.最小值()
  local k1
  --~ 最大值
  k1 = s.最大值()
  return s.负数(k1)
  end
--~ 数
function s.是否最值(o1)
  if o1 == s.最大值()
  or o1 == s.最小值() then
    return true
  else
    end
  end
--~ 数
function s.是否无效值(o1)
  if o1 == o1 then
  else
    return true
    end
  end
--~ 数
function s.是否错值(o1)
  local k1, k2
  --~ 是否最值
  k1 = s.是否最值(o1)
  --~ 是否无效值
  k2 = s.是否无效值(o1)
  return k1 or k2
  end
return s