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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
1 N; ^" b; t& Q3 h/ \
. R7 [( |! ^/ r, z4 F. e    （1）新建字典

2. !!!using("sys");3 O$ n% U& E5 D$ W4 q
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">3 O$ n% U& E5 D$ W4 q</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. 3 A& g. j. {) ?# A
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">3 A& g. j. {) ?# A</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");9 E, x( E\\" m1 P* p
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">9 E, x( E\\" m1 P* p</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");; C' ?( @4 k' p1 t9 Z+ D. s
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">; C' ?( @4 k' p1 t9 Z+ D. s</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典
% |' C( j; z. {# l5 C* M+ o
    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();
+ J* Q/ g4 h8 h5 v0 O4 ?' x
4 O% ~' H$ k4 ?) w    删除字典对象，但暂存在缓冲区：del[a];

  c" b/ }4 \( p1 K) n    立即彻底删除字典对象：delete[a];
4 a. X4 J& u# R/ O8 Y) F
' c8 c, I, t$ e    （5）字典反序

2. !!!using("sys");# G4 u\\" @\\" s$ Y9 u, ?
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\"># G4 u\\" @\\" s$ Y9 u, ?</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");. ~6 |3 N, @; j5 W
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,2 w4 L) n2 ~3 K) {
   
6.   i=0, while{++i<=100, str[1]=i,5 i5 v1 r( v; d( o6 p( C/ z
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. ) o( u! Z, u; X' }
10.   },) }6 {$ B4 P! S+ x- _- Z/ T
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},) h1 I8 z% K' n2 j( m& ~2 [
    
14.   t0=clock(), sum=0,) P* S7 n) f6 ?) f% [
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. 6 O  X/ C4 Z1 V3 b
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}. R2 d/ `% g9 [4 P
    
20.   },
    
21. * y7 S+ k, _9 y7 m) V& t
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">. ~6 |3 N, @; j5 W</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">2 w4 L) n2 ~3 K) {</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">5 i5 v1 r( v; d( o6 p( C/ z</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">) o( u! Z, u; X' }</span>   },<font class=\\"jammer\\">) }6 {$ B4 P! S+ x- _- Z/ T</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">) h1 I8 z% K' n2 j( m& ~2 [</font><br />   t0=clock(), sum=0,<font class=\\"jammer\\">) P* S7 n) f6 ?) f% [</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">6 O  X/ C4 Z1 V3 b</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">. R2 d/ `% g9 [4 P</font><br />   },<br /> <span style=\\"display:none\\">* y7 S+ k, _9 y7 m) V& t</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
     [* z0 |( P! Z\" Q0 t1 I6 R
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码