diff --git a/src/material.f90 b/src/material.f90 index 05c027d55..9c5009484 100644 --- a/src/material.f90 +++ b/src/material.f90 @@ -317,6 +317,7 @@ subroutine material_init deallocate(microstructure_phase) deallocate(microstructure_texture) + deallocate(texture_orientation) allocate(material_homogenizationAt,source=discretization_homogenizationAt)