From a554bc52673656eabb9e6dd0bfaee28f76dc03d8 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Wed, 19 Feb 2014 07:40:21 +0000 Subject: [PATCH] now ignoring c/a ratio keyword --- code/constitutive_none.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/constitutive_none.f90 b/code/constitutive_none.f90 index 3f0943582..553477490 100644 --- a/code/constitutive_none.f90 +++ b/code/constitutive_none.f90 @@ -140,7 +140,7 @@ subroutine constitutive_none_init(fileUnit) positions = IO_stringPos(line,MAXNCHUNKS) tag = IO_lc(IO_stringValue(line,positions,1_pInt)) ! extract key select case(tag) - case ('plasticity','elasticity') + case ('plasticity','elasticity','covera_ratio') case ('lattice_structure') structure = IO_lc(IO_stringValue(line,positions,2_pInt)) select case(structure(1:3))