File mttroot/ntt/bin/trans/mttIdentifySource.m artifact 333fd4e482 part of check-in c822924a83

function [directory,file] = mttIdentifySource(local_filename)
local_filename
    filename = which(local_filename) 
    backslash = findstr(filename,'\') ;
    filename(backslash) = '/' ;
    
    [file,directory] = mttDetachText(filename,'/') ;