螺纹面加载问题的求教
我用以下命令建好了螺纹的模型，并且划分成功，但是在对螺纹面加载热流等载荷时，始终加载不上，请大家帮忙看看，给些指点！命令流：
finish
/clear
/prep7
nl=10 !螺纹圈数
lj=0.5 !螺距
r0=1!螺纹外径
lg=0.1 !螺纹高
dr=0 !螺距间的外半径差，用于建锥螺纹，等半径螺纹设dr=0即可
mp,kxx,all,9.54
mp,ex,all,1e-6
*get,k1,kp,,num,max
numstr,kp,k1
k,,0
*do,i,1,nl
k,,r0-(i-1)*dr,(i-1)*lj
k,,r0-lg-(i-1)*dr,(i-1)*lj+lj/2
*enddo
k,,0,(i-1)*lj+lj/2
*get,k2,kp,,num,max
flst,2,k2-k1,3
*do,i,k1+1,k2
fitem,2,i
*enddo
a,p51x
wprota,,-90
cswpla,11,1,1,1
csys,11
k,,r0-dr/4,90,lj/4
k,,r0-dr/2,180,lj/2
k,,r0-dr*0.75,270,lj*.75
csys,0
K,100,0,0,0,
K,101,0,10,0,
ET,1,MESH200
!*
KEYOPT,1,1,6
KEYOPT,1,2,0
!*
!*
ET,2,SOLID45
!*
ESIZE,1,0,
MSHAPE,0,2D
MSHKEY,0
AMESH,all
EXTOPT,ESIZE,32,0,
VROTAT,ALL, , , , , ,100,101,90,1
页:
[1]