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

forcal

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

    （1）新建字典

2. !!!using("sys");# o( L\\" R# y9 E: f$ r' M
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\"># o( L\\" R# y9 E: f$ r' M</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. : ^( v1 n; f+ d6 ?, E
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">: ^( v1 n; f+ d6 ?, E</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");. J: }  b' z- l
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">. J: }  b' z- l</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");/ i8 @7 F+ T8 M9 L6 e, {
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">/ i8 @7 F+ T8 M9 L6 e, {</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
8 q; N" N! w- [' x1 T% h+ T
3 d2 s  C* X; ~  k1 S    （4）删除字典
6 R- \  v8 z" D- r$ N$ d1 N
    删除指定键－值对：a.dict_del["aa","abc"];
) q% f" i$ ]* Y$ ~+ M
    清空字典：a.dict_clear();

% ]# i6 @; e- [' H) k    删除字典对象，但暂存在缓冲区：del[a];
( m0 F( L6 w, g# q/ b. p
- [; ?5 Q5 i; O% f    立即彻底删除字典对象：delete[a];

8 w  J+ X# f$ D; e    （5）字典反序

2. !!!using("sys");
   
3. / |5 A5 ^1 C: b) f# j2 H& v
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">/ |5 A5 ^1 C: b) f# j2 H& v</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. ) ?) j0 I& k# o$ G
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,, h$ k/ x. w+ i% O% W
   
6.   i=0, while{++i<=100, str[1]=i,5 R4 U- M& p$ q; O7 ?, d2 R
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}& R* k! L/ V; n4 x4 l
   
10.   },
    
11. * K; X  t\\" [. I* e$ [
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. 3 A\\" M; @; Z, G\\" \1 {9 b2 s! I
14.   t0=clock(), sum=0,
    
15. : G& ^% l5 W* d; o
16.   i=0, while{++i<=100, str[1]=i,+ m0 @. p0 A# R$ b1 V( L
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}4 _: t% G3 r\\" [) \/ W
    
20.   },8 I* E% U% A% Q
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">) ?) j0 I& k# o$ G</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">, h$ k/ x. w+ i% O% W</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">5 R4 U- M& p$ q; O7 ?, d2 R</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">& R* k! L/ V; n4 x4 l</font><br />   },<br /> <span style=\\"display:none\\">* K; X  t\\" [. I* e$ [</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">3 A\\" M; @; Z, G\\" \1 {9 b2 s! I</span>   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">: G& ^% l5 W* d; o</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">+ m0 @. p0 A# R$ b1 V( L</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">4 _: t% G3 r\\" [) \/ W</font><br />   },<font class=\\"jammer\\">8 I* E% U% A% Q</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   % H$ j  k7 j4 q0 \! j2 g# {
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码