package dispatch1_p is type I1 is interface; type DT_I1 is new I1 with null record; end;