From 69992638a8e54d6914e3dbbe1b794f26c4589e9a Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Mon, 17 Feb 2014 09:45:54 +0000 Subject: [PATCH] added missing covera_ration in hex test. was not necessary before for constitutive_none, now it is --- code/lattice.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/lattice.f90 b/code/lattice.f90 index c47716229..cf52cdd3b 100644 --- a/code/lattice.f90 +++ b/code/lattice.f90 @@ -913,7 +913,7 @@ integer(pInt) function lattice_initializeStructure(struct_ID,CoverA) implicit none integer(kind(LATTICE_fcc_ID)), intent(in) :: struct_ID - real(pReal) :: CoverA + real(pReal), intent(in) :: CoverA real(pReal), dimension(3) :: sdU = 0.0_pReal, & snU = 0.0_pReal, & np = 0.0_pReal, &