www.pudn.com > calibr8.zip > hext.m

function homcoords = hext(coords)
% DEVELOPMENT PHASE
%
% homogen extension: (x, y) -> (x, y, 1) or (x, y, z) -> (x, y, z, 1)
% coords ... n x 2 (coplanar) or n x 3 (3D)

homcoords = [coords, ones(size(coords, 1), 1)];