% fill warped images wf 7/2020
0001 function im=fill_left_right_images(im,fg,fh,weite,iter) 0002 %% fill warped images 0003 % 0004 % wf 7/2020 0005 0006 %size of image 0007 [Mf,~]=size(fg); 0008 % half size 0009 Mhf=(Mf-1)/2; 0010 % boundary 0011 b=5; 0012 wh = (weite+1)/2; 0013 0014 % undistorted image windows 0015 im(b+ wh-Mhf: b+ wh+Mhf,... 0016 b+(iter*weite+wh)-Mhf:b+(iter*weite+wh)+Mhf) = fg; 0017 im(2*b+(weite+wh)-Mhf:2*b+(weite+wh)+Mhf... 0018 ,b+(iter*weite+wh)-Mhf:b+(iter*weite+wh)+Mhf) = fh; 0019 0020 end 0021