【转帖】根据后处理结果来修改数据库中的某些参数的一些技巧

lwtzhao

这个论坛得分好像有点困难。。
感觉5分的限制好像是多了一点了。。
呵呵。。
既然拿出来让大家学习，就不要什么限制算了。

hwoodpecker

我是菜鸟，但我还是想发表一些意见，这个论坛是为大家服务的，就应该给我们这些新手一点机会，看看别人好的帖子，要不我们怎么成为高手，又怎么能帮助别人，以促进大家共同进步。如果新手不能看帖子，那么高手永远是高手，菜鸟永远是菜鸟，那等你们这些高手退出舞台，中国又何来的高手！论坛不一定是为高手服务的，也包括我们这些新手。只要我们新手没有犯什么错误，没有什么不良表现，就应该给我们起码的权利。当然我们也想帮助别人，但我们的实力有限，我们是想要在cae方面促进大家共同进步的一族！给我们机会吧，这是我们这些想成为高手的共同呼声！
－－－－－－－－－说一句实话，我向女朋友求爱都没有说出这么动感情的话！呵呵！

hwoodpecker

我是菜鸟，但我还是想发表一些意见，这个论坛是为大家服务的，就应该给我们这些新手一点机会，看看别人好的帖子，要不我们怎么成为高手，又怎么能帮助别人，以促进大家共同进步。如果新手不能看帖子，那么高手永远是高手，菜鸟永远是菜鸟，那等你们这些高手退出舞台，中国又何来的高手！论坛不一定是为高手服务的，也包括我们这些新手。只要我们新手没有犯什么错误，没有什么不良表现，就应该给我们起码的权利。当然我们也想帮助别人，但我们的实力有限，我们是想要在cae方面促进大家共同进步的一族！给我们机会吧，这是我们这些想成为高手的共同呼声！
－－－－－－－－－说一句实话，我向女朋友求爱都没有说出这么动感情的话！呵呵！

小黑

都看不到！我怎能进步？怎能加分？

hwoodpecker

雨人姐，你回答的东西我都看不到呀！

jiany02

分数限制是为了鼓励更多的人参与有效回答问题或发一些高质量

的贴，无它。

那初学者怎么办?

jlinfg

呵呵，看来都有意见

sunshine7528

非常感谢雨人热心奉献！
还得请教雨人版主，我计算摩擦滑移隔震结构，要考虑竖向地震作用对水平地震反应的影响，弹簧单元模拟支座。时程分析过程中每步都要改变弹簧参数，不知如何实现？仿照雨人版主的例子，程序如下，但报错：1.COMBIN40 element 1 real constant has changed value. 2.*create can't be used within a *do loop.

程序如下：
fini
/clear
*set,number,10

*set,dt,0.01
*dim,accel,,number
*vread,accel(1),wave,dat
(f15.5)
*dim,tim,,number
*vfill,tim(1),ramp,dt,dt

*dim,FSLIDE,,number,1,1
FSLIDE(1)=6.0E-3,

/prep7
ET,1,COMBIN40
KEYOPT,1,3,2
KEYOPT,1,6,2

R,1,1.0,,2.0e-2,,FSLIDE(1),1.0E-1

N,1,0,0,0,
N,2,0,-0.01,0,
E,1,2

D,1,all,

allsel,all
fini

*dim,U_2,,number,1,1
*dim,ss1,,number,1,1
*dim,ss2,,number,1,1
*dim,ss4,,number,1,1
*dim,force,,number,1,1

i=1
/solu
antype,trans
nropt,full,,off
OUTPR,all,none
OUTRES,all,last
LNSRCH,ON
AUTOTS,ON
DELTIM,0.01,0.01,0.01,ON  
KBC,0   
ALPHAD,0.38
BETAD,0.006
TIMINT,ON
TINTP,0.005, , ,1,0.5,0   
ACEL,0,accel(i),0
TIME,tim(i)
solve

*get,U_2(i),node,2,u,y
*get,ss1(i),elem,1,smisc,1
*get,ss2(i),elem,1,smisc,2
*get,ss4(i),elem,1,nmisc,4

fini

*do,i,2,number,1
/post1
FSLIDE(i)=6.0E-3+U_2(i-1)/10
fini

*create,outp_data
*cfopen,'inpu_ex','',''
*vwrite,FSLIDE(1)
(f14.6)
*cfclos
*end
/input,outp_data
fini

/solu
antype,,rest,,,

*dim,FSLIDE,,number,1,1
*create,read_data
*vread,FSLIDE(1),inpu_ex
(f14.6)
*end
/input,read_data

R,1,1.0,,2.0e-2,,FSLIDE(i),1.0E-1

nropt,full,,off
OUTPR,all,none
OUTRES,ALL,NONE  
OUTRES,all,last
LNSRCH,ON
AUTOTS,ON
DELTIM,0.01,0.01,0.01,ON  
KBC,0   
ALPHAD,0.3805
BETAD,0.006312
TIMINT,ON
TINTP,0.005, , ,1,0.5,0   
ACEL,0,accel(i),0
TIME,tim(i)
solve

*get,U_2(i),node,2,u,y
*get,ss1(i),elem,1,smisc,1
*get,ss2(i),elem,1,smisc,2
*get,ss4(i),elem,1,nmisc,4

fini
*enddo

/post26

*cfopen,U_2,dat,
*vwrite,U_2(1)
(e14.6)
*cfclos

*VOPER,force(1),ss1(1),ADD,ss2(1)
*CFOPEN,spring,dat,
*VWRITE,ss4(1),force(1)
(e16.6,e16.6)
*CFCLOS

save
fini

光的轨迹

干吗,把门槛设置的这么高!论坛不就是交流学习的地方吗,要不你们别在论坛上讨论了你们私下里不是更好么?!

liuwenjiliu

其实对于我们初学者来说，雨人师姐的内容应该还是有点难度的，看也看不懂，大家还是把基础的学好，不要操之太急！

huimonk

呵呵，积分不够，看不到帖子，算了，不让看就不看了，求人似的

huimonk

喜欢到图书馆借外文原版书来看，说个笑话是原版书贵，要把它借来压在枕头底下用。实际是人家老外写的书让你觉得你肯定能学到东西，而中国的牛牛们好像跟你有仇似的，不把你难倒，不显出他有水平。
是不是我们这些没有积分的菜鸟都看不到的东西，才是显得作者有水平的东西？

makang8110

想看啊,迫切想看啊,完了,一切都完了.

makang8110

各位师兄和前辈,由于我刚接触ansys,一直不能为大家做点什么贡献得分,最近在开发邓肯模型,急迫需要这方面的资料.心有余而力不足确实有点急.由于得分不能看到你们的经典的东西.有哪位好心人能不能把这个网页处理为文件的形式,发到我的油箱里,实在是浪费了你的时间,非常感谢你的帮助.
我的油箱 makang8110@163.com
非常感谢你的帮助．

nugget

我觉得这样只能拉大贫富差距，没别的。不过人在屋檐下哪能不低头呢！