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

forcal

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

: A; F5 A7 d% t7 k) u7 J    （1）新建字典

2. !!!using("sys");
   
3. $ ^+ g8 W: Y, m4 o5 l
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">$ ^+ g8 W: Y, m4 o5 l</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");7 p* r0 d1 I4 S
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">7 p* r0 d1 I4 S</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. 9 _& {3 |\\" p3 y9 h) R4 O
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">9 _& {3 |\\" p3 y9 h) R4 O</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. $ t' L; ^. l4 A. v& a+ [
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">$ t' L; ^. l4 A. v& a+ [</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];
+ m  S& }& Y, Z& i
& ]; u+ T: W8 e, V    清空字典：a.dict_clear();
; [; l  X* _2 S7 \2 |" ?
    删除字典对象，但暂存在缓冲区：del[a];

    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");+ y/ M  _4 O4 ?. D' i( l, w
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">+ y/ M  _4 O4 ?. D' i( l, w</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. 5 @; e- {: a2 }, n\\" \7 e: w9 a% g
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 2 R$ ^, f! `% [2 N) p
6.   i=0, while{++i<=100, str[1]=i,' h) y; H, ~+ u1 i  N5 r+ o1 C) L5 l9 I
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. 3 n* \/ g! ^: L. U/ J! }$ t  n
10.   },5 P  N2 \1 l6 g1 @. r
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. , g- o9 U4 L1 j! n! o
14.   t0=clock(), sum=0,
    
15. : s$ h3 C2 V: k9 t2 f- A
16.   i=0, while{++i<=100, str[1]=i,3 G& _\\" \! C8 ~* j( r! o
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}9 ~2 t8 [9 J/ n% I
    
20.   },! h5 ^9 ]. x) \
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">5 @; e- {: a2 }, n\\" \7 e: w9 a% g</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">2 R$ ^, f! `% [2 N) p</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">' h) y; H, ~+ u1 i  N5 r+ o1 C) L5 l9 I</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">3 n* \/ g! ^: L. U/ J! }$ t  n</span>   },<font class=\\"jammer\\">5 P  N2 \1 l6 g1 @. r</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">, g- o9 U4 L1 j! n! o</span>   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">: s$ h3 C2 V: k9 t2 f- A</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">3 G& _\\" \! C8 ~* j( r! o</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">9 ~2 t8 [9 J/ n% I</font><br />   },<font class=\\"jammer\\">! h5 ^9 ]. x) \</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   8 h; I; |* ^6 ?6 Y
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码