有没有办法用f#创建一个有多个选项的菜单？通过传递命令

open System

let rec showMenu() =
    printfn "请选择一个选项："
    printfn "1. 选项1"
    printfn "2. 选项2"
    printfn "3. 选项3"
    printfn "4. 退出"

    let input = Console.ReadLine()

    match input with
    | "1" -> printfn "执行选项1的操作"
             showMenu()
    | "2" -> printfn "执行选项2的操作"
             showMenu()
    | "3" -> printfn "执行选项3的操作"
             showMenu()
    | "4" -> printfn "退出程序"
    | _ -> printfn "无效的选项，请重新选择"
           showMenu()

[<EntryPoint>]
let main argv =
    showMenu()
    0