- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Hi,
I am trying to compile UMAT Subroutine for ABAQUS. I use Microsoft Visual Studio 10 and Evaluation version of Intel Parallel Studio XE 2016. I tried to Run ABAQUS with my subroutine file:
SUBROUTINE UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD,
1 RPL,DDSDDT,DRPLDE,DRPLDT,
2 STRAN,DSTRAN,TIME,DTIME,TEMP,DTEMP,PREDEF,DPRED,CMNAME,
3 NDI,NSHR,NTENS,NSTATV,PROPS,NPROPS,COORDS,DROT,PNEWDT,
4 CELENT,DFGRD0,DFGRD1,NOEL,NPT,LAYER,KSPT,KSTEP,KINC)
C
INCLUDE 'ABA_PARAM_DP.INC'
C
CHARACTER*80 CMNAME
DIMENSION STRESS(NTENS),STATEV(NSTATV),
1 DDSDDE(NTENS,NTENS),DDSDDT(NTENS),DRPLDE(NTENS),
2 STRAN(NTENS),DSTRAN(NTENS),TIME(2),PREDEF(1),DPRED(1),
3 PROPS(NPROPS),COORDS(3),DROT(3,3),DFGRD0(3,3),DFGRD1(3,3)
C 4 JSTEP(4)
C Elastic User subroutine
PARAMETER (ONE=1.0D0, TWO=2.0D0)
E=PROPS(1)
ANU=PROPS(2)
ALAMBDA=E*ANU/(ONE+ANU)/(OME-TWO*ANU)
AMU=E/(ONE+ANU)/2
DO I=1,NTENS
DO J=1,NTENS
DDSDDE(I,J)=0.0D0
ENDDO
ENDDO
DDSDDE(1,1)=(ALAMBDA+TWO*AMU)
DDSDDE(2,2)=(ALAMBDA+TWO*AMU)
DDSDDE(3,3)=(ALAMBDA+TWO*AMU)
DDSDDE(4,4)=AMU
DDSDDE(5,5)=AMU
DDSDDE(6,6)=AMU
DDSDDE(1,2)=ALAMBDA
DDSDDE(1,3)=ALAMBDA
DDSDDE(2,3)=ALAMBDA
DDSDDE(2,1)=ALAMBDA
DDSDDE(3,1)=ALAMBDA
DDSDDE(3,2)=ALAMBDA
DO I=1,NTENS
DO J=1,NTENS
STRESS(I)=STRESS(I)+DDSDDE(I,J)*DSTRAN(J)
ENDDO
ENDDO
RETURN
END
I received an compiling error. I am trying to run this code on Visual Fortran but I am not sure what project type I have use. I tried a console application, but I get Link error due to no Main(). Please advise me on this.
Jayantha
Link Copied
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content

- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page