let tail s = seq {
    let mutable first = true
    for elem in s do
        if (first) then first <- false
        else yield elem
}