Code refactoring: single case union deconstruction

Refactor this code:
```fsharp
type CustomerId = CustomerId of id: int

let ProcessCustomerId (cid: CustomerId) =
match cid with
| CustomerId id -> printfn $"{id}"
```

into the following code:
```fsharp
type CustomerId = CustomerId of id: int

let ProcessCustomerId (CustomerId id) =
printfn $"{id}"
```

Thanks @vzarytovskii for the idea.