diff --git a/code/crystallite.f90 b/code/crystallite.f90 index a11fd3b18..c943aae90 100644 --- a/code/crystallite.f90 +++ b/code/crystallite.f90 @@ -334,9 +334,9 @@ subroutine crystallite_stressAndItsTangent(updateJaco) pert_Fg, & pert_method, & nState, & - nCryst - use debug, only: iJacoStiffness, & - debugger, & + nCryst, & + iJacoStiffness + use debug, only: debugger, & selectiveDebugger, & debug_e, & debug_i, &