XPathNodeIterator.AsEnumerable

namespace Foo

open System.Xml.XPath

[<AutoOpen>]
module FsExtensions =

    type XPathNodeIterator with
        /// Converts an XPathNodeIterator into a seq{XPathNavigator}.
        member this.AsEnumerable =
            this |> Seq.unfold (fun it -> match it.MoveNext() with
| false -> None 
| true -> Some(it.Current, it))

for x in iterator.AsEnumerable do
// something