bowen prob1 plot code update