From c3322b589e9360ec67679726d96e8fae09157be7 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Mon, 30 Apr 2018 13:58:50 +0200 Subject: [PATCH] not needed anymore --- src/plastic_phenopowerlaw.f90 | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/plastic_phenopowerlaw.f90 b/src/plastic_phenopowerlaw.f90 index 042b80be3..c754e3127 100644 --- a/src/plastic_phenopowerlaw.f90 +++ b/src/plastic_phenopowerlaw.f90 @@ -814,9 +814,8 @@ subroutine plastic_phenopowerlaw_dotState(Tstar_v,ipc,ip,el) integer(pInt) :: & instance,ph, & - nSlip,nTwin, & f,i,j,k, & - index_myfamily, & + index_myFamily, & of real(pReal) :: & c_SlipSlip,c_TwinSlip,c_TwinTwin, &