foo :: Bool -> Int
foo True = new_def [True]

foo False = 1