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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
* d7 c; @4 F- m+ w! h
    （1）新建字典

2. !!!using("sys");; ?: Y4 o( B% w8 k% r* p2 B9 b
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">; ?: Y4 o( B% w8 k% r* p2 B9 b</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");  ~$ u: S. p; w% l2 b/ K  x4 E
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">  ~$ u: S. p; w% l2 b/ K  x4 E</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. 9 s' r# Q5 a# G. r9 D' ?! p& }! A6 Q9 p
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">9 s' r# Q5 a# G. r9 D' ?! p& }! A6 Q9 p</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");; K3 W' K$ L1 f0 Q/ }1 _
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">; K3 W' K$ L1 f0 Q/ }1 _</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
; T+ ]) |: ]# F9 [& Y" P% x
! S$ v% J( \3 ^: T0 E    （4）删除字典
9 M/ o4 V7 Z( _- b& ~  H" o
- i8 \$ H& ?; P8 s  l( v3 ?" M! m" e  ?/ J    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();
4 Q# Y( ?! P( \  L# W
- C$ T* s; k! z/ O- g& g  j) T    删除字典对象，但暂存在缓冲区：del[a];
3 `7 p4 [9 d" N% R5 H
    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");  u! ~5 U5 S; {& Y* z  \
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">  u! ~5 U5 S; {& Y* z  \</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");8 D7 m/ l1 G  d5 b7 ]+ E# {
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,' M7 ^. Z: }* H( q
   
6.   i=0, while{++i<=100, str[1]=i,
   
7. 1 C. a+ \\\" N) ?! K
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}1 A) b& U  L# O$ I1 Q
   
10.   },
    
11.   x9 F  ]\\" n2 r5 R
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},! S1 t5 F$ {: S- c
    
14.   t0=clock(), sum=0,
    
15. + S9 ]  G9 v2 @) ]0 a) L% Q8 z: b
16.   i=0, while{++i<=100, str[1]=i,
    
17.   t\\" Z+ A. g% L- _) v8 `
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}% o% C2 Y. i; p
    
20.   },
    
21. $ l$ e' K# X6 H# ?
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">8 D7 m/ l1 G  d5 b7 ]+ E# {</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">' M7 ^. Z: }* H( q</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">1 C. a+ \\\" N) ?! K</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">1 A) b& U  L# O$ I1 Q</font><br />   },<br /> <span style=\\"display:none\\">  x9 F  ]\\" n2 r5 R</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">! S1 t5 F$ {: S- c</font><br />   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">+ S9 ]  G9 v2 @) ]0 a) L% Q8 z: b</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">  t\\" Z+ A. g% L- _) v8 `</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">% o% C2 Y. i; p</font><br />   },<br /> <span style=\\"display:none\\">$ l$ e' K# X6 H# ?</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   6 |0 [1 }: `\" W2 J5 s# }) T
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码