can u plz help me to clear the error which is in (line 32) "Array dimensions must match for binary array op"

clc; close all; %Initialize

a=imread('Y:/haze.jpg'); Red=a; Green=a; Blue=a; Red(:,:,2:3)=0; subplot(2,2,1); imshow(a);title('Haze Input Image'); imtool(a); Green(:,:,1)=0; Green(:,:,3)=0; subplot(2,2,1); imshow(Red);title('Red Componet'); subplot(2,2,3); imshow(Green);title('Green Component'); Blue(:,:,1)=0; Blue(:,:,2)=0; subplot(2,2,4); imshow(Blue);title('Blue Component'); % Dark channel J=get_dark_channel(I,patch); figure,imshow(J); %brightest pixels dim_J=size(J); num_pixels=cell(0.00*dim_J(1)*dim_J(2)); A=occur_A(I,J,num_pixels); imtool(J); %Estimate the Transmission T_est=1-aerial*Dark_Channel(I./A,patch); figure,imshow(T_est); title('Dark Channel Prior Estimation Transmission') [T]=gen_Lap(I,3,T_est); %[LT]=generateLaplacian(I,3,T_est); figure,imshow(T); title('Laplance Transformation');