diff --git a/code/crystallite.f90 b/code/crystallite.f90 index ad69feca4..a5024f0e4 100644 --- a/code/crystallite.f90 +++ b/code/crystallite.f90 @@ -519,7 +519,8 @@ subroutine crystallite_stressAndItsTangent(updateJaco) debug_g, & debug_CrystalliteLoopDistribution use IO, only: & - IO_warning + IO_warning, & + IO_error use math, only: & math_inv33, & math_identity2nd, &