function dmsv=mat2dms(D)
[l,c]=size(D);
for i=1:l
    dmsv(i)=D(i,1)+D(1,2)/60+D(i,3)/3600;
end