function m=madroot
%cd ::
m = pwd;
