From 83edb77d74bb339f3e1324a51039c78ac503db90 Mon Sep 17 00:00:00 2001
From: Charles <sircharlesaze@gmail.com>
Date: Wed, 24 Jul 2019 18:46:39 +0200
Subject: bsq and c13 passed

---
 bsq/tests/generate.pl | 21 ---------------------
 1 file changed, 21 deletions(-)
 delete mode 100755 bsq/tests/generate.pl

(limited to 'bsq/tests')

diff --git a/bsq/tests/generate.pl b/bsq/tests/generate.pl
deleted file mode 100755
index 27bd35f..0000000
--- a/bsq/tests/generate.pl
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/perl
-
-use warnings;
-use strict;
-
-die "program x y density" unless (scalar(@ARGV) == 3);
-
-my ($x, $y, $density) = @ARGV;
-
-print "$y.ox\n";
-for (my $i = 0; $i < $y; $i++) {
-	for (my $j = 0; $j < $x; $j++) {
-		if (int(rand($y) * 2) < $density) {
-			print "o";
-		}
-		else {
-			print ".";
-		}
-	}
-	print "\n";
-}
-- 
cgit