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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
' n3 s& e! L$ c! f7 S
9 {* U7 f0 Y# _0 ~1 f  }" A- q    （1）新建字典

2. !!!using("sys");
   
3.   o+ r+ X/ X# Y( @6 m4 q
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">  o+ r+ X/ X# Y( @6 m4 q</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");: B. T6 J2 L, T: S8 T
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">: B. T6 J2 L, T: S8 T</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");# {7 J2 O+ t. a! i
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\"># {7 J2 O+ t. a! i</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");7 i! B9 H3 A/ Z& |2 P
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">7 i! B9 H3 A/ Z& |2 P</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

5 c4 V% m4 }" s: O8 Y, B- t% f: h    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];
# i- W( t, i8 ]  \/ n0 `( _) M" Q# F
    清空字典：a.dict_clear();

+ Q- w" p! X9 J    删除字典对象，但暂存在缓冲区：del[a];

# i+ l5 x$ d- Y) V% C3 m    立即彻底删除字典对象：delete[a];
# p$ [( n& s3 w1 ?2 X9 z% n
  a* @* `1 g! c' g9 n    （5）字典反序

2. !!!using("sys");
   
3. * o+ ?& i4 v# B. t/ L% \
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">* o+ ?& i4 v# B. t/ L% \</span> 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");
   
3. : p6 Y7 ~1 R6 h% N4 p# ^
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,\\" T  r6 P/ v$ O
   
6.   i=0, while{++i<=100, str[1]=i,
   
7. : q& {4 R5 h) \\\" x. n, S8 x8 ]
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. ) F% q. t0 @9 w4 o6 \% u
10.   },. Q$ y% t1 n7 z: L& R( i
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},% E( Z) h; p9 Y6 `, S
    
14.   t0=clock(), sum=0,- m# b( c3 g0 w5 E/ e% G( C
    
16.   i=0, while{++i<=100, str[1]=i,5 ~: \  l$ G& o, V\\" B  ?2 J
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}+ E# b4 N) [$ p  {/ w7 g
    
20.   },4 S: M: U  b9 s! ~3 J0 r% l0 ^
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">: p6 Y7 ~1 R6 h% N4 p# ^</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">\\" T  r6 P/ v$ O</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">: q& {4 R5 h) \\\" x. n, S8 x8 ]</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">) F% q. t0 @9 w4 o6 \% u</span>   },<font class=\\"jammer\\">. Q$ y% t1 n7 z: L& R( i</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">% E( Z) h; p9 Y6 `, S</font><br />   t0=clock(), sum=0,<font class=\\"jammer\\">- m# b( c3 g0 w5 E/ e% G( C</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">5 ~: \  l$ G& o, V\\" B  ?2 J</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">+ E# b4 N) [$ p  {/ w7 g</font><br />   },<font class=\\"jammer\\">4 S: M: U  b9 s! ~3 J0 r% l0 ^</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000* m& z$ a* `. N' h* u
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码