Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

  • Congratulations waross on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Help on shape violating errors

Status
Not open for further replies.

arpit22x

Aerospace
Mar 6, 2013
8
IN
Hi all,

CAn anybody please look into the errors coming in this code? Please suggest something.

PS. I have already asked this type of question in this forum but I need to figure out the problem. I tried but I am not getting any help from anywhere.

Code:
!*  
/PREP7  
!*  
ET,1,PLANE183   
!*  
KEYOPT,1,1,1
KEYOPT,1,3,3
KEYOPT,1,6,0
!*  
ET,2,PLANE183   
!*  
KEYOPT,2,1,1
KEYOPT,2,3,3
KEYOPT,2,6,0
!*  
!*  
R,1,5e-3,   
!*  
!*  
R,2,5e-3,   
!*  
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,3.55e9 
MPDATA,PRXY,1,,0.365
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,2,,70e9   
MPDATA,PRXY,2,,0.3  
BLC4,0,0,10e-3,140e-3   
CYL4,5e-3,35e-3,17.5e-5 
CYL4,5e-3,105e-3,17.5e-5
FLST,3,2,5,ORDE,2   
FITEM,3,2   
FITEM,3,-3  
ASBA, 1,P51X
CYL4,5e-3,35e-3,17.5e-5 
CYL4,5e-3,105e-3,17.5e-5
!*  
FLST,5,2,5,ORDE,2   
FITEM,5,1   
FITEM,5,-2  
CM,_Y,AREA  
ASEL, , , ,P51X 
CM,_Y1,AREA 
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1 
AATT,       2,       2,   2,       0,   
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
CM,_Y,AREA  
ASEL, , , ,       4 
CM,_Y1,AREA 
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1 
AATT,       1,       1,   1,       0,   
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
SMRT,6  
SMRT,1  
MSHAPE,1,2D 
MSHKEY,0
!*  
CM,_Y,AREA  
ASEL, , , ,       4 
CM,_Y1,AREA 
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
AMESH,_Y1   
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
FLST,5,2,5,ORDE,2   
FITEM,5,1   
FITEM,5,-2  
CM,_Y,AREA  
ASEL, , , ,P51X 
CM,_Y1,AREA 
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
AMESH,_Y1   
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
NUMMRG,KP, , , ,LOW 
NUMMRG,NODE, , , ,LOW   
NUMMRG,NODE, , , ,LOW   
FINISH  
/SOL
!*  
ANTYPE,1
!*  
BUCOPT,LANB,3,0,0,  
FLST,2,1,4,ORDE,1   
FITEM,2,3   
!*  
/GO 
DL,P51X, ,UX,0  
FLST,2,1,4,ORDE,1   
FITEM,2,1   
!*  
/GO 
DL,P51X, ,ALL,0 
FLST,2,1,4,ORDE,1   
FITEM,2,3   
/GO 
!*  
SFL,P51X,PRES,100,  
/STATUS,SOLU
SOLVE   
FINISH
 
Replies continue below

Recommended for you

You should write the code yourself .
If you have "shape violating errors" you must help the software to mesh areas with
esize or Lesize instructions.
Look in Help files.

I wrote this code :

Code:
/PREP7  
! Element Type 
ET,1,PLANE183   

KEYOPT,1,1,1
KEYOPT,1,3,3
KEYOPT,1,6,0

R,1,5e-3,   

ET,2,PLANE183   
 
KEYOPT,2,1,1
KEYOPT,2,3,3
KEYOPT,2,6,0
  
R,2,5e-3,   

! definition materiaux
! mat 1
MP,EX,1,3.55e9 
MP,PRXY,1,0.365

! mat 2
MP,EX,2,70e9   
MP,PRXY,2,0.3
 
!! GEOMETRIE 
BLC4,0,0,10e-3,140e-3   ! A1

CYL4,5e-3,35e-3,17.5e-5 
CYL4,5e-3,105e-3,17.5e-5

ASBA, 1,all

! A1 -> A4

CYL4,5e-3,35e-3,17.5e-5 
CYL4,5e-3,105e-3,17.5e-5

AGLUE, ALL  ! ---->   ___
            !        |   |
            !        |   |
            !        | o | A2
            !        |   |
            !        |A3 |
            !        |   |
            !        | o | A1
            !        |   |
            !        |___|




! Maillage
Asel,s,,,1,2
AATT, 2, 2, 2, 0,   ! AATT, MAT, REAL, TYPE, ESYS, SECN
allsel,all

Asel,s,,,3
AATT, 1, 1, 1, 0,
Allsel,all
! ok

Lsel,s,,,13,20
Lesize,all,,,6
ALLSEL,ALL

Lsel,s,,,1
Lsel,a,,,3
Lesize,all,,,6
ALLSEL,ALL

Lsel,s,,,2
Lsel,a,,,4
Lesize,all,,,40
ALLSEL,ALL

AMESH,1,2

AMESH,3


FINISH  

/SOLU

ANTYPE,0

! B.C.
DL,1, ,ALL,0 
DL,3, ,UX,0  
! LOAD
SFL,3,PRES,100,  

SOLVE   

FINISH
  
/SOLU  
ANTYPE,1
BUCOPT,LANB,3,0,0,  
SOLVE   
FINISH
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top