border3dF :: Bool -> Int -> F a b -> F (Bool ⊕ a) b
border3dF down border fudget
border3dFputs a border around a fudget to give it a 3d look.
Left Truemakes the fudget look lowered.
Left Falsemakes the fudget look raised.
xto the enclosed fudget.
down :: Bool
True, the fudget will appear to be lowered, otherwise the fudget will appear to be raised.
border :: Int
fudget :: F a b
border3dF False 1 (labelF "Hello, 3D border")