graphing stream flows in mathematica