qualified無しのimportする奴が悪いということで短い名前での衝突は気にしない
import qualified Bar.Foo as Foo

Foo.name
Foo.length

のようなqualified importを使う