diff --git a/noao/artdata/lists/stcolon.x b/noao/artdata/lists/stcolon.x
index 9aadd5783..2cce1f5e0 100644
--- a/noao/artdata/lists/stcolon.x
+++ b/noao/artdata/lists/stcolon.x
@@ -21,8 +21,6 @@ real	rval
 bool	streq()
 int	strdic(), nscan(), open()
 
-string	lumfuncs LUMFUNCS
-
 begin
 	# Allocate temporary space.
 	call smark (sp)
@@ -404,8 +402,6 @@ real	rval
 bool	streq()
 int	strdic(), nscan(), open()
 
-string	lumfuncs LUMFUNCS
-
 begin
 	call smark (sp)
 	call salloc (cmd, SZ_LINE, TY_CHAR)
diff --git a/noao/imred/dtoi/hdicfit/hdicggraph.x b/noao/imred/dtoi/hdicfit/hdicggraph.x
index dcd9ade31..c12ef4c39 100644
--- a/noao/imred/dtoi/hdicfit/hdicggraph.x
+++ b/noao/imred/dtoi/hdicfit/hdicggraph.x
@@ -78,11 +78,10 @@ int	npts		# Number of points
 
 pointer	sp, xr, yr, sz, szmk, gt1, gt2
 char	tplot[SZ_TPLOT]
-int	i, xaxis, yaxis, symbols[3], markplot
+int	i, xaxis, yaxis, markplot
 real	size, rmin, rmax, big
 bool	fp_equald(), streq(), fp_equalr()
 int	strncmp()
-data	symbols/GM_PLUS, GM_BOX, GM_CIRCLE/
 include	"hdic.com"
 
 begin
diff --git a/noao/rv/rvcorrel.x b/noao/rv/rvcorrel.x
index 5ec38df2b..fc992f98e 100644
--- a/noao/rv/rvcorrel.x
+++ b/noao/rv/rvcorrel.x
@@ -13,7 +13,7 @@ include "rvfilter.h"
 # used as a working space.  Sign convention of this routine, if DATA1 lags 
 # DATA2, i.e. is shifted to the right of it, then ANS will show a peak at 
 # positive lags.
-# Referece:  Numerical Recipes in C, ch 12, Press, et al.
+# Reference:  Numerical Recipes in C, ch 12, Press, et al.
 
 procedure rv_correl (rv, data1, data2, npts, ans)