From 55286b05a919272ecaeb0264c350595af46617ba Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Fri, 19 Jan 2024 11:10:23 -0500
Subject: [PATCH] Zero the ss() array at start of sequence in symspec().

---
 qmap/libqmap/symspec.f90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/qmap/libqmap/symspec.f90 b/qmap/libqmap/symspec.f90
index 830db841d..ae00cc596 100644
--- a/qmap/libqmap/symspec.f90
+++ b/qmap/libqmap/symspec.f90
@@ -43,6 +43,7 @@ subroutine symspec(k,ndiskdat,nb,nbslider,nfsample,    &
 
   if(k.lt.k0) then
      ts=1.d0 - hsym
+     ss=0.
      savg=0.
      ihsym=0
      k1=0