samer@0: function p=dbpath(loc)
samer@0: % dbpath - Return full path of matfile given locator.
samer@0: %
samer@0: % dbpath :: locator(A) -> path.
samer@0: 
samer@0: 	n=strfind(loc,'|');
samer@0: 	p=[fullfile(dbroot,loc(1:n-1)) '.mat']; 
samer@0: