| author | Christian Urban <christian.urban@kcl.ac.uk> |
| Thu, 02 Nov 2023 23:34:53 +0000 | |
| changeset 472 | fbff6f601370 |
| parent 460 | f5c0749858fd |
| permissions | -rw-r--r-- |
| 421 | 1 |
import M4b._ |
|
391
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
2 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
3 |
//type Pos = (Int, Int) |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
4 |
//type Path = List[Pos] |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
5 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
6 |
def add_pair_urban(x: Pos)(y: Pos): Pos = |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
7 |
(x._1 + y._1, x._2 + y._2) |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
8 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
9 |
def is_legal_urban(dim: Int, path: Path)(x: Pos): Boolean = |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
10 |
0 <= x._1 && 0 <= x._2 && x._1 < dim && x._2 < dim && !path.contains(x) |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
11 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
12 |
def moves_urban(x: Pos): List[Pos] = |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
13 |
List(( 1, 2),( 2, 1),( 2, -1),( 1, -2), |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
14 |
(-1, -2),(-2, -1),(-2, 1),(-1, 2)).map(add_pair_urban(x)) |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
15 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
16 |
def legal_moves_urban(dim: Int, path: Path, x: Pos): List[Pos] = |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
17 |
moves_urban(x).filter(is_legal_urban(dim, path)) |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
18 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
19 |
def correct_urban(dim: Int)(p: Path): Boolean = p match {
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
20 |
case Nil => true |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
21 |
case x::Nil => true |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
22 |
case x::y::p => |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
23 |
if (legal_moves_urban(dim, p, y).contains(x)) correct_urban(dim)(y::p) else false |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
24 |
} |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
25 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
26 |
def correct_closed_urban(dim: Int)(p: Path) = |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
27 |
correct_urban(6)(p) && moves_urban(p.head).contains(p.last) |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
28 |
|
| 460 | 29 |
import scala.concurrent._ |
30 |
import scala.concurrent.duration._ |
|
31 |
import ExecutionContext.Implicits.global |
|
32 |
import scala.language.postfixOps |
|
33 |
||
34 |
lazy val f = Future {
|
|
|
391
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
35 |
|
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
36 |
val tsc_urban = first_closed_tour_heuristics(6, List((3, 3))).get |
|
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
37 |
assert(correct_closed_urban(6)(tsc_urban) == true) |
| 460 | 38 |
} |
|
391
048fc6b70776
added main4 marking
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
39 |
|
| 460 | 40 |
Await.result(f, 32 second) |
41 |
||
42 |
||
43 |
||
44 |
// try out tour_on_mega_board(66, List((0, 0))) |