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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
4 q. ~2 ~$ ]! e+ f$ q
: a) }6 T3 l+ C% K: _    （1）新建字典

2. !!!using("sys");$ V$ m0 }- \. }4 O, K
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">$ V$ m0 }- \. }4 O, K</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. ( w0 P8 V  j4 ?( Q$ L* a
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">( w0 P8 V  j4 ?( Q$ L* a</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. # v  A3 _+ q: r/ J
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\"># v  A3 _+ q: r/ J</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. ) K! f% V7 C0 k
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">) K! f% V7 C0 k</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
/ w; y5 u0 O+ o* J
    （4）删除字典
2 \& ~0 Z% |& d' t, d6 {' y
    删除指定键－值对：a.dict_del["aa","abc"];
" `% d' v2 B5 ^2 f
    清空字典：a.dict_clear();
! \1 Q8 y4 e. J
    删除字典对象，但暂存在缓冲区：del[a];
6 ?, @8 l- b: `. a- R
    立即彻底删除字典对象：delete[a];

  }7 \" g6 I# I6 u    （5）字典反序

2. !!!using("sys");
   
3. 5 b6 \2 i3 ^( Z9 h* S
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">5 b6 \2 i3 ^( Z9 h* S</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. & d' u! }+ Q2 ]- V
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. * |5 h: O\\" L3 @3 @1 g/ a
6.   i=0, while{++i<=100, str[1]=i,
   
7. ) h! W/ w8 |0 @# L
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. 1 e5 o  H$ C; e( v+ c9 f
10.   },2 U4 u& P; g\\" S; |8 b/ P4 B
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. 2 [( Y' _! P; I7 J3 ~* j0 Q
14.   t0=clock(), sum=0,
    
15. 6 }& }. C/ K% g: j2 ~2 u4 Y! E- }; p, ~# @
16.   i=0, while{++i<=100, str[1]=i,
    
17. 7 Y7 S' @2 N4 {% {. F
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. - i2 `+ H# g9 D9 Z! E7 t, `, H
20.   },# k) h$ D0 `  [4 K( f
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">& d' u! }+ Q2 ]- V</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">* |5 h: O\\" L3 @3 @1 g/ a</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">) h! W/ w8 |0 @# L</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">1 e5 o  H$ C; e( v+ c9 f</span>   },<font class=\\"jammer\\">2 U4 u& P; g\\" S; |8 b/ P4 B</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">2 [( Y' _! P; I7 J3 ~* j0 Q</span>   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">6 }& }. C/ K% g: j2 ~2 u4 Y! E- }; p, ~# @</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">7 Y7 S' @2 N4 {% {. F</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">- i2 `+ H# g9 D9 Z! E7 t, `, H</span>   },<font class=\\"jammer\\"># k) h$ D0 `  [4 K( f</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000; J( q5 S0 z/ [; u, @
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码