From 6f2b67399e09442806e204ecaea8fdcebb1419e6 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Mon, 11 May 2020 16:09:47 +0200 Subject: raetselunit.pas: Debugüberbleibsel von 5679bdc4 entfernt MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- raetselunit.pas | 2 -- 1 file changed, 2 deletions(-) diff --git a/raetselunit.pas b/raetselunit.pas index f52a4a3..5913635 100644 --- a/raetselunit.pas +++ b/raetselunit.pas @@ -656,7 +656,6 @@ begin if passt(p[i] mod dim,p[i] div dim) and (anzLoesungen(-1)>0) then funktioniert:=false; end; - writeln; if funktioniert then inhalt[p[i]]:=-1 else @@ -678,7 +677,6 @@ begin if anzLoesungen(-1)>0 then funktioniert:=false; end; - writeln; if funktioniert then rand[p[i]]:=-1 else -- cgit v1.2.3-70-g09d2