diff --git a/src/Game/Library.fs b/src/Game/Library.fs index 0923ea6..4cee224 100644 --- a/src/Game/Library.fs +++ b/src/Game/Library.fs @@ -1,6 +1,7 @@ module Game.Game -type direction = + +type wallType = | NS | EW | NE @@ -9,8 +10,14 @@ type direction = | SW | Corner +type direction = +| North +| South +| East +| West + type env = - | Wall of direction + | Wall of wallType | Floor | Trap | Player