From bb8a71557b92be9ab1d1fb10964ec1833b16e450 Mon Sep 17 00:00:00 2001 From: Luc Hantcherli Date: Wed, 7 Oct 2009 17:00:35 +0000 Subject: [PATCH] Added comment on FCC different interaction types 1 --> self 2 --> coplanar 3 --> collinear 4 --> Hirth locks 5 --> glissile junctions 6 --> Lomer locks --- code/lattice.f90 | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/code/lattice.f90 b/code/lattice.f90 index f018edd4e..078e8c14e 100644 --- a/code/lattice.f90 +++ b/code/lattice.f90 @@ -121,6 +121,13 @@ integer(pInt), allocatable, dimension(:,:,:) :: lattice_interactionSlipSlip, & integer(pInt), target, dimension(lattice_fcc_Nslip,lattice_fcc_Nslip) :: lattice_fcc_interactionSlipSlip = & reshape((/& +! Interaction types +! 1 --- self interaction +! 2 --- coplanar interaction +! 3 --- collinear interaction +! 4 --- Hirth locks +! 5 --- glissile junctions +! 6 --- Lomer locks 1,2,2,4,6,5,3,5,5,4,5,6, & 2,1,2,6,4,5,5,4,6,5,3,5, & 2,2,1,5,5,3,5,6,4,6,5,4, &