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

forcal

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

    （1）新建字典

2. !!!using("sys");' n+ v) Z8 [1 w. L  P$ V
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">' n+ v) Z8 [1 w. L  P$ V</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");' Y( C6 {; g# F' p* G* w: u  a
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">' Y( C6 {; g# F' p* G* w: u  a</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. 7 y& E2 x' j6 |
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">7 y& E2 x' j6 |</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");/ {' g\\" n+ I1 q) x5 L
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">/ {' g\\" n+ I1 q) x5 L</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典
0 R/ U8 O  M3 a- P$ P$ P
! Q3 M6 t3 e: ^* T    删除指定键－值对：a.dict_del["aa","abc"];

3 B" F7 l; g1 j8 y    清空字典：a.dict_clear();
& M. J. o( \7 g: _4 H
- f5 D7 i5 L: ^    删除字典对象，但暂存在缓冲区：del[a];
  Q, }: y7 K! Y+ R+ ?
    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");
   
3. 0 \' s. H; @1 p7 W
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">0 \' s. H; @1 p7 W</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. - Q) C7 l/ u1 S; x; o# C4 f
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 9 ?7 ?$ ~8 O$ a' q+ }
6.   i=0, while{++i<=100, str[1]=i,
   
7. 6 F% O' O- p- ~9 v: b) U
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}8 [  c' D4 i% S! p9 }; s3 }
   
10.   },2 G6 i8 q4 C+ i+ L% [
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. , z% [5 {' X! P0 Z  W  c
14.   t0=clock(), sum=0,\\" [$ V, d- X! q4 ]4 r
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. 6 a  ~7 V. F2 B8 L$ {
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. ) J\\" [3 v3 y* M& w; V0 ?
20.   },
    
21. $ o6 i- |* O- `4 L% S$ {1 K3 k/ w
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">- Q) C7 l/ u1 S; x; o# C4 f</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">9 ?7 ?$ ~8 O$ a' q+ }</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">6 F% O' O- p- ~9 v: b) U</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">8 [  c' D4 i% S! p9 }; s3 }</font><br />   },<font class=\\"jammer\\">2 G6 i8 q4 C+ i+ L% [</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">, z% [5 {' X! P0 Z  W  c</span>   t0=clock(), sum=0,<font class=\\"jammer\\">\\" [$ V, d- X! q4 ]4 r</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">6 a  ~7 V. F2 B8 L$ {</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">) J\\" [3 v3 y* M& w; V0 ?</span>   },<br /> <span style=\\"display:none\\">$ o6 i- |* O- `4 L% S$ {1 K3 k/ w</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=1550000009 m' W4 k2 j- [9 S
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码