From 7e27baacfedc12096a133e32127ddac0daea4473 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Thu, 22 Jul 2021 21:39:05 +0200 Subject: [PATCH] missing conversion --- src/phase_mechanical_elastic.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/phase_mechanical_elastic.f90 b/src/phase_mechanical_elastic.f90 index 6703c0717..326c23c7a 100644 --- a/src/phase_mechanical_elastic.f90 +++ b/src/phase_mechanical_elastic.f90 @@ -55,6 +55,8 @@ module subroutine elastic_init(phases) prm%nu = lattice_equivalent_nu(prm%C66,'voigt') prm%mu = lattice_equivalent_mu(prm%C66,'voigt') + + prm%C66 = math_sym3333to66(math_Voigt66to3333(prm%C66)) ! Literature data is in Voigt notation end associate enddo