Is there interest in pattern synonyms for vector component swizzling?

Thinking of things such as

``` haskell
pattern X x <- (preview _x -> Just x)
pattern Y y <- (preview _y -> Just y)
```

probably with the corresponding `review` in as well. I say swizzling, as you could also have

``` haskell
pattern XY x y <- (preview _xy -> Just (x,y))
pattern YX y x <- (preview _yx -> Just (y,x))
```

If people think this is a useful addition, I will put together a pull request.