Alexander Koss
Automotive
Hello!
I am currently experiencing some difficulties defining a parameter being passed from step to step.
I am using the HETVAL subroutine to define a self-heating material. However, I am trying to prevent any self heating after a certain total energy amount has been released (per each node). Here is my subroutine:
SUBROUTINE HETVAL(CMNAME,TEMP,TIME,DTIME,SVAR,FLUX,PREDEF,
1 DPRED, STATEV)
C
INCLUDE 'ABA_PARAM.INC'
C
CHARACTER*80 CMNAME
DIMENSION TEMP(2),SVAR(1),PREDEF(1),TIME(2),FLUX(2),DPRED(1)
C
IF (STATEV(1) .LE. 20) THEN
IF (TEMP(1) .GE. 10 .AND. TEMP(1) .LT. 50) THEN
FLUX(1)=3.07
STATEV(1)= STATEV(1)+FLUX(1)*DTIME
END IF
END IF
RETURN
END
How do I make it so that after each step, the parameter is increased by a certain value, and passed onto the next step?
I am currently experiencing some difficulties defining a parameter being passed from step to step.
I am using the HETVAL subroutine to define a self-heating material. However, I am trying to prevent any self heating after a certain total energy amount has been released (per each node). Here is my subroutine:
SUBROUTINE HETVAL(CMNAME,TEMP,TIME,DTIME,SVAR,FLUX,PREDEF,
1 DPRED, STATEV)
C
INCLUDE 'ABA_PARAM.INC'
C
CHARACTER*80 CMNAME
DIMENSION TEMP(2),SVAR(1),PREDEF(1),TIME(2),FLUX(2),DPRED(1)
C
IF (STATEV(1) .LE. 20) THEN
IF (TEMP(1) .GE. 10 .AND. TEMP(1) .LT. 50) THEN
FLUX(1)=3.07
STATEV(1)= STATEV(1)+FLUX(1)*DTIME
END IF
END IF
RETURN
END
How do I make it so that after each step, the parameter is increased by a certain value, and passed onto the next step?
