Re[Cos[x+I*y]],{x,-2Pi,2Pi},{y,-2,2}