create type MyString char varyingcreate type MyDate
( day integer,
month char(10),
year char(10))
create type Document
(name MyString,
author-list setof(MyString),
date MyDate,
keyword-list setof(MyString))
create table doc of type Document
author-array MyString[10] // presents an ordered list of authors.print-runs multiset(integer) // presents the number of copies in each printing run.