a =  1

    ContourPlot[
      Sin[x^2  +  y^2]  Exp[-x^2   -  y^2],  {x,  -a, 
        a},  {y,  -a, a}]