223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

texture transformation should be a proper rotation 

at least, until the implications of using improper rotations are clear...
This commit is contained in:
Martin Diehl 2016-11-16 22:08:19 +01:00
parent 0f2e22805a
commit 08d9f0a4f3
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
code/material.f90
View File

@ -1051,6 +1051,8 @@ end subroutine material_parsePhase
!> @brief parses the texture part in the material configuration file !> @brief parses the texture part in the material configuration file
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
subroutine material_parseTexture(fileUnit,myPart) subroutine material_parseTexture(fileUnit,myPart)
use prec, only: &
dNeq
use IO, only: & use IO, only: &
IO_read, & IO_read, &
IO_globalTagInPart, & IO_globalTagInPart, &
@ -1069,6 +1071,7 @@ subroutine material_parseTexture(fileUnit,myPart)
inRad, & inRad, &
math_sampleRandomOri, & math_sampleRandomOri, &
math_I3, & math_I3, &
math_det33, &
math_inv33 math_inv33
implicit none implicit none
@ -1154,6 +1157,9 @@ subroutine material_parseTexture(fileUnit,myPart)
end select end select
enddo enddo
if(dNeq(math_det33(texture_transformation(1:3,1:3,section)),1.0_pReal)) &
call IO_error(157_pInt,section)
case ('hybridia') textureType case ('hybridia') textureType
texture_ODFfile(section) = IO_stringValue(line,chunkPos,2_pInt) texture_ODFfile(section) = IO_stringValue(line,chunkPos,2_pInt)