Удалить последнюю цифру из числа

Question

Я пытаюсь написать dropLastDigit :: Integer -> Integer

Eg dropLastDigit 123 == 12 и dropLastDigit с какой-либо одной цифрой возвращает 0

Answer 1

Просто разделить число на десять.

dropLastDigit :: Integer -> Integer 
dropLastDigit n = div n 10 

Answer 2

dropLastDigit :: Integer -> Integer 
dropLastDigit n 
     | (abs n) < 10 = 0 
     | otherwise = read $ init $ show n