function?d（filename）
I=imread（‘dehaze1.jpg‘）;
I=double（I）/255;
[hwc]=size（I）;?
win_size?=?7;?
img_size=w*h;?%圖像大小
dehaze=zeros（img_size*c1）;?%得到一個零矩陣，大小是h*w*c行，一列
dehaze=reshape（dehazehwc）;?%dehaze是一個h*w*c的零矩陣，即與I大小相同的rgb均為零的黑色圖片
figuresubplot（221）;?imshow（I）;?
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%獲得暗原色圖像
win_dark=zeros（img_size?1）;?
for?cc=1:img_size?
win_dark（cc）=1;?
end?
win_dark=reshape（win_darkhw）;?%win-dark是h*w的1矩陣
for?j=1+win_size:w-win_size?%獲得暗通道圖像
???for?i=win_size+1:h-win_size?
????????m_pos_min?=?min（I（ij:））;?
????????????for?n=j-win_size:j+win_size?
????????????????for?m=i-win_size:i+win_size?
????????????????????if（win_dark（mn）>m_pos_min）?%%%%%%%15*15的子塊
????????????????????????win_dark（mn）=m_pos_min;?
????????????????????

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????3035??2013-10-11?11:06??1.m

-----------?---------??----------?-----??----

?????????????????3035????????????????????1