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

forcal

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

) B7 o  `) a: r- u5 e    （1）新建字典

2. !!!using("sys");. M5 Z9 S7 R- f3 j
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">. M5 Z9 S7 R- f3 j</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. : K9 h\\" r9 F2 f: Y$ K& D
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">: K9 h\\" r9 F2 f: Y$ K& D</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");6 O3 ?; X9 G2 v- _+ b2 \  ?
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">6 O3 ?; X9 G2 v- _+ b2 \  ?</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");- w; @3 k+ }* f
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">- w; @3 k+ }* f</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
* H, V9 Y6 Z, a% V5 A) T! {
8 K0 y) @+ K4 T. Z3 T# s3 c    （4）删除字典

9 F. R7 {" o: d3 T( V& A    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();

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

5 S. e' \# f! X* j+ j4 L+ s0 ^    立即彻底删除字典对象：delete[a];
7 c7 i; k: Z  L0 w4 i. ]
7 j+ f1 M' {& @3 T3 T7 o    （5）字典反序

2. !!!using("sys");5 v3 Q' q9 V5 t$ m0 q, x- K
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">5 v3 Q' q9 V5 t$ m0 q, x- K</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. : H- C% }0 u( ?: j7 L& q; I0 h- m
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 7 p7 W# r4 ?+ G+ L. t: V/ ?
6.   i=0, while{++i<=100, str[1]=i,
   
7. - @' a* X3 d# F
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. 0 K$ i! O3 i7 T4 i7 y
10.   },
    
11. 4 G% u3 u: Z/ _
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. ) d' C3 P( }# D# T
14.   t0=clock(), sum=0,6 J- v5 f5 L; N' L
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. 8 p\\" z  a1 L\\" m
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}3 L: `6 m2 @- ]: v
    
20.   },- N$ f\\" ]4 ~\\" F\\" p
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">: H- C% }0 u( ?: j7 L& q; I0 h- m</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">7 p7 W# r4 ?+ G+ L. t: V/ ?</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">- @' a* X3 d# F</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">0 K$ i! O3 i7 T4 i7 y</span>   },<br /> <span style=\\"display:none\\">4 G% u3 u: Z/ _</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">) d' C3 P( }# D# T</span>   t0=clock(), sum=0,<font class=\\"jammer\\">6 J- v5 f5 L; N' L</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">8 p\\" z  a1 L\\" m</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">3 L: `6 m2 @- ]: v</font><br />   },<font class=\\"jammer\\">- N$ f\\" ]4 ~\\" F\\" p</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   1 v& @$ _, Z  Q
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码