1 2 3 4 5 6 7 8 9 10 11 12 13 14
unit uunit2a; interface uses uunit2b; type tr = uunit2b.tr; tpl = uunit2b.tpl; implementation end.