substepping seems to be inactive

even in RGC test
This commit is contained in:
Martin Diehl 2021-01-25 07:42:12 +01:00
parent 2533e0616d
commit 6cca9202ad
1 changed files with 3 additions and 1 deletions

View File

@ -266,7 +266,7 @@ subroutine materialpoint_stressAndItsTangent(dt,FEsolving_execIP,FEsolving_execE
subStep = min(1.0_pReal-subFrac,num%stepIncreaseHomog*subStep) ! introduce flexibility for step increase/acceleration
steppingNeeded: if (subStep > num%subStepMinHomog) then
error stop
! wind forward grain starting point
call constitutive_windForward(ip,el)
@ -294,6 +294,8 @@ subroutine materialpoint_stressAndItsTangent(dt,FEsolving_execIP,FEsolving_execE
convergenceLooping: do while (.not. (terminallyIll .or. doneAndHappy(1)) &
.and. NiterationMPstate < num%nMPstate)
NiterationMPstate = NiterationMPstate + 1
if (subStep /= 1.0 .or. subFrac /= 0.0) error stop
!--------------------------------------------------------------------------------------------------
! deformation partitioning