Plot: RiemannLebesqueFig1.  A gaussian envelope high frequency oscillation.

<<peeters` ;
peeters`setGitDir[ "../project/figures/phy2403-quantum-field-theory" ]

p = Plot[ E^(-x^2) Sin[ 100 x], {x, -3,3}, PlotRange -> Full]

peeters`exportForLatex["RiemannLebesqueFig1", p]