@@ -129,6 +129,9 @@ data NullityType
129129 = Null PGType -- ^ @NULL@ may be present
130130 | NotNull PGType -- ^ @NULL@ is absent
131131
132+type RelationType = [(Symbol,NullityType)]
133+type RelationProduct = [(Symbol,RelationType)]
134+
132135-- | `ColumnType` encodes the allowance of @DEFAULT@ and the only way
133136-- to generate an `Optional` `Squeal.PostgreSQL.Expression.Expression`
134137-- is to use `Squeal.PostgreSQL.Expression.def`,
@@ -139,9 +142,6 @@ type ColumnType = (ColumnConstraint,NullityType)
139142-- | `ColumnsType` is a kind synonym for a row of `ColumnType`s.
140143type ColumnsType = [(Symbol,ColumnType)]
141144
142−type RelationType = [(Symbol,NullityType)]
143−type RelationProduct = [(Symbol,RelationType)]
144−
145145type TableType = (TableConstraints,ColumnsType)
146146type SchemaType = [(Symbol,TableType)]
147147