loyal979
Mechanical
- Nov 6, 2018
- 47
Hello all,
I have some issues using ufield subroutine. I am trying to update two field variables (FV1 and FV2). The issue is that the values are always the same for both. It seems that whatever value FV1 has, the same value will be given to FV2. It looks like FV1 controls FV2, and they should be different values.
I have defined initial values for FV1 and FV2 using the predefined field in the load section. Also defined FV1 and FV2 in the step using the predefined field (separate definition for each) where the distribution for these values will be from user-defined.
Here is my UField subroutine below:
SUBROUTINE UFIELD(FIELD,KFIELD,NSECPT,KSTEP,KINC,TIME,NODE,COORDS,
1 TEMP,DTEMP,NFIELD)
C
INCLUDE 'ABA_PARAM.INC'
C
DIMENSION FIELD(NSECPT,NFIELD),COORDS(3),TIME(2),TEMP(NSECPT),
1 DTEMP(NSECPT)
C
C Evaluate change in Temp. and send it back to abaqus as a state variable
C CTem = (mc * Qvap) / (ASPECHT * AMass)
C
CMC = DTEMP(1)
CTem = (CMC * 3349440.) / (1000. * 0.24)
FIELD(1,1)= CTem
FIELD(1,2)= CTem+20.
C
C
RETURN
END
I am not sure why FV1 is the same as FV2. Please let me know if you have any idea about this issue.
Thanks,
Matt
I have some issues using ufield subroutine. I am trying to update two field variables (FV1 and FV2). The issue is that the values are always the same for both. It seems that whatever value FV1 has, the same value will be given to FV2. It looks like FV1 controls FV2, and they should be different values.
I have defined initial values for FV1 and FV2 using the predefined field in the load section. Also defined FV1 and FV2 in the step using the predefined field (separate definition for each) where the distribution for these values will be from user-defined.
Here is my UField subroutine below:
SUBROUTINE UFIELD(FIELD,KFIELD,NSECPT,KSTEP,KINC,TIME,NODE,COORDS,
1 TEMP,DTEMP,NFIELD)
C
INCLUDE 'ABA_PARAM.INC'
C
DIMENSION FIELD(NSECPT,NFIELD),COORDS(3),TIME(2),TEMP(NSECPT),
1 DTEMP(NSECPT)
C
C Evaluate change in Temp. and send it back to abaqus as a state variable
C CTem = (mc * Qvap) / (ASPECHT * AMass)
C
CMC = DTEMP(1)
CTem = (CMC * 3349440.) / (1000. * 0.24)
FIELD(1,1)= CTem
FIELD(1,2)= CTem+20.
C
C
RETURN
END
I am not sure why FV1 is the same as FV2. Please let me know if you have any idea about this issue.
Thanks,
Matt