ex3.4.hs 174 B

123456789101112
  1. -- Exercise 3.4
  2. -- George C. Privon
  3. -- 2023-09-05
  4. bagFee :: Bool -> Int
  5. bagFee x = if x
  6. then 100
  7. else 0
  8. bagFee2 :: Bool -> Int
  9. bagFee2 False = 0
  10. bagFee2 True = 100