diff --git a/src/C_routines.c b/src/C_routines.c
index f8187bb56..723c2978d 100644
--- a/src/C_routines.c
+++ b/src/C_routines.c
@@ -2,11 +2,10 @@
 #include <stdio.h>
 #include <unistd.h>
 #include <dirent.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <stdio.h>
 #include <string.h>
 #include <signal.h>
+#include <sys/types.h>
+#include <sys/stat.h>
 
 /* http://stackoverflow.com/questions/30279228/is-there-an-alternative-to-getcwd-in-fortran-2003-2008 */