prome = \x -> sum x `div` length x