polishing

2019-12-01 08:33:04 +01:00 · 2019-12-01 08:33:04 +01:00 · df4b642400
parent 07fb915a7e
commit df4b642400
1 changed files with 30 additions and 31 deletions
--- a/src/plastic_nonlocal.f90
+++ b/src/plastic_nonlocal.f90
@ -600,7 +600,6 @@ subroutine plastic_nonlocal_init
    allocate(dst%tau_Back(prm%totalNslip,NofMyPhase),     source=0.0_pReal)
    end associate

-
    if (NofMyPhase > 0) call stateInit(p,NofMyPhase)
    plasticState(p)%state0 = plasticState(p)%state