No BSD License
function s = lire(nom) f = fopen(nom,'r'); s=fread(f); fclose(f); s =char(s');
Contact us at files@mathworks.com