pro UseDigitalFilter

file1=filepath('t_dilate_convertbse1(r=3).tif')
imagesize=[1024,768]
image1=read_image(file1)

coeff=digital_filter(0,0.5,50,3)
image2=convol(image1,coeff)


write_tiff,'digital_filter_result1.tif',image2



END