From f70013ee9b355c5a697a78f215a0a669120038d3 Mon Sep 17 00:00:00 2001 From: Denny Tjahjanto Date: Wed, 26 Aug 2009 09:02:22 +0000 Subject: [PATCH] lattice.f90: correction of typo from the last update (Philip) --- code/lattice.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/lattice.f90 b/code/lattice.f90 index 8f7930b58..5fcfb4d83 100644 --- a/code/lattice.f90 +++ b/code/lattice.f90 @@ -411,7 +411,7 @@ integer(pInt), allocatable, dimension(:,:,:) :: lattice_interactionSlipSlip, & 0,0,0,0,0,0,0,0,0,0,0,0, & 0,0,0,0,0,0,0,0,0,0,0,0, & 0,0,0,0,0,0,0,0,0,0,0,0 & - /),(/lattice_bcc_Ntwin,lattice_bcc_Ntwin/)) + /),(/lattice_bcc_Ntwin,lattice_bcc_Nslip/))