How to write `where`'s indent

gistfile1.hs

bmiTell :: Double -> Double -> String
bmiTell weight height
	| bmi <= skinny	= "You're underweight, you emo, you!"
	| bmi <= normal = "You're supporsedly normal.\
		\ Pfft, I bet you're ugly!"
	| bmi <= fat = "You're fat! Lose some weight, fatty!"
	| otherwise 	= "You're a whale, congratulations!"
	where -- To new line
		bmi = weight / height ^ 2
		skinny = 18.5
		normal = 25.0
		fat = 30.0