test :: Bool -> () test = _