why this simple programm with doesn't work

Question

open System.IO

let readLines (filePath:string) = seq {
     use sr = new StreamReader (filePath)
     while not sr.EndOfStream do
          yield sr.ReadLine ()
}