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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
- n& Q: z5 ]+ `( N2 f1 T- y# ?
* b. x0 G$ E7 Q# c    （1）新建字典

2. !!!using("sys");
   
3. + m- C& }% `% s2 e: _
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">+ m- C& }% `% s2 e: _</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");; x6 P! X% k8 t/ G, M0 R8 ?
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">; x6 P! X% k8 t/ G, M0 R8 ?</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");3 |/ g/ {! d8 `6 H5 O1 |: v
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">3 |/ g/ {! d8 `6 H5 O1 |: v</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");. B4 W- p5 a+ j\\" }
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">. B4 W- p5 a+ j\\" }</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
  t4 M( {+ [; N4 D' o( Z
2 f7 k( M% {/ U1 k5 f. l1 p    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();
" @; j% Z$ b: C3 |. ^; j3 ^$ P" k" C4 q3 ^
    删除字典对象，但暂存在缓冲区：del[a];

  Z1 _. m, e+ _4 M9 }    立即彻底删除字典对象：delete[a];
) W6 n% [4 b  }9 h$ L, x. \
- \3 S4 c* h" I0 O8 `. o' }    （5）字典反序

2. !!!using("sys");5 h8 w8 |% k1 a3 [# N6 e
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">5 h8 w8 |% k1 a3 [# N6 e</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");+ {, E, c0 Y: D: O( m\\" o) j
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. & h! x3 f5 s; o\\" `
6.   i=0, while{++i<=100, str[1]=i,$ G# g* x- I, a$ K
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. $ S- @4 }7 A6 ~, T$ J1 b# U
10.   },
    
11. $ k, }! ]/ `  U& G
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},! H+ ]6 L: B3 m& o9 L3 ~
    
14.   t0=clock(), sum=0,
    
15. 4 P( p. z- e: \3 W\\" `
16.   i=0, while{++i<=100, str[1]=i,
    
17. & z6 l' [0 G  @0 t5 L; Y2 s1 v. J
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}/ l* I) C+ o6 N6 k
    
20.   },) @& m3 e/ a+ M5 x5 V- n, }
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">+ {, E, c0 Y: D: O( m\\" o) j</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">& h! x3 f5 s; o\\" `</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">$ G# g* x- I, a$ K</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">$ S- @4 }7 A6 ~, T$ J1 b# U</span>   },<br /> <span style=\\"display:none\\">$ k, }! ]/ `  U& G</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">! H+ ]6 L: B3 m& o9 L3 ~</font><br />   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">4 P( p. z- e: \3 W\\" `</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">& z6 l' [0 G  @0 t5 L; Y2 s1 v. J</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">/ l* I) C+ o6 N6 k</font><br />   },<font class=\\"jammer\\">) @& m3 e/ a+ M5 x5 V- n, }</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   ( Q  g8 s4 F8 E! W
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码