Continue to Site

Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

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

DFLUX Subroutine in Abaqus

Status
Not open for further replies.

mentalwall

Mechanical
Jun 12, 2013
1
Hi All,
I have used abaqus to carry out simple stress tests using loads and thermal loads before however, I am now moving onto more complex cases. After struggling to get the fortran compilers to link on my machine I have now got to the point were I can start to test stuff out.
My aim is to produce a model to simulate a cutting tool move along a surface. I have broken this down into into initially trying to move a point heat source along a plate - just once. From what I have read I need to use the DFLUX subroutine to carry this out.
So far I have constructed the plate as a 3D deformable part with dimensions 120x120x5mm, given it the material properties of steel, created two steps initial and load. I have assigned a boundary condition to the side of the plate and a surface heat flux to the main face of the plate with the distribution set as user defined. In the job I have inserted the fortran file named DFLUX.for. This file contains the following text:

SUBROUTINE DFLUX(FLUX,SOL,JSTEP,JINC,TIME,NOEL,NPT,COORDS,JLTYP,
1 TEMP,PRESS,SNAME)​
C
INCLUDE 'ABA_PARAM.INC'​
C
DIMENSION COORDS(3),FLUX(2),TIME(2)
CHARACTER*80 SNAME
FLUX(1)=????
FLUX(2)=???
RETURN
END​

My issue is that I am struggling to fill in these flux functions so that it models a moving heat source.
I have looked high and low for any good tutorials and wouldn't have posted if I hadn't. So if anyone has any experience of how to do this or a better place to be looking for help I would be very grateful.
Thanks hopefully I will be able to help someone else out in the future.
 
Replies continue below

Recommended for you

Status
Not open for further replies.

Part and Inventory Search

Sponsor