Sorting 检查数字是否按顺序排列

我试图检查，给定任何数字，其数字是否有序。例如：

1479->正确

1293->FALSE

在Haskell有没有合适的方法？我对这门语言还不熟悉，现在真的很迷茫。谢谢。

我的想法是：

ordenado n
   | mod n 10 > mod (div n 10) 10 = ordenado (div n 10)
   | n == 0 = True
   | otherwise = False

---

我认为@vps方法足够合适，但就某些种类而言，您也可以做以下工作：

Prelude> and $ zipWith (<) <*> tail $ show 1479
True
Prelude> and $ zipWith (<) <*> tail $ show 1293
False

---

您可以将其转换为字符串，并使用简单的递归和模式匹配

   checkInOrder :: Int -> Bool
   checkInOrder x = isInOrder $ show x

   isInOrder :: (Ord a) => [a] -> Bool    
   isInOrder [] = True
   isInOrder [x] = True
   isInOrder (x:y:xs) = (x < y) && (isInOrder (y:xs))

   main = print (checkInOrder 1234) 

---

看起来你可以分两步来完成这项工作a获取各个数字，b检查它们是否有序。我已经找到了第一步的方法：数字：：整数x=>x->[x]数字0=[]数字x=listaDigitos x div 10++[x mod 10]。第二个有什么线索吗？谢谢。使用zip获取每两个连续数字，然后检查是否所有项目都包含该数字