mesh_warp.m

function mesh_warp(imgw, imgh, Ht, Hr)

% mesh by meshgrid
x_list = linspace(1, imgw, 100);
y_list = linspace(1, imgh, 100);
[X, Y] = meshgrid(x_list, y_list);

[out_x, out_y] = apply_mdlt_transform(X, Y, Hr);

z = zeros(size(out_x))+0.2;
figure(10),mesh(out_y, out_x, z);view(2);axis equal;
pause(0.3);

% mesh by meshgrid
x_list = linspace(1, imgw, 100);
y_list = linspace(1, imgh, 100);
[X, Y] = meshgrid(x_list, y_list);

[out_x, out_y] = apply_mdlt_transform(X, Y, Ht);
    
z = zeros(size(out_x))+0.2;
figure(11),mesh(out_x, -out_y, z);view(2);axis equal;
pause(0.3);

end