Update 4-syntax-in-functions.hs

add shorter solution for englishDigit