function [im] = readrgbtif(filepath)

info = imfinfo(filepath);
n = numel(info);
for i = 1 : n
    imhere = imread(filepath,i);
    for j = 1 : 3
        im(:,:,i,j) = imhere(:,:,j);
    end;
end;
