Change name of function to (gen-coll a:int)