module Miscellaneous(
    if'
    (?)
    ) where\




if' :: Bool -> t -> t -> t
if' a b c = if a then b else c




infixr 1 ?
(?) :: Bool -> t -> t -> t
(?) = if'