From 8610531aaed5595ebb71c9e19e4d1b19f862dd74 Mon Sep 17 00:00:00 2001
From: Luv	Sharma <l.sharma@mpie.de>
Date: Sun, 4 Jan 2015 20:13:16 +0000
Subject: [PATCH] removed unused variable.

---
 code/constitutive.f90       | 4 +---
 code/vacancy_generation.f90 | 4 +---
 2 files changed, 2 insertions(+), 6 deletions(-)

diff --git a/code/constitutive.f90 b/code/constitutive.f90
index 8f8d1dc70..09a5093bb 100644
--- a/code/constitutive.f90
+++ b/code/constitutive.f90
@@ -1783,15 +1783,13 @@ function constitutive_getVacancyMobility33(ipc, ip, el)
    el                                                                                               !< element number
  real(pReal), dimension(3,3) :: &
    constitutive_getVacancyMobility33
- real(pReal), dimension(:), allocatable :: &
-   accumulatedSlip
  integer(pInt) :: &
    nSlip
  
  select case(phase_vacancy(material_phase(ipc,ip,el)))                                                   
    case (LOCAL_VACANCY_generation_ID)
     constitutive_getVacancyMobility33 = &
-      vacancy_generation_getVacancyMobility33(nSlip,accumulatedSlip,constitutive_getTemperature(ipc,ip,el), &
+      vacancy_generation_getVacancyMobility33(nSlip,constitutive_getTemperature(ipc,ip,el), &
                                                ipc,ip,el)
     
  end select
diff --git a/code/vacancy_generation.f90 b/code/vacancy_generation.f90
index a612fc127..4894bf4e4 100644
--- a/code/vacancy_generation.f90
+++ b/code/vacancy_generation.f90
@@ -439,7 +439,7 @@ end function vacancy_generation_getVacancyDiffusion33
 !--------------------------------------------------------------------------------------------------
 !> @brief returns generation vacancy mobility tensor 
 !--------------------------------------------------------------------------------------------------
-function vacancy_generation_getVacancyMobility33(nSlip,accumulatedSlip,temperature,ipc,ip,el)
+function vacancy_generation_getVacancyMobility33(nSlip,temperature,ipc,ip,el)
  use math, only: &
    math_I3
  use material, only: &
@@ -454,8 +454,6 @@ function vacancy_generation_getVacancyMobility33(nSlip,accumulatedSlip,temperatu
    el                                                                                               !< element number
  real(pReal), dimension(3,3) :: &
    vacancy_generation_getVacancyMobility33
- real(pReal), dimension(nSlip) :: &
-   accumulatedSlip
  real(pReal) :: &
    temperature
  integer(pInt) :: &