Feature: Guards and where

[sumanthyedoti]

Guards

bmiTell bmi
  | bmi <= 18.5 = 'Underweight'
  | bmi <= 25.0 = 'Normal'
  | bmi <= 30.0 = 'Fatty'
  | otherwise   = 'Index overflow'

where

bmiTell weight height
  | bmi <= skinny = 'Underweight'
  | bmi <= normal = 'Normal'
  | bmi <= fat = 'Fatty'
  | otherwise   = 'Index overflow'
  where bmi = weight / height ^ 2
        skinny = 18.5
        normal = 25.0
        fat = 30.0


incAndSq x = sq (x + 1)
  where sq x = x * x