荔酒弥香 发表于 2017-12-1 14:46:53

ansys扭矩添加

Fini
/cle
/PREP7
/units,si,
ET,1,SOLID186
MP,EX,1,2e11
MP,PRXY,1,0.3
CYL4,0,0,0.1, , , ,0.5
wprot,,,90
vsbw,all
wprot,,90
vsbw,all
wpcsys,-1   
k,3000,
k,3001,,,0.5
l,3000,3001
lsel,s,length,,0.5
lesize,all,,,10
lsel,s,loc,z,0
lsel,a,loc,z,0.5
lesize,all,,,6
vmesh,all
n,100000,1,0,0.5
n,200000,-1,0,0.5
et,2,184
keyopt,2,1,1
type,2
mat,2
allsel
nsel,s,loc,z,0.5
nlist
e,100000,2
*do,i,22,33
e,100000,i
*enddo
*do,i,301,312
e,100000,i
*enddo
*do,i,481,491
e,100000,i
*enddo
*do,i,641,704
e,100000,i
*enddo
*do,i,1471,1482
e,100000,i
*enddo
*do,i,1674,1684
e,100000,i
*enddo
*do,i,1834,1897
e,100000,i
*enddo
*do,i,2728,2739
e,100000,i
*enddo
*do,i,2995,3005
e,100000,i
*enddo
*do,i,3155,3218
e,100000,i
*enddo
*do,i,4060,4134
e,100000,i
*enddo
e,200000,2
*do,i,22,33
e,200000,i
*enddo
*do,i,301,312
e,200000,i
*enddo
*do,i,481,491
e,200000,i
*enddo
*do,i,641,704
e,200000,i
*enddo
*do,i,1471,1482
e,200000,i
*enddo
*do,i,1674,1684
e,200000,i
*enddo
*do,i,1834,1897
e,200000,i
*enddo
*do,i,2728,2739
e,200000,i
*enddo
*do,i,2995,3005
e,200000,i
*enddo
*do,i,3155,3218
e,200000,i
*enddo
*do,i,4060,4134
e,200000,i
*enddo
Allsel
/SOLU
f,node(1,0,0.5),fy,50e3
f,node(-1,0,0.5),fy,-50e3
nsel,s,loc,z,0
d,all,all
allsel
solve
FINISH
/POST1
PLNSOL, S,EQV, 0,1.0
页: [1]
查看完整版本: ansys扭矩添加