leftover variables not needed anymore

This commit is contained in:
Martin Diehl 2018-07-16 11:54:46 +02:00
parent bc5fcf2c14
commit 7f05bf9c0a
2 changed files with 2 additions and 8 deletions

@ -1 +1 @@
Subproject commit d1d46580823d2896059b9514ddc975f9fe5f6b1f
Subproject commit 4d3d6d517171b7c22295896c1c4358238fe6d05d

View File

@ -494,7 +494,6 @@ subroutine crystallite_stressAndItsTangent(updateJaco)
subStepMinCryst, &
subStepSizeCryst, &
stepIncreaseCryst, &
nCryst, &
numerics_integrator, &
numerics_integrationMode, &
numerics_timeSyncing
@ -1215,8 +1214,6 @@ end subroutine crystallite_stressAndItsTangent
subroutine crystallite_integrateStateRK4()
use, intrinsic :: &
IEEE_arithmetic
use numerics, only: &
numerics_integrationMode
use debug, only: &
#ifdef DEBUG
debug_e, &
@ -1517,8 +1514,7 @@ subroutine crystallite_integrateStateRKCK45()
debug_levelExtensive, &
debug_levelSelective
use numerics, only: &
rTol_crystalliteState, &
numerics_integrationMode
rTol_crystalliteState
use FEsolving, only: &
FEsolving_execElem, &
FEsolving_execIP
@ -2581,7 +2577,6 @@ subroutine crystallite_integrateStateFPI()
debug_levelSelective
use numerics, only: &
nState, &
numerics_integrationMode, &
rTol_crystalliteState
use FEsolving, only: &
FEsolving_execElem, &
@ -3156,7 +3151,6 @@ logical function crystallite_integrateStress(&
aTol_crystalliteStress, &
rTol_crystalliteStress, &
iJacoLpresiduum, &
numerics_integrationMode, &
subStepSizeLp, &
subStepSizeLi
use debug, only: debug_level, &