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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
5 j0 P% s3 q9 B" J( \
+ u9 L% O3 Y, p    （1）新建字典

2. !!!using("sys");
   
3. , N) V+ U' U2 ?2 e6 `+ [1 g2 P6 J! i
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">, N) V+ U' U2 ?2 e6 `+ [1 g2 P6 J! i</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");- x# {7 ]$ c$ V# j
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

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

（2）得到字典元素

2. !!!using("sys");3 X4 H9 N1 F! U8 }5 x
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">3 X4 H9 N1 F! U8 }5 x</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");; u: Z( H% h- Q; j3 X5 u) {
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">; u: Z( H% h- Q; j3 X5 u) {</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典
6 i# o& x/ a4 w7 o2 D
7 W$ r8 Q. Z' a: N! |    删除指定键－值对：a.dict_del["aa","abc"];

6 c2 z& `0 D9 u  L. z    清空字典：a.dict_clear();
7 }, Q2 ]- l- S5 c4 q+ d
    删除字典对象，但暂存在缓冲区：del[a];

. h7 X5 m5 K3 a8 _    立即彻底删除字典对象：delete[a];
) C. m5 e! B$ R$ [
    （5）字典反序

2. !!!using("sys");6 r$ R, w& L  [$ E& k
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">6 r$ R, w& L  [$ E& k</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");% f5 K/ ?6 d: @9 N  ~; G' Z
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 3 z5 J( x3 @1 k$ \/ E6 _5 u; l2 }* S
6.   i=0, while{++i<=100, str[1]=i,1 Z\\" K  u$ u5 N) w! D* c
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. 0 p+ d4 W$ f+ w. L
10.   },& z; p& Z$ F! [. _7 S/ [
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. ) O& S- d1 f& d1 r8 Y/ Q
14.   t0=clock(), sum=0,
    
15. ' I# v' Y- N% i6 E3 l
16.   i=0, while{++i<=100, str[1]=i,
    
17. % T6 A8 c0 g. b& l2 S' o
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. # R# ?* s. X$ h: ~& V
20.   },& W: @1 ]8 n8 V. k5 ]
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">% f5 K/ ?6 d: @9 N  ~; G' Z</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">3 z5 J( x3 @1 k$ \/ E6 _5 u; l2 }* S</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">1 Z\\" K  u$ u5 N) w! D* c</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">0 p+ d4 W$ f+ w. L</span>   },<font class=\\"jammer\\">& z; p& Z$ F! [. _7 S/ [</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">) O& S- d1 f& d1 r8 Y/ Q</span>   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">' I# v' Y- N% i6 E3 l</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">% T6 A8 c0 g. b& l2 S' o</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\"># R# ?* s. X$ h: ~& V</span>   },<font class=\\"jammer\\">& W: @1 ]8 n8 V. k5 ]</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000' l7 f& t3 d+ o4 M/ k% n
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码