24小时热门版块排行榜    

查看: 2378  |  回复: 15
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

zhaoxiu1227

新虫 (初入文坛)

[求助] ansys基岩面输入地震波

我建立的土体模型,如下图,分三层,最底下的是基岩面,请问在ansys里面对土体结构输入地震波,如何定义命令流?这是我原始的命令流,大家帮忙看看有什么问题吗?麻烦各位专家、学者,科研的好心人 帮忙解答,做毕业论文用,我的金币不多,现全部奉上!谢谢大家!!!cnvtol,f,10000,0.00001,2,,
*dim,ACCEXYZ,TABLE,200,3                     !01行
*vread,ACCEXYZ(1,1),accexyz,txt,,JIK,3,200,  02!行
(f10.4)                                      !03行
*vread,ACCEXYZ(1,0),time,txt,                 !04行
(f10.2)                                       !05行
ACCEXYZ(0,1)=1                                !06行
ACCEXYZ(0,2)=2                                !07行,同上
ACCEXYZ(0,3)=3                                !08行,同上
finish
/SOLU
ANTYPE,trans
btime=0.01               !定义计算起始时间
etime=2            !定义计算结束时间
dtime=0.01              !定义计算时间步长
*DO,itime,btime,etime,dtime
time,itime
AUTOTS,0
NSUBST,1, , ,1
KBC,1
acel,ACCEXYZ(itime,1),ACCEXYZ(itime,2),ACCEXYZ(itime,3)     !施加三个方向的地震加速度
SOLVE
*ENDDO
ansys基岩面输入地震波
无标题.jpg
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

雨小喊

新虫 (初入文坛)

【答案】应助回帖

★ ★ ★ ★ ★
zhaoxiu1227: 金币+5, ★有帮助 2014-01-23 10:13:32
你这里的地震波 是一种地震波的场力 对整个土层施加的  是你想要的效果吗  还是你只是相对底层基岩施加
7楼2014-01-22 15:51:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

雨小喊

新虫 (初入文坛)

【答案】应助回帖

我写了个命令流  可以算的 应力也有的 没具体看  参数随便编的  你自己改一下好了

/filename,Q1
/title,JD
/prep7
et,1,solid65,,,,,,,1
mp,ex,1,24320
mp,prxy,1,0.2
mp,dens,1,20e-6
fc=25.6
ft=2.6
qc=7.8
qt=0.28

tb,concr,1
tbdata,,0.5,0.95,ft,-1
tb,mkin,1,
tbtemp,,strain
tbdata,,0.0002,0.0008,0.0014,0.002,0.0033
tbtemp,0.0
tbdata,,0.19*fc,0.64*fc,0.91*fc,fc,0.9*fc



blc4,,,500,300,500
elemsiz=100
vsel,s,,,1
vatt,1,1,1
mshkey,1
esize,elemsiz
vmesh,all

nsel,s,loc,y,0
d,all,all
allsel,all  
*SET,NT,50  
*DIM,TIME,,NT   
*DIM,AC_X,,NT   
*CREATE,ansuitmp
*VREAD,TIME,'TIME','txt',' ',1, , , , , ,   
(F6.2)  
*END
/INPUT,ansuitmp
*CREATE,ansuitmp
*VREAD,AC_X,'AC_X','txt',' ',1, , , , , ,   
(F6.2)  
*END
/INPUT,ansuitmp
FINISH  
/SOL
ANTYPE,TRANS
nlgeom,off  
nropt,full,,on  
ncnv,1  
neqit,50
lnsrch,on   
pred,on
autots,on   
nsubst,1,   
*DO,K,1,NT  
ACEL,AC_X(K),AC_X(K),0  
TIME,TIME(K)
SOLVE   
*ENDDO  
FINISH
11楼2014-01-26 09:30:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

雨小喊

新虫 (初入文坛)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
zhaoxiu1227: 金币+15, ★★★很有帮助 2014-02-08 16:20:04
zhaoxiu1227: 金币+15, ★★★很有帮助, 非常感谢您!!!我先自己查下命令流,实在看不懂再麻烦您,最后能解决的话,我把所有的金币都给您!!! 2014-02-08 16:27:24
网格大小 材料属性参数  你都改一下吧  命令不懂的可以问我
12楼2014-01-26 10:05:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zhaoxiu1227 的主题更新
信息提示
请填处理意见