function [time, data] = abrir(Name)
    infoName = strcat(Name, '.info');
    matName = strcat(Name, '.mat');
    data = load(matName);
    data = data.val;
    
    fid = fopen(infoName, 'rt');
    fgetl(fid);
    fgetl(fid);
    fgetl(fid);
    [freqint] = sscanf(fgetl(fid), 'Sampling frequency: %f Hz  Sampling interval: %f sec');
    dt = freqint(2);
    time = 0:dt:(length(data)-1)*dt;
end