function nma_PDE_parabolic_explicit_rod_with_rate_BC_TEST() %driver for nma_PDE_parabolic_explicit_rod_with_rate_BC() % %test function % %Nasser Abbasi length=10;leftTRate=1;rightTRate=0;rodT=50;deltaT=0.1;nSteps=100;deltaX=2;k=0.835; [T,timeV,spaceV]=nma_PDE_parabolic_explicit_rod_with_rate_BC(length,leftTRate,rightTRate,rodT,deltaT,nSteps,deltaX,k); figure; mesh(spaceV,timeV,T); title(sprintf('parabolic PDE explicit, rate BC, delta x=%3.3f, delta t=%0.3f sec',deltaX,deltaT)); xlabel('X'); ylabel('time'); zlabel('T(x,t)'); end