fixed *** Exception: Prelude.(!!): index too large