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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
$ M1 J8 J( b2 u0 T+ W. A; _
! @" Q( t6 n: W5 [) L! p% V    （1）新建字典

2. !!!using("sys");
   
3. 0 [! ?5 V/ ?5 X1 A3 J. D8 \
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">0 [! ?5 V/ ?5 X1 A3 J. D8 \</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. 4 z, B' z5 l2 r: ?/ i  C: v
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">4 z, B' z5 l2 r: ?/ i  C: v</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");% E: x$ p% O6 }0 r% v
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">% E: x$ p% O6 }0 r% v</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");) a% o2 `$ `$ m/ E# `( z
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">) a% o2 `$ `$ m/ E# `( z</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
& {: w( Z4 c0 a$ E( R
    （4）删除字典

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

( U6 j: O9 u6 {/ c: K    清空字典：a.dict_clear();
+ K+ N7 }5 n$ p. ~. P+ M
- r2 u* j: U' _) E8 C    删除字典对象，但暂存在缓冲区：del[a];

; a/ F. t" |- ^    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");
   
3. + [. b/ E- q; L) d% G+ W& q9 z2 M
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">+ [. b/ E- q; L) d% G+ W& q9 z2 M</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. 8 z5 R, b: W1 l3 F6 G
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 4 ]/ D3 K+ n1 P- }
6.   i=0, while{++i<=100, str[1]=i,
   
7. / a, F8 Q: d! }! n. P
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. * i( X8 \! K4 p; j5 W. ^
10.   },1 f1 g4 V% u2 l* G\\" b7 h\\" l
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. , f$ ^+ P$ _0 o- z% n
14.   t0=clock(), sum=0,1 R7 b) s- R0 [) n  Y) @
    
16.   i=0, while{++i<=100, str[1]=i,
    
17. 2 s3 @/ [! h3 Y+ S
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}/ ?6 c2 n1 @5 [9 U6 U
    
20.   },. o6 n. K2 H7 k( ?' g2 W8 h
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">8 z5 R, b: W1 l3 F6 G</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">4 ]/ D3 K+ n1 P- }</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">/ a, F8 Q: d! }! n. P</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">* i( X8 \! K4 p; j5 W. ^</span>   },<font class=\\"jammer\\">1 f1 g4 V% u2 l* G\\" b7 h\\" l</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">, f$ ^+ P$ _0 o- z% n</span>   t0=clock(), sum=0,<font class=\\"jammer\\">1 R7 b) s- R0 [) n  Y) @</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">2 s3 @/ [! h3 Y+ S</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">/ ?6 c2 n1 @5 [9 U6 U</font><br />   },<font class=\\"jammer\\">. o6 n. K2 H7 k( ?' g2 W8 h</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   - f. x( }2 k0 q! F8 d\" C( _! m
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码