function polar_s(lon,lat,stile)
%Вывод географических координат в пол?рной проекции (вид с S)
%
%Вызов:  polar_s(lon,lat,stile)
%
%  lon,lat - долгота (0...360E), широта (-90...+90) в градусах
%  stile   - тип линии и символа; по умолчанию - 'ro'
%

if nargin<3
   stile = 'ro';
end
polar (d2r(lon), 90+lat, stile)
