diff --git a/src/build_system_wsmp.f90 b/src/build_system_wsmp.f90
index b9f37c297444b3c0dd959af965a9d4a649d76143..af78e054a132ab4e52bf3440fd6adea4673d2bc3 100644
--- a/src/build_system_wsmp.f90
+++ b/src/build_system_wsmp.f90
@@ -172,8 +172,6 @@ do ileaves=1,osolve%nleaves
          ! transfer elemental matrix and rhs into wsmpmatrix structure
          ! different for symmetric or nonsymmetric matrices
 
-         do i=1,params%mpe
-
          do k1=1,params%mpe
             do idof1=1,ndof
                i1=(vo%ftr(osolve%icon(k1,ileaves))-1)*ndof+idof1