In[]:=
​​funx=-1/10
2
a1x
+5Log[a1x+a1y-14]-2
1/2
ix
+95/100(-110
2
a2x
(1-ix/40)+5Log[a2x+a2y-14])​​funy=-1/10
2
a1y
+5Log[a1x+a1y-14]-2
1/2
iy
+95/100(-110
2
a2y
(1-ix/40)+100Log[a2x+a2y-14])​​​​dWx/da1x=-2/10a1x+5/(a1x+a1y-14)0​​dWy/da1y=-2/10a1y+5/(a1x+a1y-14)0​​dWx/da2x=95/100(-2/10a2x(1-ix/40)+5/(a2x+a2y-14))0​​dWy/da2y=95/100(-2/10a2y(1-ix/40)+5/(a2x+a2y-14))0​​dWx/dix=-
-1/2
ix
+(95/100)(1/400)
2
a2x
0​​dW/diy=-
-1/2
iy
0​​​​Reduce95100(-2/10a2x(1-ix/40)+5/(a2x+a2y-14))0,​​95100(-2/10a2y(1-ix/40)+5/(a2x+a2y-14))0,​​
-1/2
ix
+(95/100)(1/400)
2
a2x
0,​​a2x≥0,a2y≥0,0<=ix≤24,0<=iy≤24,{a2x,a2y,ix,iy}​​​​
Out[]=
-
2
a1x
10
-2
ix
+5Log[-14+a1x+a1y]+
19
20
-
1
10
2
a2x
1-
ix
40
+5Log[-14+a2x+a2y]
Out[]=
-
2
a1y
10
-2
iy
+5Log[-14+a1x+a1y]+
19
20
-
1
10
2
a2y
1-
ix
40
+100Log[-14+a2x+a2y]
Set
:Tag Times in
dWx
da1x
is Protected.
Out[]=
-
a1x
5
+
5
-14+a1x+a1y
0
Set
:Tag Times in
dWy
da1y
is Protected.
Out[]=
-
a1y
5
+
5
-14+a1x+a1y
0
Set
:Tag Times in
dWx
da2x
is Protected.
Out[]=
19
20
5
-14+a2x+a2y
-
1
5
a2x1-
ix
40
0
Set
:Tag Times in
dWy
da2y
is Protected.
Out[]=
19
20
5
-14+a2x+a2y
-
1
5
a2y1-
ix
40
0
Set
:Tag Times in
dWx
dix
is Protected.
Out[]=
19
2
a2x
8000
-
1
ix
0
Set
:Tag Times in
dW
diy
is Protected.
Out[]=
-
1
iy
0
Out[]=
False