ver1.1

[nysol/mining.git] / zdd / lib / SAPPOROBDD / app / VSOP / ord2sym.pl

diff --git a/zdd/lib/SAPPOROBDD/app/VSOP/ord2sym.pl b/zdd/lib/SAPPOROBDD/app/VSOP/ord2sym.pl
new file mode 100755 (executable)
index 0000000..751f456
--- /dev/null
+++ b/zdd/lib/SAPPOROBDD/app/VSOP/ord2sym.pl
@@ -0,0 +1,10 @@
+#!/usr/bin/perl
+print "symbol /t\n";
+print "symbol ";
+while(<STDIN>){
+  while(/([0-9]+)/gi){
+    print "x$1 " ;
+  }
+}
+print "\n";
+