How modify sigini to apply in shell element
How modify sigini to apply in shell element
(OP)
Hello to everyone,
I am using Abaqus CAE to model machinig. I want to include the residual stress (material and machining residual stress) into my model.
Firstly I want to introduce homogeneous residual stress in Shell surface (I am using Shell element S4R and reduced integration).
In the future my intention will be to introduce non-uniform residual stress in Shell surface.
Does anybody have the example of how to employ SIGINI in Shell element.
I do not find in abaqus documentation any example of how to apply in Shell element.
The following code is for solid element. How can I modify in order to applying the load in Shell element?
SIGINI(SIGMA,COORDS,NTENS,NCRDS,NOEL,NPT,LAYER,
>
> 1 KSPT,LREBAR,REBARN)
> C
> INCLUDE 'ABA_PARAM.INC'
> C
> DIMENSION SIGMA(NTENS),COORDS(NCRDS)
> CHARACTER*80 REBARN
>
> SIGMA(1)=0
> SIGMA(2)=0
> SIGMA(3)=1000
> SIGMA(4)=0
> SIGMA(5)=0
> SIGMA(6)=0
>
> RETURN
> END
Thanks in advance,
Ane
I am using Abaqus CAE to model machinig. I want to include the residual stress (material and machining residual stress) into my model.
Firstly I want to introduce homogeneous residual stress in Shell surface (I am using Shell element S4R and reduced integration).
In the future my intention will be to introduce non-uniform residual stress in Shell surface.
Does anybody have the example of how to employ SIGINI in Shell element.
I do not find in abaqus documentation any example of how to apply in Shell element.
The following code is for solid element. How can I modify in order to applying the load in Shell element?
SIGINI(SIGMA,COORDS,NTENS,NCRDS,NOEL,NPT,LAYER,
>
> 1 KSPT,LREBAR,REBARN)
> C
> INCLUDE 'ABA_PARAM.INC'
> C
> DIMENSION SIGMA(NTENS),COORDS(NCRDS)
> CHARACTER*80 REBARN
>
> SIGMA(1)=0
> SIGMA(2)=0
> SIGMA(3)=1000
> SIGMA(4)=0
> SIGMA(5)=0
> SIGMA(6)=0
>
> RETURN
> END
Thanks in advance,
Ane





RE: How modify sigini to apply in shell element
After making some search in abaqus documunetation I write the following code in order to introduce initial residual stress in Shell element. I do not if it is correct or I am mising something.
Any help are welcome.
SIGINI(SIGMA,COORDS,NTENS,NCRDS,NOEL,NPT,LAYER,
>
> 1 KSPT,LREBAR,REBARN)
> C
> INCLUDE 'ABA_PARAM.INC'
> C
> DIMENSION SIGMA(NTENS),COORDS(NCRDS)
> CHARACTER*80 REBARN
IF(noel.EQ.5)then
> SIGMA(1)=0
> SIGMA(2)=0
> SIGMA(3)=1000
> SIGMA(4)=0
> SIGMA(5)=0
> SIGMA(6)=0
> ENDIF
ELSE
ENDIF
> RETURN
> END
Regards,
Ane