ansys算例001

C*** Hongsheng ZHANG of HIT @ 2018

fini
/clear
!———-命令流区

fini
/prep7
!/vup,1,z
/view,1,0,0,1
/PLOPTS,DATE,0
wpstyl,,,,,,0,,1

/RGB,INDEX,100,100,100, 0
/RGB,INDEX, 80, 80, 80,13
/RGB,INDEX, 60, 60, 60,14
/RGB,INDEX, 0, 0, 0,15

et,1,188
keyopt,1,3,2

mp,ex,1,1
mp,prxy,1,0.3

sectype, 1, beam, asec, sec, 0
secoffset, cent
secdata,10000,1,0,1,0,2,0,0,0,0,0,0

n,1,0
n,2,0,1
n,3,1,1
e,1,2
e,2,3

fini
/solu
d,1,all,0
d,3,ux,0
f,3,fy,-1

solve

fini
/post1

/pbc,u,,1
/pbc,rot,,1
/pbc,f,,2
/pbc,m,,2

eplot
/auto
/rep,fast
/show,jpeg,,0
jpeg,default
jpeg,qual,100
/rep
/show,close

etab,mz_i,smisc,3
etab,mz_j,smisc,16
plls,mz_i,mz_j

/auto
/rep,fast
/show,jpeg,,0
jpeg,default
jpeg,qual,100
/rep
/show,close

/exit
!——————————————————————-
/eof