#!/usr/bin/env runghc

notBool :: Bool -> Bool
notBool x = not x