diff --git a/src/fftwf_tools.cpp b/src/fftwf_tools.cpp
index 6d698704e1e3ef520120e1e0c6430201eb611de4..1fb8436c775a1431dcb7be2a37be72bf7e3c35b5 100644
--- a/src/fftwf_tools.cpp
+++ b/src/fftwf_tools.cpp
@@ -147,28 +147,3 @@ int fftwf_get_descriptors_3D(
     return EXIT_SUCCESS;
 }
 
-/* the following is copied from
- * http://agentzlerich.blogspot.com/2010/01/using-fftw-for-in-place-matrix.html
- * */
-fftwf_plan plan_transpose(
-        int rows,
-        int cols,
-        float *in,
-        float *out,
-        const unsigned flags)
-{
-    fftwf_iodim howmany_dims[2];
-    howmany_dims[0].n  = rows;
-    howmany_dims[0].is = cols;
-    howmany_dims[0].os = 1;
-    howmany_dims[1].n  = cols;
-    howmany_dims[1].is = 1;
-    howmany_dims[1].os = rows;
-    const int howmany_rank = sizeof(howmany_dims)/sizeof(howmany_dims[0]);
-
-    return fftwf_plan_guru_r2r(
-            /*rank*/0, /*dims*/NULL,
-            howmany_rank, howmany_dims,
-            in, out, /*kind*/NULL, flags);
-}
-
diff --git a/src/field_descriptor.cpp b/src/field_descriptor.cpp
index f86a335a748f0f168fbcddf7bd2abb068b38c8f6..2c37486bf7d52494dc32f1f4c65497461d73af5d 100644
--- a/src/field_descriptor.cpp
+++ b/src/field_descriptor.cpp
@@ -239,6 +239,9 @@ int field_descriptor::interleave(
         float *a,
         int dim)
 {
+/* the following is copied from
+ * http://agentzlerich.blogspot.com/2010/01/using-fftw-for-in-place-matrix.html
+ * */
     fftwf_iodim howmany_dims[2];
     howmany_dims[0].n  = dim;
     howmany_dims[0].is = this->local_size;