数学建模社区-数学中国

标题: Lu系统扩展动态库LuSystem之字典 [打印本页]
作者: forcal    时间: 2011-11-20 20:28
标题: Lu系统扩展动态库LuSystem之字典
    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。; g/ ^# E9 @8 A
* Z8 t' Z6 D4 X) ^" g: Q. O. L
    （1）新建字典
  1. !!!using("sys");
    ( v" d: H" N9 |+ x! i
  2. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。
复制代码
用函数dict生成字典更为方便：
  1. !!!using("sys");: O' _1 O! T8 M
  2. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。
复制代码
（2）得到字典元素
  1. !!!using("sys");4 J+ d9 k4 q# x  n. K8 l  I+ ^, ]
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];
复制代码
（3）增加字典元素
  1. !!!using("sys");6 @) W/ Z5 U! d7 P, t0 z# S; D
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];
复制代码
说明：当往字典中增加元素时，若已存在该键，则进行更新。
5 m* o2 j* p6 C, j
( Z* p# r4 S' }! M) M    （4）删除字典
( }) M" E/ v* c6 k; L, ?/ m& X" t$ E
    删除指定键－值对：a.dict_del["aa","abc"];
" j) D: v6 H" h$ Q) e* w3 ~5 V0 m; S) s3 M) @  l$ w: ?: r/ S1 M4 M
    清空字典：a.dict_clear();1 ^, q1 Y4 \% y7 R  q+ o2 y
" Q1 l6 C$ h! ?9 f  `
    删除字典对象，但暂存在缓冲区：del[a];/ _/ b/ b2 [% ^$ k: S, ]

( Q' x/ {" h# I& E5 v" R4 R    立即彻底删除字典对象：delete[a];
' y+ c# l: _' ]1 Z
3 C5 c  [- |( o/ d9 s1 |% r    （5）字典反序
  1. !!!using("sys");
    6 k- \0 H1 ^: K' v* ~. z* Z
  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");
    & ~9 h- m( U8 t7 g" D5 S+ u
  2. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,: N- g. Q8 m1 L# m1 D, S
  3.   i=0, while{++i<=100, str[1]=i,. o4 P% a# h7 E0 [8 [
  4.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}* ?; @7 y6 `# m0 w4 q0 J4 e+ V
  5.   },
    6 M6 p$ H( x! E1 @
  6.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},! X3 l6 Z* A9 E* o5 R+ n
  7.   t0=clock(), sum=0,
    . i7 _- s1 j' H3 Q0 U5 \
  8.   i=0, while{++i<=100, str[1]=i,
    / W$ m' V0 z" V" q% p# P. S
  9.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}2 C- Q( v- V  G
  10.   },. L: V* Z6 @3 E
  11.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};
复制代码
结果：
  1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
    ) K- ]; _. Z: y0 y* e& m
  2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000
复制代码




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