StreamPlot[{Cos[x^2+y],1+x-y^2}, {x, -2, 2}, {y, -2, 2},StreamColorFunction->"Rainbow"]