String
bmiTell3 weight height
    | bmi <= 18.5 = "You're underweight."
    | bmi <= 25.0 = "You're normal weighted."
    | bmi <= 30.0 = "You're overweight."
    | otherwise = "You're obese."
    where bmi = weight / height ^ 2

bmiTell4 :: (RealFloat a) => a -> a -
bmiTell3 :: (RealFloat a) => a -> a -> String
bmiTell3 weight height
    | bmi <= 18.5 = "You're underweight."
    | bmi <= 25.0 = "You're normal weighted."
    | bmi <= 30.0 = "You're overweight."
    | otherwise = "You're obese."
    where bmi = weight / height ^ 2
bmiTell3 weight height
    | bmi <= 18.5 = "You're underweight."
    | bmi <= 25.0 = "You're normal weighted."
    | bmi <= 30.0 = "You're overweight."
    | otherwise = "You're obese."
    where bmi = weight / height ^ 2