这是学生编写的小程序,请您不吝赐教!谢谢!
FINISH
/CLEAR
/PREP7
ET,1,45 !定义体单元solid45
MP,DENS,1,7800
MP,EX,1,2e11
MP,PRXY,1,0.3
ET,2,COMBIN14 !定义弹簧combin14单元
R,2,10,0,0 !刚度为1,方向为两个节点的连线方向
N,1
N,2,0,1
BLOCK,-1,1,1,2,-1,1
HPTCREATE,AREA,3, ,COORD,0,1,0
VSLE, , , ,1
LSEL, , , ,4,5
LSEL,A, , ,9,10
LESIZE,ALL, , ,10
AATT,1, ,1,0,
MSHAPE,1,3D
MSHKEY,0
VMESH,ALL
TYPE,2
REAL,2
E,1,2
D,1, ,0, , , ,ALL, , , , ,
SFA,4, ,PRES,5,
!将弹簧的端点2与节点193全耦合
CP,1,ALL,2,193
!求解
ALLSEL,ALL
/SOLVE
SOLVE |