getMoveString :: Tree -> [Move]
getMoveString t = reverse $ getMoveStringRaw t
getMoveString :: Tree -> [Move]
getMoveString t = reverse $ getMoveStringRaw t
getMoveString t = reverse $ getMoveStringRaw t