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

forcal

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

    （1）新建字典

2. !!!using("sys");$ ~$ d; K. V) q9 ~7 K6 x\\" Q5 G
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">$ ~$ d; K. V) q9 ~7 K6 x\\" Q5 G</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. ' C& R5 B  o. Q# G# {0 m
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">' C& R5 B  o. Q# G# {0 m</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. 6 `9 I6 y( I1 m  F+ {+ o
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">6 `9 I6 y( I1 m  F+ {+ o</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");( h( f3 k9 d) G9 ~3 A5 s  I
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">( h( f3 k9 d) G9 ~3 A5 s  I</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典

4 f0 q# \1 [' z  X    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();
! f+ |+ X% S2 _6 E" O$ w5 Z
    删除字典对象，但暂存在缓冲区：del[a];

5 v6 F! W4 J2 @3 e6 W    立即彻底删除字典对象：delete[a];
9 T1 f* |" D0 U) [- x$ C
    （5）字典反序

2. !!!using("sys");\\" ^' d% r7 Q+ ~4 n2 q
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">\\" ^' d% r7 Q+ ~4 n2 q</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");' e+ G- o! d, r, A+ \
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,3 w. D% q+ v1 [) g9 |+ r( W
   
6.   i=0, while{++i<=100, str[1]=i,3 g3 E. ?9 A& D  Q5 b* Z) ?* m; }
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}4 ^' M/ t. h5 T2 c( N1 A
   
10.   },. o; B- s+ g& D% x0 S
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},: c\\" Q: ], b- P( I( o
    
14.   t0=clock(), sum=0,
    
15. ! l8 b- M$ e! G6 W\\" P
16.   i=0, while{++i<=100, str[1]=i,
    
17. 3 ~4 E3 i7 q* V' J
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}\\" f* d$ e  `8 h3 O8 j/ ]
    
20.   },& I- O5 s7 `5 E/ I
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">' e+ G- o! d, r, A+ \</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">3 w. D% q+ v1 [) g9 |+ r( W</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">3 g3 E. ?9 A& D  Q5 b* Z) ?* m; }</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">4 ^' M/ t. h5 T2 c( N1 A</font><br />   },<font class=\\"jammer\\">. o; B- s+ g& D% x0 S</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">: c\\" Q: ], b- P( I( o</font><br />   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">! l8 b- M$ e! G6 W\\" P</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">3 ~4 E3 i7 q* V' J</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">\\" f* d$ e  `8 h3 O8 j/ ]</font><br />   },<font class=\\"jammer\\">& I- O5 s7 `5 E/ I</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000& I' i3 j+ l6 d0 P\" A
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码