likefeng 发表于 2013-5-20 18:34

这样理解弹性约束对吗


我在这个问题上已经迷惑了很久,就是没有人给指点,如图所示,在物体下面有三个弹簧约束,上部受力。我对弹性约束的理解如下,首先把与底部接触弹簧的部位用耦合命令耦合,然后,用两节点建立弹簧单元。但怎么弄都觉得不对。请大家指点。或许对你们来说不屑一看,但是我非常想知道。希望给指点,谢谢啊!
我的命令流入下:
/BATCH
/COM,ANSYS RELEASE 10.0    UP20050718       18:03:39    05/20/2013
/PREP7
!*
ET,1,PLANE42
!*
ET,2,COMBIN14   
!*
KEYOPT,2,1,0
KEYOPT,2,2,3
KEYOPT,2,3,0
!*
R,1,20, , ,
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2E11   
MPDATA,PRXY,1,,0.3
CYL4,0,0,20
K,10,0,0,0,
K,11,0,0,2,
/VIEW,1,1   
/ANG,1
/REP,FAST   
LSTR,      10,      11
LPLOT   
GPLOT   
APLOT   
/VIEW,1,,,1
/ANG,1
/REP,FAST   
/VIEW,1,1,2,3   
/ANG,1
/REP,FAST   
CM,_Y,AREA
ASEL, , , ,       1
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT,       1,       1,   1,       0,   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
FLST,2,1,5,ORDE,1   
FITEM,2,1   
AESIZE,P51X,1,
MSHAPE,0,2D
MSHKEY,1
!*
CM,_Y,AREA
ASEL, , , ,       1
CM,_Y1,AREA
CHKMSH,'AREA'   
CMSEL,S,_Y
!*
AMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
LPLOT   
CM,_Y,LINE
LSEL, , , ,       5
CM,_Y1,LINE
CMSEL,S,_Y
!*
!*
CMSEL,S,_Y1
LATT,1,1,2, , , ,   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
FLST,5,1,4,ORDE,1   
FITEM,5,5   
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1,1, , , , , , ,1
!*
LMESH,       5
/UI,MESH,OFF
/VIEW,1,,1
/ANG,1
/REP,FAST   
NPLOT   
/VIEW,1,1,2,3   
/ANG,1
/REP,FAST   
/VIEW,1,1   
/ANG,1
/REP,FAST   
NLIST,ALL, , , ,NODE,NODE,NODE
/VIEW,1,1,2,3   
/ANG,1
/REP,FAST   
LPLOT   
LSEL,S, , ,       5
LPLOT   
NSLL,R,1
NPLOT   
/PNUM,KP,0
/PNUM,LINE,0
/PNUM,AREA,0
/PNUM,VOLU,0
/PNUM,NODE,1
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0   
!*
/PNUM,ELEM,0
/REPLOT
!*
ALLSEL,ALL
NPLOT   
/VIEW,1,,1
/ANG,1
/REP,FAST   
FLST,4,11,1
FITEM,4,1090
FITEM,4,38
FITEM,4,462
FITEM,4,35
FITEM,4,425
FITEM,4,482
FITEM,4,300
FITEM,4,23
FITEM,4,423
FITEM,4,614
FITEM,4,40
CP,1,ALL,P51X   
/VIEW,1,1,2,3   
/ANG,1
/REP,FAST   
APLOT   
FINISH
/SOL
!*
ANTYPE,0
FLST,2,1,1,ORDE,1   
FITEM,2,1090
/VIEW,1,,1
/ANG,1
/REP,FAST   
NPLOT   
FLST,2,1,1,ORDE,1   
FITEM,2,1091
!*
/GO
D,P51X, , , , , ,ALL, , , , ,   
/VIEW,1,,1
/ANG,1
/REP,FAST   
/VIEW,1,-1
/ANG,1
/REP,FAST   
/VIEW,1,,,-1
/ANG,1
/REP,FAST   
APLOT   
FLST,2,1,5,ORDE,1   
FITEM,2,1   
/GO
!*
SFA,P51X,1,PRES,30
/STATUS,SOLU
SOLVE   
FINISH
/POST1
SET,FIRST   
FINISH
/SOL
/STATUS,SOLU

页: [1]
查看完整版本: 这样理解弹性约束对吗