create type tp_cliente01 as object(
nome varchar2(20),
cod number,
fones tp_fone1
)not final not instanciable;

create type tp_p_fisica as object under tp_cliente01(
sexo char
);

create type tp_p_juridica as object under tp_cliente01(
nome_resp varchar2(20)
);

create type tp_emprestimo as object(
num number,
valor number(10,2),
cliente ref tp_cliente
);

create table
tb_p_fisica
of tp_p_fisica(
primary key(cod)
);