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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。

& j9 i6 S  f! o& ]    （1）新建字典

2. !!!using("sys");
   
3. 5 W6 F/ z3 \+ e6 ^2 v# t
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">5 W6 F/ z3 \+ e6 ^2 v# t</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. ! W7 |( d, l  R$ q: ?
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">! W7 |( d, l  R$ q: ?</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. 8 a: k& W. j8 X) S& C
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">8 a: k& W. j8 X) S& C</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. . U# X; _7 _: |- y% B: `' q
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">. U# X; _7 _: |- y% B: `' q</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。

    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();

1 f8 @: v0 E: N  S; {. {1 T4 Z    删除字典对象，但暂存在缓冲区：del[a];
8 a6 G0 V& }( @# E  C+ _
$ r* q/ x; q: P# K+ J  b    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");) U/ i8 }9 B8 k: m- r
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">) U/ i8 }9 B8 k: m- r</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");9 O. |. Q3 i3 F  K7 c! k3 ~% O
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. * `: J' C2 o2 Q
6.   i=0, while{++i<=100, str[1]=i,\\" J1 \! p7 t5 M' t
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}. l+ c, i) N5 w1 L% A. {
   
10.   },
    
11. ' b3 D- h2 H. b- B/ D% E% L& d
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13.   E\\" l' ~) |5 O9 M# X0 `6 I$ C# y' a
14.   t0=clock(), sum=0,
    
15. 7 q4 Q: U+ @1 h6 t
16.   i=0, while{++i<=100, str[1]=i,! x4 {# r/ o4 C  Q$ D+ {- p
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}  y4 J\\" c0 y/ t1 i& Z6 N3 Y0 M
    
20.   },
    
21. 8 \) F0 k1 O& U9 c; D; W( f7 I
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">9 O. |. Q3 i3 F  K7 c! k3 ~% O</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">* `: J' C2 o2 Q</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">\\" J1 \! p7 t5 M' t</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">. l+ c, i) N5 w1 L% A. {</font><br />   },<br /> <span style=\\"display:none\\">' b3 D- h2 H. b- B/ D% E% L& d</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">  E\\" l' ~) |5 O9 M# X0 `6 I$ C# y' a</span>   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">7 q4 Q: U+ @1 h6 t</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">! x4 {# r/ o4 C  Q$ D+ {- p</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">  y4 J\\" c0 y/ t1 i& Z6 N3 Y0 M</font><br />   },<br /> <span style=\\"display:none\\">8 \) F0 k1 O& U9 c; D; W( f7 I</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   : n3 X2 h; `! q\" I2 ], i2 P; N
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码