Wolfram Cloud Document

d=1;c=

1

4

;α=

3

5

;λ=

1

2

;z$lower=.2;z$upper=.5;y$upper=1;F$G8=Plot3D-

2

(c-d)

2(-2+δ+2λ)

UnitStep

c

δ

-

c-d

2(-2+δ+2λ)

UnitStep6-UnitStep

2(c-d)β

(-2+δ+2λ)(-2+8β+δ+2λ)

+

2(c-d)β

(-2+δ+2λ)(-2+8β+δ+2λ)

-(0)+

-c+d

-2+8β+δ+2λ

+UnitStep

2(c-d)β

(-2+δ+2λ)(-2+8β+δ+2λ)

+UnitStep

c

δ

-

2(c-d)β

(-2+δ+2λ)(-2+8β+δ+2λ)

+UnitStep--2+

2

δ

2-2λ

+2λ+UnitStep-

1

8

(-2-8β+δ+2λ)+UnitStep-

2

(c-d)

β

2(-2+δ+2λ)(-2+8β+δ+2λ)

--

2

(c-d)

(-2+2β+δ+2λ)

4

2

(-2+δ+2λ)

-

1

10000

,{δ,0,.5},{β,0,.5},AxesLabel->{"δ","β"},PlotPoints->300,(*MaxRecursion->5,*)PlotRange->{{0,.5},{0,.5},{z$lower,z$upper}},PlotStyle->Cyan

Out[]=