From be8d7e19feb90a35fbfd2b3a81d8a82b2cd1d89d Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Mon, 15 Oct 2018 22:38:34 +0200 Subject: [PATCH] missing use statement caused compilation error --- src/material.f90 | 2 +- src/plastic_phenopowerlaw.f90 | 3 +-- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/src/material.f90 b/src/material.f90 index f5198972e..fc27b0cf4 100644 --- a/src/material.f90 +++ b/src/material.f90 @@ -283,7 +283,7 @@ module material public :: & material_init, & - material_allocatePlasticState ,& + material_allocatePlasticState, & ELASTICITY_hooke_ID ,& PLASTICITY_none_ID, & PLASTICITY_isotropic_ID, & diff --git a/src/plastic_phenopowerlaw.f90 b/src/plastic_phenopowerlaw.f90 index d3bd509ef..eba2f0dc4 100644 --- a/src/plastic_phenopowerlaw.f90 +++ b/src/plastic_phenopowerlaw.f90 @@ -131,6 +131,7 @@ subroutine plastic_phenopowerlaw_init phase_plasticity, & phase_plasticityInstance, & phase_Noutput, & + material_allocatePlasticState, & PLASTICITY_PHENOPOWERLAW_LABEL, & PLASTICITY_PHENOPOWERLAW_ID, & material_phase, & @@ -139,8 +140,6 @@ subroutine plastic_phenopowerlaw_init MATERIAL_partPhase, & config_phase use lattice - use numerics,only: & - numerics_integrator implicit none integer(pInt) :: &