@@ -150,8 +150,7 @@ createTable
150 , SOP.SListI columns
150 , SOP.SListI columns
151 , SOP.SListI constraints
151 , SOP.SListI constraints
152 , Has sch db0 schema0
152 , Has sch db0 schema0
153− , schema1 ~ Create table ('Table (constraints :=> columns)) schema0
153+ , db1 ~ Alter sch (Create tab ('Table (constraints :=> columns)) schema0) db0 )
154− , db1 ~ Alter sch schema1 db0 )
155 => QualifiedAlias sch tab -- ^ the name of the table to add
154 => QualifiedAlias sch tab -- ^ the name of the table to add
156 -> NP (Aliased (ColumnTypeExpression db0)) columns
155 -> NP (Aliased (ColumnTypeExpression db0)) columns
157 -- ^ the names and datatype of each column
156 -- ^ the names and datatype of each column