fast funktionierende Version A2b4
This commit is contained in:
parent
831e723d92
commit
3d33cd4f63
Binary file not shown.
Binary file not shown.
|
@ -49,8 +49,8 @@ proc
|
|||
TL(direction : CardinalDirection, colour : Colour) =
|
||||
show(direction, colour).
|
||||
(colour == red)
|
||||
-> ChangeLight(direction, colour)
|
||||
<> changeDirection(nextDirection(direction)) . ChangeLight(direction, colour)
|
||||
-> (changeDirection(nextDirection(direction)) . changeDirection(direction) . ChangeLight(direction, colour))
|
||||
<> ChangeLight(direction, colour)
|
||||
;
|
||||
|
||||
ChangeLight(direction : CardinalDirection, colour : Colour) =
|
||||
|
|
Loading…
Reference in New Issue