program T4;
var
   Lat,Lon: real;
begin
   lat:= '49 20.500';
   lon:= '8 8.756';
   OziMove(Lat,Lon);
end.