关于受脉冲的瞬态响应

浏览:118260 回答:6
弱弱的问一个问题: 一个一端固定,另一端自由的悬臂梁,在给一个脉冲(力)信号后想查看梁的瞬态响应(振动的位移-时间图)。如果没有阻尼的话,板的位移应该是正弦的响应吧,可是我却不知道怎么样用瞬态分析正确察看位移,apdl老是写的不对,出来的图像是一个合成的信号。而且如果修改时间步长deltim的话,响应也会随之有很大变化,不知道是为什么。望有哪位有经验的朋友帮忙看一下,这里先谢谢了:
finish
/clear
l_platte=500e-3 !悬臂梁长度[m]
b_platte=60e-3 !悬臂梁宽度[m]
t_platte=2e-3 !悬臂梁厚度[m]
ele_l_platte=10e-3 !网格划分大小[m]
Kraft=-20 !激励信号[N]
/prep7
!Element-Typ
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
et,1,shell63
r,1,t_platte
! Steel-Material
mp,ex,1,210e9 ! [N/m^2]
mp,prxy,1,0.3
mp,dens,1,7860 ! [kg/m^3]
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
rectng,0,l_platte,0,b_platte
esize,ele_l_platte
asel,all
amesh,all
!transient analysis
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
/solu
antype,trans
trnopt,full
outres,all,all
TINTP,0.0
deltim,0.5
kbc,1
nsel,r,loc,x,0
d,all,all
alls
time,10
solve
time,15
f,node(l_platte,b_platte/2,0),fz,Kraft
solve
time,25
fdele,node(l_platte,b_platte/2,0),all
solve
time,50
solve
finish
/post26
numvar,200
nsol,2,node(l_platte,b_platte/2,0),u,z,disp !2 ist die Referenz-Nummer
/axlab,y,strain
plvar,2
000.jpg
邀请回答 我来回答

全部回答

(6)
默认 最新
ichbinmario
非常感谢帮助,或许是我的理解有偏差。麻烦你费心了,谢谢。
2008年8月18日
评论 点赞
feifei
/clear
l_platte=500e-3 !悬臂梁长度[m]
b_platte=60e-3 !悬臂梁宽度[m]
t_platte=2e-3 !悬臂梁厚度[m]
ele_l_platte=10e-3 !网格划分大小[m]
Kraft=-20 !激励信号[N]
/prep7
!Element-Typ
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
et,1,shell63
r,1,t_platte
! Steel-Material
mp,ex,1,210e9 ! [N/m^2]
mp,prxy,1,0.3
mp,dens,1,7860 ! [kg/m^3]
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
rectng,0,l_platte,0,b_platte
esize,ele_l_platte
asel,all
amesh,all
!transient analysis
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
/SOL
!*
ANTYPE,4
!*
TRNOPT,FULL
LUMPM,0
!施加固定的边界条件
FLST,2,1,4,ORDE,1
FITEM,2,4
!*
/GO
DL,P51X, ,ALL,
!施加z方向的阶跃载荷
FLST,2,1,1,ORDE,1
FITEM,2,55
!*
/GO
F,P51X,FZ,-Kraft
!
!*
OUTRES,ALL,ALL,
!*
TIME,10
AUTOTS,-1
DELTIM,0.2,0.2,0.2,1
KBC,1
!*
TSRES,ERASE
!写入载荷步
LSWRITE,1,
!定义上次施加位置载荷为零等效于删除载荷
FLST,2,1,1,ORDE,1
FITEM,2,55
!*
/GO
F,P51X,FZ,0
!*
TIME,30
AUTOTS,-1
DELTIM,0.5,0.5,0.5,1
KBC,1
!*
TSRES,ERASE
LSWRITE,2,
LSSOLVE,1,2,1,
FINISH
2008年8月14日
评论 点赞
ichbinmario
DL,P51X, ,ALL,
F,P51X,FY,-Kraft
F,P51X,FY,0
嗯,没弄明白为什么既然限制了自由度,还往这些节点上加力。报错提示这里有错误。而且力撤去之后难道不是用fdele的吗?而且我想施加的力是沿着Z轴,观察的亦是Z轴的位移响应(原先施加力的那个节点或是那条线)。
不过还是非常感谢花时间看这个模型,我对GUI操作还不大熟悉,呵呵。
另外我把程序少许改了一下,看到的结果还是这样。
1234.jpg
2008年8月13日
评论 点赞
wangweijin
FLST,2,1,1,ORDE,1
FITEM,2,55 是什么意思,一直想搞明白,和sel有区别吗?
2008年8月12日
评论 点赞
ichbinmario
多谢楼上的解答,可是这个命令流怎么不能运行呢?
2008年8月11日
评论 点赞
feifei
/clear
l_platte=500e-3 !悬臂梁长度[m]
b_platte=60e-3 !悬臂梁宽度[m]
t_platte=2e-3 !悬臂梁厚度[m]
ele_l_platte=10e-3 !网格划分大小[m]
Kraft=-20 !激励信号[N]
/prep7
!Element-Typ
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
et,1,shell63
r,1,t_platte
! Steel-Material
mp,ex,1,210e9 ! [N/m^2]
mp,prxy,1,0.3
mp,dens,1,7860 ! [kg/m^3]
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
rectng,0,l_platte,0,b_platte
esize,ele_l_platte
asel,all
amesh,all
!transient analysis
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
/SOL
!*
ANTYPE,4
!*
TRNOPT,FULL
LUMPM,0
!*
FLST,2,1,4,ORDE,1
FITEM,2,4
!*
/GO
DL,P51X, ,ALL,
FLST,2,1,1,ORDE,1
FITEM,2,55
!*
/GO
F,P51X,FY,-Kraft
!*
!*
OUTRES,ALL,ALL,
!*
TIME,10
AUTOTS,-1
DELTIM,0.2,0.2,0.2,1
KBC,1
!*
TSRES,ERASE
LSWRITE,1,
FLST,2,1,1,ORDE,1
FITEM,2,55
!*
/GO
F,P51X,FY,0
!*
TIME,30
AUTOTS,-1
DELTIM,0.5,0.5,0.5,1
KBC,1
!*
TSRES,ERASE
LSWRITE,2,
LSSOLVE,1,2,1,
FINISH
2008年8月11日
评论 点赞

没解决?试试专家一对一服务

换一批
    App下载
    技术邻APP
    工程师必备
    • 项目客服
    • 培训客服
    • 平台客服

    TOP