function nma_PDE_parabolic_explicit_rod_TEST() %driver for nma_PDE_parabolic_explicit_rod() % %function to test function nma_PDE_parabolic_explicit_rod() % %Nasser Abbasi length=10;leftT=100;rightT=50;rodT=0;deltaT=0.1;nSteps=30;deltaX=2;k=0.835; [T,timeV,spaceV]=nma_PDE_parabolic_explicit_rod(length,leftT,rightT,rodT,deltaT,nSteps,deltaX,k); figure; mesh(spaceV,timeV,T); title(sprintf('parabolic PDE explicit method, delta x=%3.3f, delta t=%0.3f sec',deltaX,deltaT)); xlabel('X'); ylabel('time'); zlabel('T(x,t)'); end