function AGL = ptt2AGL(filename);
lines = readfile(filename);
lines = {lines{(4:length(lines))}};

for i=1:length(lines)
    AGL{i,1} = i;  % AGL = Actual Gene Locations
    string = '';
    for j = 1:length(lines{i})
        if ~isspace(lines{i}(j)),
            string = strcat(string,lines{i}(j));
        else
            break;
        end
    end
    dp = find(string == '.');  % dot positions
    sp = find(isspace(lines{i}));  % space positions
    AGL{i,2} = str2double(string(1:dp(1)-1));
    AGL{i,3} = str2double(string(dp(2)+1:sp(1)-1));
    AGL{i,4} = lines{i}(sp(1)+1);
    AGL{i,5} = AGL{i,3}-AGL{i,2}+1;
    AGL{i,6} = floor((AGL{i,3}-AGL{i,2})/3);
end