Program and plot 1