unit miek; {$L miekka.obj} interface procedure _miekka;far; implementation procedure _miekka;external; end.