unit t1; {$L wat1.obj} interface procedure wat1;far; implementation procedure wat1;external; end.