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

forcal

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

3 E: M  K% H9 k" T: h4 X/ K    （1）新建字典

2. !!!using("sys");9 ^% {. r, s& b! l
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">9 ^% {. r, s& b! l</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. 8 b8 U1 ~: T# M) c% z* P
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">8 b8 U1 ~: T# M) c% z* P</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");4 M/ l  g/ X/ K2 L) t
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">4 M/ l  g/ X/ K2 L) t</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. 4 B! ^0 y/ }4 b, X* |
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">4 B! ^0 y/ }4 b, X* |</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
% u6 q* Q. w: `) @' X* s4 h& M
    （4）删除字典
) t+ D% ^: P  |3 l
    删除指定键－值对：a.dict_del["aa","abc"];
. p( O  }$ e& Z: I5 f* s+ \" ]" e
    清空字典：a.dict_clear();
- i# M4 {5 A/ d9 l4 T3 V4 F1 t+ i( V
& v6 F( S; L8 Z0 I6 Z/ M    删除字典对象，但暂存在缓冲区：del[a];

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

    （5）字典反序

2. !!!using("sys");
   
3. / |\\" _1 P$ l1 V
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">/ |\\" _1 P$ l1 V</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");
   
3. ! b3 V; K\\" l: [1 ?* T# @
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 6 w+ q+ P# T4 }1 U( `7 I
6.   i=0, while{++i<=100, str[1]=i,
   
7. 7 ]1 V+ L$ I1 M* `
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. - I# b+ \+ J2 t. Q3 q
10.   },, G1 v3 G% I+ G# t
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. + ?4 I' ^# o6 D8 s* d
14.   t0=clock(), sum=0,4 U, U6 @8 d7 }) r* O0 z5 V
    
16.   i=0, while{++i<=100, str[1]=i,5 g3 H$ E9 w9 m' N# E. a8 w
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}9 X5 E1 O. a; p+ T6 E$ ~* U
    
20.   },9 W. `2 F- Q! `6 H& T1 M\\" ?
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">! b3 V; K\\" l: [1 ?* T# @</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">6 w+ q+ P# T4 }1 U( `7 I</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">7 ]1 V+ L$ I1 M* `</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">- I# b+ \+ J2 t. Q3 q</span>   },<font class=\\"jammer\\">, G1 v3 G% I+ G# t</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">+ ?4 I' ^# o6 D8 s* d</span>   t0=clock(), sum=0,<font class=\\"jammer\\">4 U, U6 @8 d7 }) r* O0 z5 V</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">5 g3 H$ E9 w9 m' N# E. a8 w</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">9 X5 E1 O. a; p+ T6 E$ ~* U</font><br />   },<font class=\\"jammer\\">9 W. `2 F- Q! `6 H& T1 M\\" ?</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=1550000005 A; Y& Y0 n7 E) ?/ Z% M* R\" r\" t
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码