diff --git a/compute/pzgered.c b/compute/pzgered.c
index f934c494df6a576e4d2fe52bc2a2091ff9b4827a..3f8988be48326cdef7d97a990bf48a249ad19eeb 100644
--- a/compute/pzgered.c
+++ b/compute/pzgered.c
@@ -203,12 +203,12 @@ void chameleon_pzgered( cham_uplo_t uplo, double prec, CHAM_desc_t *A,
      */
     if ( prec < 0. ) {
 #if !defined(CHAMELEON_SIMULATION)
-        double eps  = LAPACKE_dlamch_work('e');
+        eps = LAPACKE_dlamch_work('e');
 #else
 #if defined(PRECISION_z) || defined(PRECISION_d)
-        double eps  = 1.e-15;
+        eps = 1.e-15;
 #else
-        double eps  = 1.e-7;
+        eps = 1.e-7;
 #endif
 #endif
     }
diff --git a/testing/testing_zsysv.c b/testing/testing_zsysv.c
index 51dc5746ca8dff540127078038b6406d3421adea..0daf5b01e51b7caaf08ac1258bdb18bfa22a0f9a 100644
--- a/testing/testing_zsysv.c
+++ b/testing/testing_zsysv.c
@@ -38,7 +38,6 @@ testing_zsysv_desc( run_arg_list_t *args, int check )
     /* Read arguments */
     int         async = parameters_getvalue_int( "async" );
     int         nb    = run_arg_get_int( args, "nb", 320 );
-    int         P     = parameters_getvalue_int( "P" );
     cham_uplo_t uplo  = run_arg_get_uplo( args, "uplo", ChamUpper );
     int         N     = run_arg_get_int( args, "N", 1000 );
     int         NRHS  = run_arg_get_int( args, "NRHS", 1 );
@@ -46,7 +45,6 @@ testing_zsysv_desc( run_arg_list_t *args, int check )
     int         LDB   = run_arg_get_int( args, "LDB", N );
     int         seedA = run_arg_get_int( args, "seedA", testing_ialea() );
     int         seedB = run_arg_get_int( args, "seedB", testing_ialea() );
-    int         Q     = parameters_compute_q( P );
 
     /* Descriptors */
     CHAM_desc_t *descA, *descX;
diff --git a/testing/testing_zsytrf.c b/testing/testing_zsytrf.c
index 676c73b19b59ea1dceed6845abb26f1d74b2e5b0..64fdab25975a2fe08573b5ca0143cabbb17c1b62 100644
--- a/testing/testing_zsytrf.c
+++ b/testing/testing_zsytrf.c
@@ -31,12 +31,10 @@ testing_zsytrf_desc( run_arg_list_t *args, int check )
     /* Read arguments */
     int         async = parameters_getvalue_int( "async" );
     int         nb    = run_arg_get_int( args, "nb", 320 );
-    int         P     = parameters_getvalue_int( "P" );
     cham_uplo_t uplo  = run_arg_get_uplo( args, "uplo", ChamUpper );
     int         N     = run_arg_get_int( args, "N", 1000 );
     int         LDA   = run_arg_get_int( args, "LDA", N );
     int         seedA = run_arg_get_int( args, "seedA", testing_ialea() );
-    int         Q     = parameters_compute_q( P );
 
     /* Descriptors */
     CHAM_desc_t *descA;
diff --git a/testing/testing_zsytrs.c b/testing/testing_zsytrs.c
index 8fa343a9d4ed5d88b82f97ba0496176b53e664a9..bb06ea144798c14cc2ad3404529c6acce6dc86dc 100644
--- a/testing/testing_zsytrs.c
+++ b/testing/testing_zsytrs.c
@@ -32,7 +32,6 @@ testing_zsytrs_desc( run_arg_list_t *args, int check )
     /* Read arguments */
     int         async = parameters_getvalue_int( "async" );
     int         nb    = run_arg_get_int( args, "nb", 320 );
-    int         P     = parameters_getvalue_int( "P" );
     cham_uplo_t uplo  = run_arg_get_uplo( args, "uplo", ChamUpper );
     int         N     = run_arg_get_int( args, "N", 1000 );
     int         NRHS  = run_arg_get_int( args, "NRHS", 1 );
@@ -40,7 +39,6 @@ testing_zsytrs_desc( run_arg_list_t *args, int check )
     int         LDB   = run_arg_get_int( args, "LDB", N );
     int         seedA = run_arg_get_int( args, "seedA", testing_ialea() );
     int         seedB = run_arg_get_int( args, "seedB", testing_ialea() );
-    int         Q     = parameters_compute_q( P );
 
     /* Descriptors */
     CHAM_desc_t *descA, *descX;