diff --git a/spcom.f90 b/spcom.f90
new file mode 100644
index 000000000..d6763afd7
--- /dev/null
+++ b/spcom.f90
@@ -0,0 +1,3 @@
+parameter (NFFT=32768)
+common/spcom/ss(4,322,NFFT),ss5(322,NFFT),savg(4,NFFT),nhsym,   &
+            ssz(4,322,NFFT),ssz5(322,NFFT),szavg(4,NFFT)