use symbols

extra/koszul/koszul.factor

@@ -3,14 +3,10 @@
 USING: arrays assocs hashtables assocs io kernel math
 math.vectors math.matrices math.matrices.elimination namespaces
 parser prettyprint sequences words combinators math.parser
-splitting sorting shuffle ;
+splitting sorting shuffle symbols ;
 IN: koszul
 
 ! Utilities
-: SYMBOLS:
-    ";" parse-tokens [ create-in define-symbol ] each ;
-    parsing
-
 : -1^ odd? -1 1 ? ;
 
 : >alt ( obj -- vec )