1 2 3 4 5 6 7 8 9 10 11
==================== Parser ==================== module Read003 where ~(a, b, c) | nullity b = a | nullity c = a | otherwise = a where nullity = null