2008年11月29日

给老婆买玩具熊

昨天博客居然写到一半丢了,今天继续。
我的老婆是一个喜欢玩具的家伙,刚认识她的时候就吵着要买玩具,结果在新家买了一个大大的猪,取名“怀春”。也不知道,她怎么想的,大概是认识我的时候她怀春吧。来了这里好久了,也没有买买什么玩具。上次去IKEA看家具,老婆看到一个螃蟹的毛绒玩具,就向小孩一样抱着不肯放,说是好看。可是我怎么也看不出这个螃蟹有什么好看的。

最近她又说要买熊,想想也是,家里现在的都是小熊,还没有大的。于是特意找了个晚上陪她去Vivo City, 去买毛绒熊。老婆现在买毛绒玩具,都先在身上抹一下,看看掉毛否。结果发现那里大多数的都掉毛,不掉毛的又不够大,只能不买。

最近West Coast Plaza 开业,和师兄师姐,进去逛了逛,发现里面居然卖熊。于是立马和老婆进行视频电话,让她过目,是否喜欢。老婆很喜欢,于是我就欢天喜地的抱着熊回去了。看到里面的cold storage卖鲜花,女人都喜欢花,我老婆也不例外,于是就顺便买了一束。这次特意买了一中以前从买买过的艳红色,回来老婆直说漂亮,我也觉得这个颜色比以前买的粉红的漂亮。回来特意把熊放在床上,让它手里抱着鲜花。腿上放个以前就有的小熊。就等老婆回来看了。。。。。下面的照片是螃蟹,大熊抱鲜花美女(小熊)的照片,还有上次买的粉红色的玫瑰。







2008年11月28日

bug of building vlist in PPM library.

Found a bug in PPM library of building vlist in function of "ppm_neighlist_vlist_*" of line
" n1 = Nm(1,idom)
n2 = Nm(1,idom)*Nm(2,idom)
nz = Nm(3,idom)
IF (ppm_dim .EQ. 2) THEN
n2 = 0
nz = 2
ENDIF "
The above line will have rank problem is ppm_dim == 2 ; Because the Nm is returned by function "ppm_neighlist_clist" for ppm_dim ==2 case, the length of first dimesnion is 2. so
the line Nz = Nm(3,idiom) will have problem.
suggested modification:
" n1 = Nm(1,idom)

IF (ppm_dim .EQ. 2) THEN
n2 = 0
nz = 2
ELSE
n2 = Nm(1,idom)*Nm(2,idom)
nz = Nm(3,idom)
ENDIF
"