Index: ../trunk-jpl/src/c/toolkits/issm/SeqMat.h
===================================================================
--- ../trunk-jpl/src/c/toolkits/issm/SeqMat.h	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/issm/SeqMat.h	(revision 13760)
@@ -63,8 +63,6 @@
 		/*FUNCTION SeqMat(doubletype* serial_mat,int M,int N,doubletype sparsity){{{*/
 		SeqMat(doubletype* serial_mat,int pM,int pN,doubletype sparsity){
 
-			int i,j;
-
 			this->M=pM;
 			this->N=pN;
 			this->matrix=NULL;
Index: ../trunk-jpl/src/c/toolkits/plapack/patches/PlapackInvertMatrix.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/plapack/patches/PlapackInvertMatrix.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/plapack/patches/PlapackInvertMatrix.cpp	(revision 13760)
@@ -18,12 +18,12 @@
 	/*inv_A does not yet exist, inv_A was just allocated, that's all*/
 
 	/*Error management*/
-	int i,j;
+	int i;
 
 	/*input*/
 	int mA,nA;
 	int local_mA,local_nA;
-	int lower_row,upper_row,range,this_range,this_lower_row;
+	int lower_row,upper_row,range;
 	MatType type;
 
 	/*Plapack: */
@@ -40,11 +40,7 @@
 	/*Petsc to Plapack: */
 	double    *arrayA=NULL;
 	int* idxnA=NULL;
-	int d_nz,o_nz;
 
-	/*Feedback to client*/
-	int computation_status;  
-
 	/*Verify that A is square*/
 	MatGetSize(*A,&mA,&nA);
 	MatGetLocalSize(*A,&local_mA,&local_nA);
Index: ../trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp	(revision 13760)
@@ -46,7 +46,7 @@
 	/*error management*/
 
 	int local_m,local_n;
-	int lower_row,upper_row,range;
+	int range;
 	int result=1;
 	int sumresult;
 	int num_procs;
Index: ../trunk-jpl/src/c/toolkits/petsc/patches/PetscOptionsInsertMultipleString.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/PetscOptionsInsertMultipleString.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/PetscOptionsInsertMultipleString.cpp	(revision 13760)
@@ -30,7 +30,6 @@
 	char* second=NULL;
 	char* final=NULL;
 	size_t len;
-	int ignore_second;
 	int first_token=1;
 
 	PetscTokenCreate(options_string,' ',&token);
Index: ../trunk-jpl/src/c/toolkits/petsc/patches/PetscMatrixToDoubleMatrix.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/PetscMatrixToDoubleMatrix.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/PetscMatrixToDoubleMatrix.cpp	(revision 13760)
@@ -20,13 +20,12 @@
 
 void PetscMatrixToDoubleMatrix(double** pmatrix, int* prows, int* pcols,Mat petsc_matrix){
 
-	int i,j,k;
-
 	/*output: */
 	double* matrix=NULL;
 	int     rows,cols;
 
 	/*intermediary: */
+	int     i;
 	int*    idxm=NULL;
 	int*    idxn=NULL;
 
Index: ../trunk-jpl/src/c/toolkits/petsc/patches/NewVec.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/NewVec.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/NewVec.cpp	(revision 13760)
@@ -18,7 +18,6 @@
 
 Vec NewVec(int size,COMM comm,bool fromlocalsize){
 
-	int ierr;
 	int local_size;
 
 	/*output: */
Index: ../trunk-jpl/src/c/toolkits/petsc/patches/NewMat.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/NewMat.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/NewMat.cpp	(revision 13760)
@@ -89,7 +89,6 @@
 	/*parameters: */
 	int    m,n;
 	int    d_nz,o_nz;
-	int    nnz;
 
 	#if _PETSC_MAJOR_ >= 3 
 	const MatType type;
Index: ../trunk-jpl/src/c/toolkits/petsc/patches/VecMerge.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/VecMerge.cpp	(revision 13759)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/VecMerge.cpp	(revision 13760)
@@ -28,7 +28,7 @@
 	double* values=NULL;
 
 	/*Vector sizes: */
-	int MA,MB;
+	int MB;
 
 	VecGetSize(B,&MB);