added use mesh statement needed for output of mesh_element

2014-09-09 15:18:49 +00:00 · 2014-09-09 15:18:49 +00:00 · b6847ebb01
parent 5a159dcdfa
commit b6847ebb01
1 changed files with 1 additions and 0 deletions
--- a/code/crystallite.f90
+++ b/code/crystallite.f90
@ -3460,6 +3460,7 @@ logical function crystallite_integrateStress(&
                         math_Plain3333to99, &
                         math_Plain33to9, &
                         math_Plain9to33
+ use mesh, only:         mesh_element

 implicit none
 integer(pInt), intent(in)::         e, &                          ! element index