问题描述:强迫运动是指振动系统在外来周期性力的持续作用下所发生的振动,这个“外来的周期性力”叫驱动力(或强迫力)。但强迫激励一般都是施加在基础上的,比如下图弹簧质量系统,底部基础为固支条件,正常来说固支基础就不能施加位移激励或者加速度激励,那么这种情况下仿真只能求出该弹簧质量系统的力传递率。ANSYS中可以通过命令MODCONT,,ON对模态分析中运用强制运动法进行设置,以实现在固支基础上施加位移/加速度激励。
图1:仿真分析中固支基础无法获得位移/加速度传递率
图2:计算模型
计算结果:中间节点响应谱
FINISH
/CLEAR
/OUT,EMM_SUMMARY,OUT !将输出信息保存到.out文件
/TITLE, ENFORCED MOTION METHOD
/UNIT,SI
/FILNAME,HARMIC_EMM,1
/PREP7
! ELEMENT TYPE
! **************
ET,1,SOLID185
KEYOPT,1,2,3
! MATERIALS PROPERTIES
! *********************
MP,EX,1,210E9
MP,PRXY,1,0.3
MP,DENS,1,7850
! GEOMETRY
! *********
L=10E-2 !PLATE LENGTH
W=10E-2 !PLATE WIDTH
T=0.1E-2 !PLATE THICKNESS
! Acceleration input
NG = 1 ! Number of g's
G = 9.81 ! Gravity acceleration
TOTG = NG*G
! PLATE MODELING
! ****************
BLOCK,0,L,0,W,0,T
! MESH CONTROL
! *************
LSEL,S,LOC,Z,0
LSEL,A,LOC,Z,T
LESIZE,ALL,,,60
ALLSEL,ALL
LSEL,S,LENGTH,,T
LESIZE,ALL,,,4
ALLSEL,ALL
! MESHING
! *******
VSEL,ALL
VATT,1,,1
VMESH,ALL
ALLSEL,ALL
! BC'S - CCCC
! *****
NSEL,S,LOC,X,0
NSEL,A,LOC,X,L
NSEL,A,LOC,Y,0
NSEL,A,LOC,Y,W
D,ALL,ALL,0
CM,BASE_NODES,NODE ! BASE NODES
ALLSEL,ALL
! MODE SUPERPOSITION HARMONIC ANALYSIS SOLUTION
! **********************************************
! MODAL ANALYSIS
! ****************
/SOLU
ANTYPE,2
NMODE=10
MODOPT,LANB,NMODE !Block Lanczos 方法
EQSLV,SPAR !采用稀疏矩阵求解器
MXPAND,NMODE , , ,1
LUMPM,0
PSTRES,0
MODCONT,,ON ! ACTIVATE ENFORCED MOTION
CMSEL,S,BASE_NODES,NODE
D,ALL,UZ,1 ! !这里定义强制运动标识1,注意里1只表示标识1,不表示位移大小
ALLSEL,ALL
SOLVE
FINISH
! HARMONIC ANALYSIS
! ******************
FREQ1=1 ! FIRST FREQUENCY IN RANGE
FREQ2=10000 ! LAST FREQUENCY IN RANGE
FREQSTEP=(FREQ2-FREQ1)*1 ! SUBSTEPS
/SOLU
ANTYPE,3
HROPT,MSUP, , ,0
HROUT,ON
DVAL,1,ACC,TOTG ! 在标识1基础上施加加速度激励
HARFRQ,FREQ1,FREQ2,
NSUBST,FREQSTEP,
KBC,1
ALPHAD,0,
BETAD,0,
DMPRAT,0.005
SOLVE
SAVE
FINISH
! TIME HISTORY POST-PROCESSING
! ****************************
/POST26
file,,rfrq
NSOL,2,5702,U,Z, ! NODE 5702 DISPLACEMENT
/AXLAB,X,Frequency [Hz]
/AXLAB,Y,Absolute Response [m]
/GROPT,LOGX,OFF
/GROPT,LOGY,ON
PLVAR,2
全文结束,感谢阅读!
来源:芷行说