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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
/ w, r0 y% M/ d  J7 x
# ]1 F0 U2 |  i0 M4 p    （1）新建字典

2. !!!using("sys");
   
3. 1 N+ H\\" l8 n: o5 p2 q& [
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">1 N+ H\\" l8 n: o5 p2 q& [</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. \\" h- R, t8 w. L* w+ ]\\" M( h; W2 }
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">\\" h- R, t8 w. L* w+ ]\\" M( h; W2 }</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");% d1 ], |( p  ]+ \
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">% d1 ], |( p  ]+ \</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");, g, H/ V* e8 G- |2 @/ Z* d, A
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">, g, H/ V* e8 G- |2 @/ Z* d, A</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
& K1 k- [/ E4 ]
    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];
- k2 ~# h. ]7 j9 H; y
    清空字典：a.dict_clear();

    删除字典对象，但暂存在缓冲区：del[a];

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

    （5）字典反序

2. !!!using("sys");
   
3. 0 A4 W$ t: q. ^+ d& l
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">0 A4 W$ t: q. ^+ d& l</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");. m' E& E8 p, c  H1 W/ I% X
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,5 }\\" ]( C! L: D0 x* L
   
6.   i=0, while{++i<=100, str[1]=i,
   
7. 0 K; {7 T7 {# C6 u
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}3 i8 R% V  R5 b: Y8 f) h
   
10.   },# g1 W' u- d, P6 c+ @5 i9 r
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},; |% g- T4 z, A+ a' ]
    
14.   t0=clock(), sum=0,\\" c% x* _3 B8 P0 \# S8 N* J
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. # v* N$ j+ M9 h5 O8 S+ P
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. : m  V6 }' ]5 a5 _) V: g; E8 ?8 a
20.   },8 p, d7 L1 h3 `) n; F1 u3 K; c
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">. m' E& E8 p, c  H1 W/ I% X</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">5 }\\" ]( C! L: D0 x* L</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">0 K; {7 T7 {# C6 u</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">3 i8 R% V  R5 b: Y8 f) h</font><br />   },<font class=\\"jammer\\"># g1 W' u- d, P6 c+ @5 i9 r</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">; |% g- T4 z, A+ a' ]</font><br />   t0=clock(), sum=0,<font class=\\"jammer\\">\\" c% x* _3 B8 P0 \# S8 N* J</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\"># v* N$ j+ M9 h5 O8 S+ P</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">: m  V6 }' ]5 a5 _) V: g; E8 ?8 a</span>   },<font class=\\"jammer\\">8 p, d7 L1 h3 `) n; F1 u3 K; c</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000\" y( H% x- ]8 P& O# L  t8 y4 b' E/ Q
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码