diff --git a/PDP10/kx10_dt.c b/PDP10/kx10_dt.c
index f697971..54a29b7 100644
--- a/PDP10/kx10_dt.c
+++ b/PDP10/kx10_dt.c
@@ -264,7 +264,7 @@
 
 #define ABS(x)          (((x) < 0)? (-(x)): (x))
 
-#define DT_WRDTIM       10000
+#define DT_WRDTIM       15000
 
 #define WRITTEN       u6          /* Set when tape modified */