package Private1 is type T is private; private type T is new Boolean; end Private1;