Done: test1.pas typedefinition