let getFileName =
    printfn "File name goes here: "
    Console.ReadLine()


let rec openFile filePath =
    try
        File.ReadLines(filePath)
    with
        | _ ->
          let f = Console.ReadLine()
          let v = getFileName
          openFile f

openFile getFileName