Sha256: 10eb94cfcf18ea44a9e3204631a06a9a730564ed42f21e70c2dac879d982166f
Contents?: true
Size: 830 Bytes
Versions: 61
Compression:
Stored size: 830 Bytes
Contents
module Zipper
( BinTree(BT)
, fromTree
, left
, right
, setLeft
, setRight
, setValue
, toTree
, up
, value
) where
data BinTree a = BT { btValue :: a
, btLeft :: Maybe (BinTree a)
, btRight :: Maybe (BinTree a)
} deriving (Eq, Show)
fromTree :: BinTree a -> Zipper a
fromTree = undefined
toTree :: Zipper a -> BinTree a
toTree = undefined
value :: Zipper a -> a
value = undefined
left :: Zipper a -> Maybe (Zipper a)
left = undefined
right :: Zipper a -> Maybe (Zipper a)
right = undefined
up :: Zipper a -> Maybe (Zipper a)
up = undefined
setValue :: a -> Zipper a -> Zipper a
setValue = undefined
setLeft :: Maybe (BinTree a) -> Zipper a -> Zipper a
setLeft = undefined
setRight :: Maybe (BinTree a) -> Zipper a -> Zipper a
setRight = undefined
Version data entries
61 entries across 61 versions & 1 rubygems