这个是命令流 一直不知道哪里不对,柱高较高时要比非线性分析时小 柱子高度较小时承载力就会很大变得不正常了
/clear,nostart
/filename,tort
/title,1
/prep7
et,1,shell181
et,2,mass21
r,1,3
r,2
mp,ex,1,2.06e5
mp,prxy,1,0.3
!!!!!jiedian!!!!!
k,1,0,8 !jiedian zuobiao (x,y)
k,2,0,0
k,3,-40,0
k,4,-40,10
k,5,-40,20
k,6,-40,55
k,7,-40,65
k,8,-40,75
k,9,0,75
k,10,0,67
l,1,2
l,2,3
l,3,4
l,5,6
l,7,8
l,8,9
l,9,10
larc,5,4,1,5.0 !yuanhulianjie
larc,6,7,1,5.0
lfillt,1,2,2.5 !daojiao
lfillt,2,3,2.5
lfillt,5,6,2.5
lfillt,6,7,2.5
k,1000,0,0,0 !lashen
k,1001,0,0,3000 !zhugao
k,1002,0,75/2,0
k,1003,0,75/2,3000
l,1000,1001
adrag,1,10,2,11,3,8,14
adrag,4,9,5,12,6,13,14
adrag,7,,,,,,14
arsym,x,all,,,10000,1,0 !jingxiang
adele,14,,,1
adele,26,,,1
!k,1002,-40,0,4000
!k,1003,-40,70,4000
!k,1004,0,70,4000
!k,1005,40,70,4000
!k,1006,40,0,4000
!a,1001,1002,1003,1004,1005,1006
!!!!!!!!fendanyuan
type,1
mat,1
real,1
lsel,s,length,,2000,3000,1000,0 !zhugao
lesize,all,50,,,,,,,1
allsel
lsel,s,length,,30,35,5,0
lesize,all,3,,,,,,,1
allsel
lsel,s,length,,5.5,7.5,2,0
lesize,all,,,1,,,,,1
allsel
lsel,s,radius,,2.5,,,0
lesize,all,,,1,,,,,1
allsel
lsel,s,radius,,5,,,0
lesize,all,,,2,,,,,1
mshkey,1
!allsel
!asel,u,area,,14
amesh,all,,
NUMMRG,all,,,,low
NUMCMP,all
katt,1,2,2,0
kmesh,34,35,1
nsel,all
NSEL,S,LOC,Z,0
!NSEL,u,NODE,,NODE(0,37.5,0)
CERIG,NODE(0,37.5,0) ,ALL,ALL
nsel,all
NSEL,S,LOC,Z,3000
!NSEL,U,NODE,,NODE(0,37.5,3000)
CERIG,NODE(0,75/2,3000),ALL,ALL
NUMMRG,all,,,,low
NUMCMP,all
!!!!!!!!!!!!!!!jiazai
/solu
nsel,all
d,NODE(0,75/2,0) ,all,0
d,NODE(0,75/2,3000) ,ux,0
d,NODE(0,75/2,3000) ,uy,0
d,NODE(0,75/2,3000) ,rotx,0
d,NODE(0,75/2,3000) ,roty,0
d,NODE(0,75/2,3000) ,rotz,0
ANTYPE,static
PSTRES,ON
allsel,all,node
f,NODE(0,75/2,3000),fz,-1
ftran
allsel
/PBC,ALL,,1 ! 显示边界条件(2还表示数值)
EPLOT
SOLVE
FINISH
!!!!!!!qiujie
/solu
antype,buckle
bucopt,lanb,1,0,0
mxpand,1,0,0,1,0.001
solve
finish |