matchExec :: Env -> [AtomoVal] -> AtomoVal -> IOThrowsError AtomoVal
matchExec e [] _ = error "Non-exhaustive pattern match."
matchExec :: Env -> [AtomoVal] -> AtomoVal -> IOThrowsError AtomoVal
matchExec e [] _ = error "Non-exhaustive pattern match."
matchExec e [] _ = error "Non-exhaustive pattern match."