/BATCH  
/COM,ANSYS RELEASE 10.0    UP20050718       08:41:24    03/20/2007
/input,menust,tmp,'',,,,,,,,,,,,,,,,1   
/GRA,POWER
/GST,ON
/PLO,INFO,3
/GRO,CURL,ON
/CPLANE,1   
/REPLOT,RESIZE  
WPSTYLE,,,,,,,,0
!*  
/NOPR   
/PMETH,OFF,0
KEYW,PR_SET,1   
KEYW,PR_STRUC,1 
KEYW,PR_THERM,0 
KEYW,PR_FLUID,0 
KEYW,PR_ELMAG,0 
KEYW,MAGNOD,0   
KEYW,MAGEDG,0   
KEYW,MAGHFE,0   
KEYW,MAGELC,0   
KEYW,PR_MULTI,0 
KEYW,PR_CFD,0   
/GO 
!*  
/COM,   
/COM,Preferences for GUI filtering have been set to display:
/COM,  Structural   
!*  
/PREP7  
!*  
ET,1,PLANE82
!*  
KEYOPT,1,3,3
KEYOPT,1,5,0
KEYOPT,1,6,0
!*  
!*  
R,1,0.005,  
!*  
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,2e9
MPDATA,PRXY,1,,.3   
PCIRC,.09,.025,0,360,   
!*  
LESIZE,ALL, , ,10, ,1, , ,1,
SAVE
SAVE
SAVE
CM,_Y,AREA  
ASEL, , , ,       1 
CM,_Y1,AREA 
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
MSHKEY,2
AMESH,_Y1   
MSHKEY,0
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
FINISH  
/SOL
KPLOT   
FLST,2,1,3,ORDE,1   
FITEM,2,3   
!*  
/GO 
DK,P51X, , , ,0,UX,UY, , , , ,  
FLST,2,1,3,ORDE,1   
FITEM,2,1   
!*  
/GO 
DK,P51X, , , ,0,UY, , , , , ,   
FLST,2,1,3,ORDE,1   
FITEM,2,1   
!*  
/GO 
DK,P51X, ,-0.001, ,0,UX, , , , , ,  
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
!*  
/EFACET,1   
PLNSOL, S,X, 0,1.0  
/EFACET,1   
PLNSOL, S,Y, 0,1.0  
/EFACET,1   
PLNSOL, S,XY, 0,1.0 
/EFACET,1   
PLNSOL, S,1, 0,1.0  
/EFACET,1   
PLNSOL, S,1, 0,1.0  
SAVE
SAVE
SAVE