From 914d2592a3ed7dca29716b16b5b17eff45613348 Mon Sep 17 00:00:00 2001 From: nihilazo Date: Wed, 30 Mar 2022 20:23:38 +0100 Subject: [PATCH] cleanup --- main.rkt | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/main.rkt b/main.rkt index eeed378..e4a238e 100644 --- a/main.rkt +++ b/main.rkt @@ -2,7 +2,6 @@ (provide (all-defined-out)) ; for testing module - ; a Board is a list of lines. ; represents a point in 2d space. @@ -30,9 +29,6 @@ (equal? (line-to l1) (line-from l2)) (equal? (line-from l1) (line-to l2))))) - - - ; Line -> Bool ; returns #t if a line is valid in terms of length (only moving one point in one direction) (define (valid-length? line) @@ -49,8 +45,6 @@ (< (- GRID-WIDTH 1) (point-x p)) (< (- GRID-WIDTH 1) (point-y p)))) - - ; Line Board -> Bool ; returns #t if adding the given move to the board is valid. (define (valid-move? line board) @@ -59,4 +53,4 @@ (valid-length? line) (and (not (out-of-bounds? (line-from line))) - (not (out-of-bounds? (line-to line)))))) + (not (out-of-bounds? (line-to line)))))) \ No newline at end of file