数学建模社区-数学中国

标题: Lu系统扩展动态库LuSystem之字典 [打印本页]
作者: forcal    时间: 2011-11-20 20:28
标题: Lu系统扩展动态库LuSystem之字典
    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
0 o, s4 W9 M/ E$ P& b
( C; E. E0 N+ y) B    （1）新建字典
  1. !!!using("sys");
    ; p2 v+ ]. T( G8 ?5 F- W5 H+ p
  2. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。
复制代码
用函数dict生成字典更为方便：
  1. !!!using("sys");) ]) x" T8 h* v) S6 t5 `# ^7 r
  2. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。
复制代码
（2）得到字典元素
  1. !!!using("sys");3 N. p. t9 @: C0 A, M4 M: l
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];
复制代码
（3）增加字典元素
  1. !!!using("sys");7 [/ E0 v& _1 D; [2 x( n2 k* D* Z
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];
复制代码
说明：当往字典中增加元素时，若已存在该键，则进行更新。
# Q- _/ b+ \: [! _+ P$ @' H9 o6 z
    （4）删除字典
' J8 {9 g% y/ k: b# a( ~$ D9 r4 K& [1 ~0 Z$ B
    删除指定键－值对：a.dict_del["aa","abc"];) Z" \) M0 x+ t  U+ k
0 g  S" X3 m" Q# [: W; I( r
    清空字典：a.dict_clear();) m9 R/ F3 l& b7 @4 R2 |8 ^' q, f
9 U+ f3 q- D2 g6 B/ b  n( ^
    删除字典对象，但暂存在缓冲区：del[a];1 b' W1 E& ?' H, e
4 ~( d% Q/ k2 c* M
    立即彻底删除字典对象：delete[a];
/ v3 i) R3 v6 Y0 M+ f: X3 [
  k9 L8 @+ X. T- D! X    （5）字典反序
  1. !!!using("sys");
    * z8 C7 u4 U. b6 J+ F
  2. 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用于求所有元素的值的和。
  1. !!!using("sys");
    5 H' O. w4 A) V$ U5 g! Q
  2. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
    1 Y3 O3 S) p$ y' b& g
  3.   i=0, while{++i<=100, str[1]=i,
    ) a8 p$ D% p. B
  4.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}7 ?' j0 s% c6 \8 D: M5 P& [. g6 M
  5.   },
    7 |8 ^1 J: b* c+ l& Z4 P
  6.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    * d8 G4 W3 Y9 c1 X( S0 e
  7.   t0=clock(), sum=0,0 a# p/ Q+ s: z& F7 f# C" j
  8.   i=0, while{++i<=100, str[1]=i,
    * f, C# V( H! h# Y
  9.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    0 k+ |- N* @- O* J
  10.   },
    4 o  W/ X1 u( f/ q1 K9 p& E7 l: L0 v
  11.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};
复制代码
结果：
  1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
    . G6 u& A# _5 y& Q7 k1 ?
  2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000
复制代码




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5