A modified twin-twin interaction matrix for BCC is introduced.

An introduction of a third parameter at the interactionTwinTwin in the material.config for BCC-dislotwin materials is essential.
This commit is contained in:
Nader Zaafarani 2012-11-16 13:39:08 +00:00
parent 9c489149b5
commit dc5cd8a4c4
1 changed files with 45 additions and 30 deletions

View File

@ -396,9 +396,24 @@ module lattice
!> twin-twin interactions for BCC structures (2) MISSING: not implemented yet !> twin-twin interactions for BCC structures (2) MISSING: not implemented yet
integer(pInt), dimension(lattice_bcc_Ntwin,lattice_bcc_Ntwin), target, private :: & integer(pInt), dimension(lattice_bcc_Ntwin,lattice_bcc_Ntwin), target, private :: &
lattice_bcc_interactionTwinTwin = 0_pInt lattice_bcc_interactionTwinTwin = reshape(int( [&
1,3,3,3,3,3,3,2,3,3,2,3, & ! ---> twin
3,1,3,3,3,3,2,3,3,3,3,2, & ! |
3,3,1,3,3,2,3,3,2,3,3,3, & ! |
3,3,3,1,2,3,3,3,3,2,3,3, & ! v twin
3,3,3,2,1,3,3,3,3,2,3,3, &
3,3,2,3,3,1,3,3,2,3,3,3, &
3,2,3,3,3,3,1,3,3,3,3,2, &
2,3,3,3,3,3,3,1,3,3,2,3, &
3,3,2,3,3,2,3,3,1,3,3,3, &
3,3,3,2,2,3,3,3,3,1,3,3, &
2,3,3,3,3,3,3,2,3,3,1,3, &
3,2,3,3,3,3,2,3,3,3,3,1 &
],pInt),[lattice_bcc_Ntwin,lattice_bcc_Ntwin],order=[2,1])
!< Interaction types
!< 1 --- self interaction
!< 2 --- coplinear interaction
!< 3 --- hardened interaction
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
! hex (3+) ! hex (3+)