1 files changed, 1 insertions, 1 deletions
diff --git a/census.icl b/census.icl
index 29dab81..4b3cade 100644
--- a/census.icl
+++ b/census.icl
@@ -9,7 +9,7 @@ import StdEnv
 Start=v 100 [("A",12.0),("B",8.0),("C",3.0),("D",0.0)]
 
 v n s=sortBy(\(a,b)(c,d).b>d)([(t,3.0)\\t<-s|fst t=="DC"]++w(n-3*(length s))[(t,1.0)\\t<-s|fst t<>"DC"])
-w 0 s=[(p,r+2.0)\\(p,r)<-s]
+w 0s=[(p,r+2.0)\\(p,r)<-s]
 w n s#s=sortBy(\a b.A a>A b)s
 #(p,r)=hd s
 =w(n-1)[(p,r+1.0):tl s]