"if a then b else not b" truth table

Run Settings
LanguageHaskell
Language Version
Run Command
module Main (main) where import Data.Foldable (traverse_) main :: IO () main = traverse_ print $ [ (a, b, if a then b else not b) | a <- [False, True] , b <- [False, True] ]
Editor Settings
Theme
Key bindings
Full width
Lines