[Question] Many repetitive Focus

[lsunsi]

I'm using this library for a few days and it works great. The thing is I'm creating many repetitive focuses of the form

propFocus : Focus { r | prop : a } a
propFocus =
    Focus.create .prop (\update big -> { big | prop = update big.prop })

I'm thinking I might be doing something wrong, so I came here to ask for a little help. Is there a canonical way of creating this types of focus?