missing use statement caused compilation error

This commit is contained in:
Martin Diehl 2018-10-15 22:38:34 +02:00
parent ad1a64c338
commit be8d7e19fe
2 changed files with 2 additions and 3 deletions

View File

@ -283,7 +283,7 @@ module material
public :: & public :: &
material_init, & material_init, &
material_allocatePlasticState ,& material_allocatePlasticState, &
ELASTICITY_hooke_ID ,& ELASTICITY_hooke_ID ,&
PLASTICITY_none_ID, & PLASTICITY_none_ID, &
PLASTICITY_isotropic_ID, & PLASTICITY_isotropic_ID, &

View File

@ -131,6 +131,7 @@ subroutine plastic_phenopowerlaw_init
phase_plasticity, & phase_plasticity, &
phase_plasticityInstance, & phase_plasticityInstance, &
phase_Noutput, & phase_Noutput, &
material_allocatePlasticState, &
PLASTICITY_PHENOPOWERLAW_LABEL, & PLASTICITY_PHENOPOWERLAW_LABEL, &
PLASTICITY_PHENOPOWERLAW_ID, & PLASTICITY_PHENOPOWERLAW_ID, &
material_phase, & material_phase, &
@ -139,8 +140,6 @@ subroutine plastic_phenopowerlaw_init
MATERIAL_partPhase, & MATERIAL_partPhase, &
config_phase config_phase
use lattice use lattice
use numerics,only: &
numerics_integrator
implicit none implicit none
integer(pInt) :: & integer(pInt) :: &