From 2621689843f9d20819bc795aa4908b699274ab6f Mon Sep 17 00:00:00 2001
From: Martin Diehl <mail@martin-diehl.net>
Date: Sat, 9 Mar 2019 08:01:20 +0100
Subject: [PATCH] correct initialization

---
 src/damage_nonlocal.f90 | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/damage_nonlocal.f90 b/src/damage_nonlocal.f90
index c702d1a03..119a1a4e3 100644
--- a/src/damage_nonlocal.f90
+++ b/src/damage_nonlocal.f90
@@ -90,7 +90,7 @@ subroutine damage_nonlocal_init
    associate(prm => param(damage_typeInstance(h)), &
              config => config_homogenization(h))
              
-
+   instance = damage_typeInstance(h)
    outputs = config%getStrings('(output)',defaultVal=emptyStringArray)
    allocate(prm%outputID(0))
    
@@ -107,7 +107,6 @@ subroutine damage_nonlocal_init
      
    enddo
 
-
    homog = h
 
      NofMyHomog = count(material_homog == homog)