ssumroot.m

来自「非常好的数字处理教程」· M 代码 · 共 15 行

function ssumlocation = ssumroot
    % Find path to SSUM
    switch computer
	    case {'GLNX86','MAC'}
			% What if multiple locations???
			% Maybe assume it is the present dir?
			ssumlocation = [pwd '/'];
			%[val,SSUMlocations] = unix('locate SSUM.m');
			%[t,SSUMlocations] = strtok(SSUMlocations,'/');
			%endloc = findstr(SSUMlocations,'SSUM.m');
			%SSUMlocation = SSUMlocations(1:endloc(1)-1);
        case {'PCWIN'}
            ssumlocation = [pwd '/'];
    end