<span class="searchmatch">encircled</span><span class="searchmatch">Power</span>[x_] := 1 - BesselJ[0, x]^2 - BesselJ[1, x]^2; <span class="searchmatch">airy</span><span class="searchmatch">Pattern</span>[x_] := (2 BesselJ[1, x]/x)^2; Plot[ {<span class="searchmatch">airy</span><span class="searchmatch">Pattern</span>[x], <span class="searchmatch">encircled</span><span class="searchmatch">Power</span>[x]}, {x, 0...