constrFieldGetter :: Int -> Text
constrFieldGetter = append "get" . pack . show
constrFieldGetter :: Int -> Text
constrFieldGetter = append "get" . pack . show
constrFieldGetter = append "get" . pack . show