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