Module Sdlhat

module Sdlhat: sig .. end

type positions = {

val string_of_pos : positions -> string

type direction = 

val string_of_dir : direction -> string

val dir_of_string : string -> direction