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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
" }% ^3 n1 \! p- p6 ]. n
! I! M, {. m* _' u  |    （1）新建字典

2. !!!using("sys");) D% n/ _# B6 |! u
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">) D% n/ _# B6 |! u</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");( f) H. B2 w/ J) J1 z+ B
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">( f) H. B2 w/ J) J1 z+ B</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");# ^% P1 A+ t; N1 Z$ l+ X7 u/ K
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\"># ^% P1 A+ t; N1 Z$ l+ X7 u/ K</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. % f; [# |, x6 ^; @! w
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">% f; [# |, x6 ^; @! w</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];
2 O8 [9 F8 U/ ?0 Y, I4 [8 O
    清空字典：a.dict_clear();
* f! M; L! A0 E' }8 P! G3 l& L! v
% S+ I2 a$ _6 g0 U) N    删除字典对象，但暂存在缓冲区：del[a];

$ p# L- I; p" K    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");* c# p' z. A+ g+ H% P2 K& G
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">* c# p' z. A+ g+ H% P2 K& G</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");$ J7 B) A& `\\" j\\" s
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 9 t4 S3 D9 E0 S7 V! b\\" E9 J) k: P
6.   i=0, while{++i<=100, str[1]=i,  C, @8 r' z  W5 E4 ]3 j
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. / c0 E  I' r5 ~
10.   },2 T4 u; C8 U1 R2 \2 ]+ R
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},3 D5 y! d2 J5 B3 K6 o  M
    
14.   t0=clock(), sum=0,' |1 B1 ?/ v  j7 Z
    
16.   i=0, while{++i<=100, str[1]=i,( ]# d( h8 q: v; S2 `( |9 D. x
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. + j# @, b* Y2 u  t+ K
20.   },
    
21. . O1 S1 e5 t- k. I+ f' J
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">$ J7 B) A& `\\" j\\" s</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">9 t4 S3 D9 E0 S7 V! b\\" E9 J) k: P</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">  C, @8 r' z  W5 E4 ]3 j</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">/ c0 E  I' r5 ~</span>   },<font class=\\"jammer\\">2 T4 u; C8 U1 R2 \2 ]+ R</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">3 D5 y! d2 J5 B3 K6 o  M</font><br />   t0=clock(), sum=0,<font class=\\"jammer\\">' |1 B1 ?/ v  j7 Z</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">( ]# d( h8 q: v; S2 `( |9 D. x</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">+ j# @, b* Y2 u  t+ K</span>   },<br /> <span style=\\"display:none\\">. O1 S1 e5 t- k. I+ f' J</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   0 @\" R+ U. l6 G/ N
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码