A concrete universe with doubles and tuple types

Example. Let be inductively defined by (double) and (tuple). Then we can define recursively by