function [deg,min,sec] = deg2dms(DecDeg)
% [DEG,MIN,SEC] = DEG2DMS(DECDEG)  This function takes an angle in decimal degrees and returns
%   Degrees, Minutes and Seconds

val = abs(DecDeg);
deg = fix(val);
min = fix((val-deg)*60);
sec = (val-deg-min/60)*3600;
if(DecDeg<0)
  deg = -deg;
end
return