3 import org
.scalacheck
._
7 object NormalesSpielProperties
extends Properties("Karten und Regeln normales Spiel") {
9 val kartenGen
: Gen
[Karte
] = for {
10 f
<- oneOf(Farbe
.values
.toSeq
)
11 w
<- oneOf(Wert
.values
.toSeq
)
12 r
<- oneOf(Rueckseite
.values
.toSeq
)
13 } yield Karte(f
, w
, r
)
15 property("Regeln vollständig") = forAll(kartenGen
, kartenGen
) { (erste
: Karte
, zweite
: Karte
) =>
17 NormalesSpiel
.regeln(erste
, zweite
)