From 219529a4029ab92e82a8f43a02812128dd13a5fb Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Wed, 20 Jan 2021 20:40:14 +0100 Subject: [PATCH] field variables --- src/homogenization.f90 | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/homogenization.f90 b/src/homogenization.f90 index a63487b6f..d576c5672 100644 --- a/src/homogenization.f90 +++ b/src/homogenization.f90 @@ -29,7 +29,9 @@ module homogenization ! General variables for the homogenization at a material point real(pReal), dimension(:), allocatable, public :: & homogenization_T, & - homogenization_dot_T + homogenization_dot_T, & + homogenization_phi, & + homogenization_dot_phi real(pReal), dimension(:,:,:), allocatable, public :: & homogenization_F0, & !< def grad of IP at start of FE increment homogenization_F !< def grad of IP to be reached at end of FE increment