matlab弧度转角度函数

%弧度转化为度分秒
function angle=ArcToAngle(arc)
arc0=arc*180/pi;
deg1=fix(arc0);     %取整
min=fix((arc0-deg1)*60);
sec=((arc0-deg1)*60-min)*60;
angle=deg1+min/100+sec/10000;