Lu系统扩展动态库LuSystem之字典

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
* x1 I. D! o) t% E
8 `5 M) }5 I6 J6 J1 P    （1）新建字典

2. !!!using("sys");
   
3. % e/ J' b) e3 T9 Y9 D
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">% e/ J' b) e3 T9 Y9 D</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

用函数dict生成字典更为方便：

2. !!!using("sys");
   
3. # ^4 H% L3 Q4 d8 p
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\"># ^4 H% L3 Q4 d8 p</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");1 c# i' l- K1 L% V; V& a  A, Z
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">1 c# i' l- K1 L% V; V& a  A, Z</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. 2 Y1 U0 Y: M1 J2 ]- z& X
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">2 Y1 U0 Y: M1 J2 ]- z& X</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
3 L) R' G8 Q4 J+ z( p' \$ g
    （4）删除字典

( Y% ]1 f; }! e3 H    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();
8 T. e; L1 Z! p# `1 P7 {
5 b: h9 {* L2 T: g    删除字典对象，但暂存在缓冲区：del[a];
. s' a1 A6 G$ p& u  @$ x* g2 g6 p
/ D! B1 r2 W5 d" O    立即彻底删除字典对象：delete[a];
2 E. r1 J+ ~: D! b2 y) M, R$ t
    （5）字典反序

2. !!!using("sys");2 C' ]0 L; v* M, z8 v$ `6 f& O
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">2 C' ]0 L; v* M, z8 v$ `6 f& O</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

结果：

1. dict{aa : 1.2 , abc : luu}dict{abc : luu , aa : 1.2}

复制代码

（6）字典存取效率测试：在字典a中添加若干元素，元素的键通过变换字符串str的值得到，sum用于求所有元素的值的和。

2. !!!using("sys");1 e7 h- ~, s4 G3 |& R$ b8 L
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 9 [7 d, k+ K: p+ b( L9 y
6.   i=0, while{++i<=100, str[1]=i,* \9 P% }1 g% U, N4 v# i& k2 P
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}* i! J\\" f3 C5 W- L/ N
   
10.   },& B/ @! i' M& S\\" d+ K) d4 r, D
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},; y( r0 k8 V* U9 k- v6 x( t
    
14.   t0=clock(), sum=0,\\" z4 k6 U$ E9 q  m7 X7 n* j5 q
    
16.   i=0, while{++i<=100, str[1]=i,0 S9 x: I% ]  z4 |
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}( N6 K. L4 ?# Q7 S\\" ^! K% Z
    
20.   },% ?' V- l9 p0 g1 }; E( Z- s9 Z# G
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">1 e7 h- ~, s4 G3 |& R$ b8 L</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">9 [7 d, k+ K: p+ b( L9 y</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">* \9 P% }1 g% U, N4 v# i& k2 P</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">* i! J\\" f3 C5 W- L/ N</font><br />   },<font class=\\"jammer\\">& B/ @! i' M& S\\" d+ K) d4 r, D</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">; y( r0 k8 V* U9 k- v6 x( t</font><br />   t0=clock(), sum=0,<font class=\\"jammer\\">\\" z4 k6 U$ E9 q  m7 X7 n* j5 q</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">0 S9 x: I% ]  z4 |</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">( N6 K. L4 ?# Q7 S\\" ^! K% Z</font><br />   },<font class=\\"jammer\\">% ?' V- l9 p0 g1 }; E( Z- s9 Z# G</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   5 z: s# X8 H- ]+ N8 s) w
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码