autoIncrement :: SequelField -> SequelField
  autoIncrement field = field { _autoIncrement = True , _type = SequelSerial }
autoIncrement :: SequelField -> SequelField
autoIncrement field = field { _autoIncrement = True , _type = SequelSerial }
autoIncrement field = field { _autoIncrement = True , _type = SequelSerial }