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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
  a- k6 @! a& m- T3 r
" j7 L. y5 K; p1 _0 A    （1）新建字典

2. !!!using("sys");4 k: d) _+ `# @2 Z, F
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">4 k: d) _+ `# @2 Z, F</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");( F8 T8 X# s+ g! F7 K2 {
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">( F8 T8 X# s+ g! F7 K2 {</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. % B, O/ u) v  y  g  {: x
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">% B, O/ u) v  y  g  {: x</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. + z( j7 v9 _\\" K! g( S5 Y1 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\\">+ z( j7 v9 _\\" K! g( S5 Y1 q</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典
4 o; d+ d; h# l, L  u
    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();

    删除字典对象，但暂存在缓冲区：del[a];
3 z" {, f& b  O) A7 \+ Q7 R7 c) u
& Y+ Y% V/ `- k/ E& I" I    立即彻底删除字典对象：delete[a];
! G4 Z5 }" a/ u9 Z2 Z$ H
    （5）字典反序

2. !!!using("sys");! k9 q) _6 e8 ^& ~; l8 ~9 \' C
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">! k9 q) _6 e8 ^& ~; l8 ~9 \' C</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");
   
3.   ~! u\\" m0 O! v7 Q; R
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,) D2 w- t2 ~) `& z* H
   
6.   i=0, while{++i<=100, str[1]=i,4 W0 z- v\\" S1 U
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}: [4 m\\" y7 P5 W% e- ?# I/ O; {
   
10.   },
    
11. 9 i9 |  p' z( G; `4 V, y
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. $ r( h3 s3 ]0 f! h8 n
14.   t0=clock(), sum=0,* i- \* Z- c/ T5 q; D! ]( C6 i
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. 4 o  k! J5 k: h- a) B; D* P! {& a
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. : u1 I  Y5 M# t; f& O$ t+ v
20.   },
    
21. ' `2 K2 x/ m8 G, I5 P$ p6 C( i
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">  ~! u\\" m0 O! v7 Q; R</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">) D2 w- t2 ~) `& z* H</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">4 W0 z- v\\" S1 U</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">: [4 m\\" y7 P5 W% e- ?# I/ O; {</font><br />   },<br /> <span style=\\"display:none\\">9 i9 |  p' z( G; `4 V, y</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">$ r( h3 s3 ]0 f! h8 n</span>   t0=clock(), sum=0,<font class=\\"jammer\\">* i- \* Z- c/ T5 q; D! ]( C6 i</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">4 o  k! J5 k: h- a) B; D* P! {& a</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">: u1 I  Y5 M# t; f& O$ t+ v</span>   },<br /> <span style=\\"display:none\\">' `2 K2 x/ m8 G, I5 P$ p6 C( i</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   + F+ B- {8 J! H8 S. A  g
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码