按plane:
/PREP7
LOCAL,11,1,20,20
K,9,3.3,-90
K,10,4.1067,-16.94229-36.52886
K,11,3.3,-16.94229
K,12,3.3,0
K,13,3.3,45
K,14,3.3,90
K,15,3.3,135
K,16,3.3,180
K,17,3.3,180+16.94229
K,18,4.1067,16.94229+36.52886+180
K,19,3.24,-90
K,21,3.24,-16.94229
K,20,3.24,-16.94229-36.52886
K,22,3.24,0
K,23,3.24,45
K,24,3.24,90
K,25,3.24,135
K,26,3.24,180
K,27,3.24,180+16.94229
K,28,3.24,180+16.94229+36.52886
K,29,2.76,-90
K,30,2.76,-16.94229-36.52886
K,31,2.76,-16.94229
K,32,2.76,0
K,33,2.76,45
K,34,2.76,90
K,44,2.7,90
K,45,2.7,135
K,35,2.76,135
K,36,2.76,180
K,46,2.7,180
K,37,2.76,180+16.94229
K,47,2.7,180+16.94229
K,38,2.76,180+16.94229+36.52886
K,48,2.7,180+16.94229+36.52886
K,39,2.7,-90
K,40,2.7,-16.94229-36.52886
K,41,2.7,-16.94229
K,42,2.7,0
K,43,2.7,45
SAVE
K,80,0,0
LARC,17,16,80,3.3
LARC,16,15,80,3.3
LARC,15,14,80,3.3
LARC,14,13,80,3.3
LARC,13,12,80,3.3
LARC,12,11,80,3.3
SAVE
A,39,40,41,42,43,44,45,46,47,48
A,29,30,31,32,33,34,35,36,37,38
ASBA,2,1
A,29,30,31,32,33,34,35,36,37,38
A,19,20,21,22,23,24,25,26,27,28
ASBA,2,1
CSYS,0
A,9,10,11,12,13,14,15,16,17,18
CSYS,11
A,19,20,21,22,23,24,25,26,27,28
ASBA,1,2
CSYS,0
K,1,0,0
K,2,20,0
K,3,40,0
K,4,40,20
K,5,40,40
K,6,20,40
K,7,0,40
K,8,0,20
GPLOT
A,9,10,11,12,13,14,15,16,17,18
A,1,2,3,4,5,6,7,8
ASBA,2,1
ET,1,PLANE42
KEYOPT,1,1,0
KEYOPT,1,2,0
KEYOPT,1,3,3
KEYOPT,1,5,0
KEYOPT,1,6,0
R,1,0.2,
R,2,0.018,
!岩石
MP,EX,1,3E9
mp,prxy,1,0.25
mp,dens,1,2760
!TB,CONC,1,1,9,
!TBTEMP,0
!TBDATA,,0.3,1,400,65000,,
!砼
MP,EX,2,2.8E10
mp,prxy,2,0.167
mp,dens,2,2500
!TB,CONC,2,1,9,
1TBTEMP,0
!TBDATA,,0.3,1,1300,12500,,
钢筋
ET,2,BEAM23
KEYOPT,2,2,0
KEYOPT,2,4,1
KEYOPT,2,6,2
KEYOPT,2,10,0
MP,EX,3,20E10
mp,prxy,3,0.25
mp,dens,3,7800
LESIZE,41,,,8
LESIZE,42,,,8
LESIZE,43,,,8
LESIZE,44,,,8
LESIZE,45,,,8
LESIZE,46,,,8
LESIZE,47,,,8
LESIZE,48,,,8
LESIZE,1,,,4
LESIZE,2,,,8
LESIZE,3,,,8
LESIZE,4,,,8
LESIZE,5,,,8
LESIZE,6,,,4
LESIZE,7,,,8
LESIZE,8,,,8
LESIZE,9,,,4
LESIZE,10,,,8
LESIZE,11,,,8
LESIZE,12,,,8
LESIZE,13,,,8
LESIZE,14,,,4
LESIZE,15,,,8
LESIZE,16,,,8
LESIZE,17,,,8
LESIZE,18,,,8
LESIZE,19,,,4
LESIZE,20,,,8
LESIZE,21,,,8
LESIZE,22,,,8
LESIZE,23,,,8
LESIZE,24,,,4
LESIZE,25,,,8
LESIZE,26,,,8
LESIZE,27,,,8
LESIZE,28,,,8
LESIZE,29,,,4
LESIZE,30,,,8
LESIZE,31,,,8
LESIZE,32,,,8
LESIZE,33,,,8
LESIZE,34,,,4
LESIZE,35,,,8
LESIZE,36,,,8
LESIZE,37,,,8
LESIZE,38,,,8
LESIZE,39,,,8
LESIZE,40,,,8
TYPE,1
real,1
MAT,1
AMESH,6
TYPE,1
real,1
MAT,2
smrtsize,5
AMESH,3,5,1
TYPE,2
real,2
MAT,3
lMESH,17,36,1
save
finish
/solu
NSEL,S,LOC,Y,0,0.01
nplot
!NSEL,a,LOC,x,0,0.01
!nplot
!NSEL,a,LOC,x,19.9,20
D,all, ,0, , , ,ALL, , , , ,
lsel,s,,,7,16,1,
SFL,all,PRES,1.16e6,
ACEL,0,9.8,0,
ALLSEL,ALL
solve
finish
/post1
pldisp,0 !绘制变形图(缺省为最后一步的)
plnsol,s,1,0,1 !绘制Z方向的应力
PRNSOL,S,COMP!输出各方向plane42单元应力
PRNSOL,S,PRIN!输出各方向plane42单元123主应力
ETABLE,IMOMENT,SMISC,6
ETABLE,JMOMENT,SMISC,12
ETABLE,IMFORX,SMISC,1
ETABLE,IMFORY,SMISC,2
ETABLE,JMFORX,SMISC,7
ETABLE,JMFORY,SMISC,8
ETABLE,smax,nMISC,1
ETABLE,smin,nMISC,2
PRETAB,IMOMENT,JMOMENT,IMFORX,IMFORY,JMFORX,JMFORY,smax,smin
!*cfopen,钢筋结果,txt,,
!*write,IMOMENT,JMOMENT,IMFORX,IMFORY,JMFORX,JMFORY,smax,smin
!(f12.6)
!*cfclos,all, |