enrich
nat-basic2,
elem
with
constants aa : elem;
predicates ok : elem;
rel : elem × elem;
variables nf : nat → elem;
nfgen : nat → nat → elem;
elemf : elem → elem;
end enrich