全部10以上かしらべるのに
all ((<=)10) [10,20,30] よりは
all (flip (>=) 10) [10,20,30] が直感的だけど
all (`>=` 10) [10,20,30] こうできれば良いのに