From d9bdf5362850813a00aa91e27b13fb80a24b45e0 Mon Sep 17 00:00:00 2001
From: Pratheek Shanthraj <pshanthraj@Pratheeks-MBP.fritz.box>
Date: Sat, 22 Sep 2018 12:55:23 +0200
Subject: [PATCH] quadrature weights defined twice for some reason

---
 src/FEM_mech.f90 | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/FEM_mech.f90 b/src/FEM_mech.f90
index d379a6255..c58027bde 100644
--- a/src/FEM_mech.f90
+++ b/src/FEM_mech.f90
@@ -109,7 +109,6 @@ subroutine FEM_mech_init(fieldBC)
  PetscInt                               :: cellStart, cellEnd, cell, basis 
  character(len=7)                       :: prefix = 'mechFE_'
  PetscErrorCode                         :: ierr
- PetscReal, allocatable, target, dimension(:) :: qWeights
 
  write(6,'(/,a)') ' <<<+-  FEM_mech init  -+>>>'
  write(6,'(a15,a)')   ' Current time: ',IO_timeStamp()