/PREP7
SMRT,OFF

ANTYPE,STATIC   
ET,1,PLANE42,,,3            ! ƽӦԪеԪ 
                            
MP,EX,1,210E9               ! 
MP,NUXY,1,.3
R,1,0.1                     ! 
LOCAL,11,1,,,,,,,0.5        ! ϵͳΪԲϵYX0.5
K,1,2,90                     
K,2,2,0                      
L,1,2                        
LOCAL,12,1,,,,,,,0.8461585  ! ϵͳΪԲϵYX0.846
K,3,3.25,90
K,4,3.25,0.0
L,3,4
CSYS,0                      !صʽϵ¡
L,2,4
L,1,3
AL,2,4,1,3                  ! 
DL,4,1,SYMM                 ! ԳԼ 
DL,3,1,SYMM
SFL,2,PRES,-10E6            ! ϵķֲغ
MSHK,2                      ! 񻮷
MSHA,0,2D                   ! ı
SAVE                        ! ݿ
FINISH
ADAPT,7,7,,,1               ! Ϊnsoln=4Σٷֱstargt=7,Ԫߴıfacmx=1
                            
/POST1
EPLOT                       ! ƵԪ
PRERR                       ! ӡٷֱ
NSEL,S,LOC,Y,0.0
NSEL,R,LOC,X,2.0
*GET,MNODE,NODE,,NUM,MAX
*GET,SY_D,NODE,MNODE,S,Y    ! GET DESIRED STRESS SY VALUE
NSEL,ALL
ESEL,ALL
FINISH
