{-# LANGUAGE RecordWildCards #-} v = A { a = 1, .. } where b = 2