module Direction where data Direction = N | S | W | E | NW | NE | SW | SE