function rad = fok2rad(f,p,m) % Fokban lévõ szoget radianba alakit. % Ha egy bemenet van, akkor megvizsgalja, hogy 1 vagy 3 oszlopa van-e a bemenetnek. % Egy oszlop eseten tizedfokban adott szoget alakit at, % ha 3 oszlopa van, akkor fok-perc-masodperc ertekeket alakit at radianna. % Ha 3 bemenete van, akkor azt fok-perc-másodpercnek tekinti. switch nargin case 3 % 3 bemenet esetén -> fok,perc,mp rad = (f + p/60 + m/3600) * pi / 180; case 1 % 1 bemenet esetén if size(f,2)==1 % Az 1 bementnek 1 oszlopa van -> tizedfok rad = f * pi / 180; end if size(f,2)==3 % Az 1 bementnek 3 oszlopa van -> [fok perc mp] rad = (f(:,1) + f(:,2)/60 + f(:,3)/3600) * pi / 180; end end end