:: uniqueIP ( seq -- uniqueseq )
    V{ } :> collection!
    V{ } :> uniques!
    seq [ :> item
        item getIP :> ip
        ip uniques member?
          [ uniques ip suffix!  :> uniques
            collection item suffix!  :> collection
          ] unless
    ] each
    collection
    ;