sorry, in rev 568 some variables were not declared in crystallite_postResults
This commit is contained in:
parent
472684c30e
commit
51da3b6242
|
@ -1696,8 +1696,8 @@ function crystallite_postResults(&
|
||||||
1+constitutive_sizePostResults(g,i,e)) :: crystallite_postResults
|
1+constitutive_sizePostResults(g,i,e)) :: crystallite_postResults
|
||||||
|
|
||||||
!*** local variables ***!
|
!*** local variables ***!
|
||||||
real(pReal), dimension(3,3) :: U, R
|
real(pReal), dimension(3,3) :: Ee
|
||||||
integer(pInt) k,l,o,c,crystID
|
integer(pInt) k,l,o,c,crystID,mySize
|
||||||
logical error
|
logical error
|
||||||
|
|
||||||
crystID = microstructure_crystallite(mesh_element(4,e))
|
crystID = microstructure_crystallite(mesh_element(4,e))
|
||||||
|
|
Loading…
Reference in New Issue