blackman_harris.m

It is a FDTD program which produce Black-Man-Harris Source in free space.

%%%%%%%%%%%%%%%%%%%%%%% In The Name of God %%%%%%%%%%%%%%%%%%%%%%
% 
% Numerical Method in Electromagnetic
% Dr. M.S Abrishamian
% 
% Mohsen Bahrami Panah        8600374                4/11/86
% 
% Problem 9 ---------- *** Blackman-Harris Source ***

    close all
    clear all
    clc
    clf
    set(gcf,'Color',[1,0.9,0.9])
    
	IMAX = 250;
	NMAX = 1000;
	PI = acos(1.0);     %