Function fastaread added.