FINI
/CLE

/PREP7
ET,1,4				!BEAM4Ԫ
KEYOPT,1,6,1			!ѡ
MP,EX,1,26E9			!ģ
MP,PRXY,1,0.2			!ɱ
MP,DENS,1,2449			!ܶ
R,1,1.5,0.28125,0.125,1,1.5	!ʵ

K,1
K,2,10
L,1,2
LESIZE,ALL,,,10		!ָ
LMESH,ALL

SFBEAM,ALL,2,PRES,1E4

/SOLU
DK,1,all
DK,2,UY
DK,2,UZ

ALLS
SOLVE

!
/POST1
ETABLE,MY_I,SMISC,6 		!Z
ETABLE,MY_J,SMISC,12		!Z
PLLS,MY_I,MY_J,-1,0          !ʾ֧Z

