From a32f220f06cc463e5b56e7fa0b1b1334d94d08f3 Mon Sep 17 00:00:00 2001 From: leochanj105 Date: Tue, 20 Oct 2020 03:47:33 -0400 Subject: matlab removed --- .../texture_synthesis/src/matlab/expand.m | 34 ---------------------- 1 file changed, 34 deletions(-) delete mode 100755 SD-VBS/benchmarks/texture_synthesis/src/matlab/expand.m (limited to 'SD-VBS/benchmarks/texture_synthesis/src/matlab/expand.m') diff --git a/SD-VBS/benchmarks/texture_synthesis/src/matlab/expand.m b/SD-VBS/benchmarks/texture_synthesis/src/matlab/expand.m deleted file mode 100755 index 5f6e4d9..0000000 --- a/SD-VBS/benchmarks/texture_synthesis/src/matlab/expand.m +++ /dev/null @@ -1,34 +0,0 @@ -function te = expand(t,f) - -% Expand spatially an image t in a factor f -% in X and in Y. -% t may be complex. -% It fills in with zeros in the Fourier domain. -% te = expand(t, f) -% See also: shrink.m -% JPM, May 95, Instituto de Optica, CSIC, Madrid. - -[my mx]=size(t); -my=f*my; -mx=f*mx; -Te=zeros(my,mx); -T=f^2*fftshift(fft2(t)); -y1=my/2+2-my/(2*f); -y2=my/2+my/(2*f); -x1=mx/2+2-mx/(2*f); -x2=mx/2+mx/(2*f); -Te(y1:y2,x1:x2)=T(2:my/f,2:mx/f); -Te(y1-1,x1:x2)=T(1,2:mx/f)/2; -Te(y2+1,x1:x2)=((T(1,mx/f:-1:2)/2)').'; -Te(y1:y2,x1-1)=T(2:my/f,1)/2; -Te(y1:y2,x2+1)=((T(my/f:-1:2,1)/2)').'; -esq=T(1,1)/4; -Te(y1-1,x1-1)=esq; -Te(y1-1,x2+1)=esq; -Te(y2+1,x1-1)=esq; -Te(y2+1,x2+1)=esq; -Te=fftshift(Te); -te=ifft2(Te); -if all(imag(t)==0), - te = real(te); -end -- cgit v1.2.2