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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
9 M/ k2 P; i- w" G5 V  ]
    （1）新建字典

2. !!!using("sys");8 `( c. w  @% E
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">8 `( c. w  @% E</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");\\" t& Q; g' c5 Z( }* D# X4 f
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">\\" t& Q; g' c5 Z( }* D# X4 f</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");. [( R1 t7 Y7 X
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">. [( R1 t7 Y7 X</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");7 ~% Z/ b6 L  x& {# D, V
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">7 ~% Z/ b6 L  x& {# D, V</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

$ n, O! J) R& a1 K, m% J    （4）删除字典
6 E2 t& }% S. u: b5 n* ]
8 u9 l3 `  V) D! C% ?3 |    删除指定键－值对：a.dict_del["aa","abc"];
8 S/ C' F' ]0 w7 [0 [/ k
    清空字典：a.dict_clear();

2 B$ u* V$ U6 z7 D1 k& ~    删除字典对象，但暂存在缓冲区：del[a];
6 W$ h, c5 \+ S- ^8 N/ F* d9 c" n
% S. V+ M7 n1 ~4 Q) Y    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");
   
3. 2 J3 I, E$ O2 `; _
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">2 J3 I, E$ O2 `; _</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. ' e4 n0 N2 c\\" w- }\\" v6 ^
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 1 f% x7 j* ?+ D6 Z1 k- T
6.   i=0, while{++i<=100, str[1]=i,8 \, K, w2 G1 t( \* m
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. ' Y7 N7 D- N1 ], Q& y$ e
10.   },' ?\\" i$ ], U+ J% s6 h
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. . h+ R# N2 }: |7 a* d. ^2 o' l
14.   t0=clock(), sum=0,# y* F+ f7 F) j, r
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. - C, X\\" o: z& A& P1 n
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}. Q, @, D+ d% I- i1 n
    
20.   },
    
21. - p$ k+ ]  Q* T\\" e( f\\" {: _
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">' e4 n0 N2 c\\" w- }\\" v6 ^</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">1 f% x7 j* ?+ D6 Z1 k- T</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">8 \, K, w2 G1 t( \* m</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">' Y7 N7 D- N1 ], Q& y$ e</span>   },<font class=\\"jammer\\">' ?\\" i$ ], U+ J% s6 h</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">. h+ R# N2 }: |7 a* d. ^2 o' l</span>   t0=clock(), sum=0,<font class=\\"jammer\\"># y* F+ f7 F) j, r</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">- C, X\\" o: z& A& P1 n</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">. Q, @, D+ d% I- i1 n</font><br />   },<br /> <span style=\\"display:none\\">- p$ k+ ]  Q* T\\" e( f\\" {: _</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   - o2 @, ^3 D2 W& T, }
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码