small change

This commit is contained in:
Johannes Theiner 2020-05-10 14:03:13 +02:00
parent e16a069d09
commit c2493dcc4d

View File

@ -4,14 +4,9 @@ sort
CardinalDirection = struct north | east | south | west;
map
oppositeDirection: CardinalDirection -> CardinalDirection;
nextDirection: CardinalDirection -> CardinalDirection;
eqn
oppositeDirection(north) = south;
oppositeDirection(south) = north;
oppositeDirection(east) = west;
oppositeDirection(west) = east;
nextDirection(north) = east;
nextDirection(east) = south;