undid some marc/abaqus related changes

2014-09-23 08:19:15 +00:00 · 2014-09-23 08:19:15 +00:00 · 854879d277
parent bb7f9be6ea
commit 854879d277
1 changed files with 1 additions and 1 deletions
--- a/code/CPFEM.f90
+++ b/code/CPFEM.f90
@ -362,7 +362,7 @@ subroutine CPFEM_general(mode, ffn, ffn1, temperature, dt, elFE, ip)
 #endif

 integer(pInt)                                       elCP, &                                        ! crystal plasticity element number
-                                                     i, k, l, m, ph, homog
+                                                     i, j, k, l, m, n, ph, homog
 logical                                             updateJaco                                     ! flag indicating if JAcobian has to be updated

 #if defined(Marc4DAMASK) || defined(Abaqus)