main_marking4/knight4_test10.scala
changeset 463 0315d9983cd0
equal deleted inserted replaced
462:34feeb53c0ba 463:0315d9983cd0
       
     1 import M4d._
       
     2 
       
     3 //type Pos = (Int, Int)
       
     4 //type Path = List[Pos]
       
     5 
       
     6 def add_pair_urban(x: Pos)(y: Pos): Pos = 
       
     7   (x._1 + y._1, x._2 + y._2)
       
     8 
       
     9 def is_legal_urban(dim: Int, path: Path)(x: Pos): Boolean = 
       
    10   0 <= x._1 && 0 <= x._2 && x._1 < dim && x._2 < dim && !path.contains(x)
       
    11 
       
    12 def moves_urban(x: Pos): List[Pos] = 
       
    13   List(( 1,  2),( 2,  1),( 2, -1),( 1, -2),
       
    14        (-1, -2),(-2, -1),(-2,  1),(-1,  2)).map(add_pair_urban(x))
       
    15 
       
    16 def legal_moves_urban(dim: Int, path: Path, x: Pos): List[Pos] = 
       
    17   moves_urban(x).filter(is_legal_urban(dim, path))
       
    18 
       
    19 def correct_urban(dim: Int)(p: Path): Boolean = p match {
       
    20   case Nil => true
       
    21   case x::Nil => true
       
    22   case x::y::p => 
       
    23     if (legal_moves_urban(dim, p, y).contains(x)) correct_urban(dim)(y::p) else false
       
    24 }
       
    25 
       
    26 import scala.concurrent._
       
    27 import scala.concurrent.duration._
       
    28 import ExecutionContext.Implicits.global
       
    29 import scala.language.postfixOps 
       
    30 
       
    31 lazy val f = Future {
       
    32 
       
    33 val ts70 = one_tour_pred(8, List((0, 0)), 40, x => x._1 < 5).get
       
    34 assert(correct_urban(8)(ts70) == true)
       
    35 }
       
    36 
       
    37 Await.result(f, 32 second)
       
    38