Haskell: нестрогие логические операции

Можно ли как-то определить в Haskell функцию, подобную следующей?

or True      True      = True
or True      undefined = True
or True      False     = True
or undefined True      = True
or undefined False     = undefined
or undefined undefined = undefined
or False     True      = True
or False     undefined = undefined
or False     False     = False

В настоящее время у меня нет варианта его использования (хотя он был бы мне интересен), мне просто интересно, возможно ли это.