Much wider support for Catacomb in all its glory.
[catacomb-perl] / test.pl
diff --git a/test.pl b/test.pl
deleted file mode 100644 (file)
index 8d7e82c..0000000
--- a/test.pl
+++ /dev/null
@@ -1,6 +0,0 @@
-use Catacomb qw(:const);
-
-($c, $g, $r, $h) = Catacomb::EC::Curve->getinfo("secp160r1");
-print $g->atinfp(), ": ", $g->x, ", ", $g->y, "\n";
-$p = $c->mul($g, $r);
-print $p->atinfp(), "\n";