restart;with(LinearAlgebra):Digits:=30:
<Text-field style="Heading 1" layout="Heading 1">Procedures</Text-field>
sy:=simplify:fc:=factor:ex:=expand:cl:=collect:cv:=convert:
sn:=(x,k)->JacobiSN(x,k):cn:=(x,k)->JacobiCN(x,k):dn:=(x,k)->JacobiDN(x,k):
ListR:={a1(0)=1,a2(0)=1,b1(0)=0,b2(0)=0,c1(0)=1,c2(0)=1,d1(0)=0,d2(0)=0}:
ListD:={eval(diff(a1(u),u),{u=0})=alpha1, eval(diff(a2(u),u),{u=0})=alpha2,eval(diff(b1(u),u),{u=0})=beta1, eval(diff(b2(u),u),{u=0})=beta2, eval(diff(c1(u),u),{u=0})=gamma1, eval(diff(c2(u),u),{u=0})=gamma2, eval(diff(d1(u),u),{u=0})=delta1, eval(diff(d2(u),u),{u=0})=delta2}:
n:=2:
Id:=IdentityMatrix(n):
pd:=KroneckerProduct:
R:=(u)->Matrix([[a1(u),0,0,d1(u)],[0,b1(u),c1(u),0],[0,c2(u),b2(u),0],[d2(u),0,0,a2(u)]]):R(u):
DR:=(u)->Matrix([[A1(u),0,0,D1(u)],[0,B1(u),C1(u),0],[0,C2(u),B2(u),0],[D2(u),0,0,A2(u)]]):DD(u):
H:=Matrix([[alpha1,0,0,delta1],[0,beta1,gamma1,0],[0,gamma2,beta2,0],[delta2,0,0,alpha2]]):H:
P:=Matrix([[1,0,0,0],[0,0,1,0],[0,1,0,0],[0,0,0,1]]):
P12:=pd(P,Id):
P23:=pd(Id,P):
P13:=P12.P23.P12:
R12:=u->pd(R(u),Id):R12(u):
R23:=u->pd(Id,R(u)):R23(u):
R13:=u->P12.R23(u).P12:R13(u):
D12:=u->pd(DR(u),Id):D12(u):
D23:=u->pd(Id,DR(u)):D23(u):
D13:=u->P12.D23(u).P12:D13(u):
H12:=pd(H,Id):
H23:=pd(Id,H):
H13:=P12.H23.P12:
YB:=R12(u).R13(u+v).R23(v)-R23(v).R13(u+v).R12(u):
DYB1:=R12(u).D13(u).P23 + R12(u).R13(u).H23 - H23.R13(u).R12(u) - P23.D13(u).R12(u):
DYB2:=H12.R13(u).R23(u) + P12.D13(u).R23(u) - R23(u).D13(u).P12 - R23(u).R13(u).H12:
ClearAll:=proc()
global a1,a2,b1,b2,c1,c2,d1,d2,A1,A2,B1,B2,C1,C2,D1,D2,alpha1,alpha2,beta1,beta2,gamma1,gamma2,delta1,delta2,omega,eta,k,xi1,xi2,epsilon;
a1:='a1':a2:='a2':b1:='b1':b2:='b2':c1:='c1':c2:='c2':d1:='d1':d2:='d2':A1:='A1':A2:='A2':B1:='B1':B2:='B2':C1:='C1':C2:='C2':D1:='D1':D2:='D2':alpha1:='alpha1':alpha2:='alpha2': beta1:='beta1': beta2:='beta2':gamma1:='gamma1':gamma2:='gamma2':delta1:='delta1':delta2:='delta2':omega:='omega':eta:='eta':k:='k':xi1:='xi1':xi2:='xi2':epsilon:='epsilon':end:
<Text-field style="Heading 1" layout="Heading 1">4V</Text-field>
a1:=u->exp(alpha1*u):
a2:=u->exp(alpha2*u):
b1:=u->0:
b2:=u->0:
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma2*u):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmZ2FtbWE7MkYoRj9GQkZFRkUtRi82JEY0LUY5NiUtRjw2I1EpJmdhbW1hOzFGKEY/RkJGRUZFRkVGRUZFLUYvNiRGNC1GOTYlLUY8NiNRKSZhbHBoYTsyRihGP0ZCNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1QV9FQUhIWW5XPQ==
Constraints:
beta1:=0:
beta2:=0:
delta1:=0:
delta2:=0:
Properties:
sy(R(0));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1YTdGQUhIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1NVhGQUhIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1XXhGQUhIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~([YB[i,j],DYB2[i,j],DYB1[i,j]]))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5V1</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha2):
b1:=u->0:
b2:=u->(exp(u*alpha1)-exp(u*(gamma1+gamma2-alpha1)))/(2*alpha1-gamma1-gamma2)*beta2:
c1:=u->exp(u*gamma1):
c2:=u->exp(u*gamma2):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmZ2FtbWE7MkYoRj9GQkZFRkUtRi82JEY0LUY5NiUtRjw2I1EpJmdhbW1hOzFGKEY/RkItSSZtZnJhY0dGMDYkLUY5NiUtSShtZmVuY2VkR0YwNiMtRjk2JUYuLUY1NiNRKCZtaW51cztGKC1GLzYkRjQtRjk2JUZCRj8tRmduNiMtRjk2J0ZULUY1NiNRJyZwbHVzO0YoRk1GW29GO0Y/LUY8NiNRKCZiZXRhOzJGKC1GOTYnLUY5NiUtRkY2I1EiMkYoRj9GO0Zbb0ZURltvRk1GRUZFRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmYWxwaGE7MkYoRj9GQjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNU1ObixJSFluVz0=
Constraints:
alpha2:=alpha1:
beta1:=0:
delta1:=0:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1I2VpOyskSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1QWVtLElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1JykzbSxJSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjVGNS1GLzYjUSkmZ2FtbWE7MkYoRjVGNS1GLzYjUSkmZ2FtbWE7MUYoLUYvNiNRKCZiZXRhOzJGKEY1RjVGNUY1Ri43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVxZ2wsSUhZblc9
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~([YB[i,j],DYB2[i,j],DYB1[i,j]]))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5V2</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha2):
b1:=u->(exp(u*alpha1)-exp(u*(gamma1+gamma2-alpha1)))/(2*alpha1-gamma1-gamma2)*beta1:
b2:=u->0:
c1:=u->exp(u*gamma1):
c2:=u->exp(u*gamma2):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkUtSSZtZnJhY0dGMDYkLUY5NiUtSShtZmVuY2VkR0YwNiMtRjk2JUYuLUY1NiNRKCZtaW51cztGKC1GLzYkRjQtRjk2JUZCRj8tRk82Iy1GOTYnLUY8NiNRKSZnYW1tYTsxRigtRjU2I1EnJnBsdXM7RigtRjw2I1EpJmdhbW1hOzJGKEZTRjtGPy1GPDYjUSgmYmV0YTsxRigtRjk2Jy1GOTYlLUZGNiNRIjJGKEY/RjtGU0ZobkZTRl5vLUYvNiRGNC1GOTYlRl5vRj9GQkZFRkUtRi82JEY0LUY5NiVGaG5GP0ZCRkVGRUZFRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmYWxwaGE7MkYoRj9GQjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNTV2WiIqSEhZblc9
Constraints:
alpha2:=alpha1:
beta2:=0:
delta1:=0:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1TVpaIipISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1KXpwOSpISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1aVtZIipISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtRi82I1EoJmJldGE7MUYoLUYvNiNRKSZnYW1tYTsyRihGNUY1LUYvNiNRKSZnYW1tYTsxRihGNUY1RjVGNUY1Ri43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVtJmY5KkhIWW5XPQ==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~([YB[i,j],DYB2[i,j],DYB1[i,j]]))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5V3</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha2):
b1:=u->0:
b2:=u->(exp(u*alpha1)-exp(u*alpha2))/(alpha1-alpha2)*beta2:
c1:=u->exp(u*gamma1):
c2:=u->exp(u*(alpha1+alpha2-gamma1)):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRS1GLzYkRjQtRjk2JUZCRj8tSShtZmVuY2VkR0YwNiMtRjk2J0Y7LUY1NiNRJyZwbHVzO0YoLUY8NiNRKSZhbHBoYTsyRigtRjU2I1EoJm1pbnVzO0YoLUY8NiNRKSZnYW1tYTsxRihGRUZFLUYvNiRGNC1GOTYlRmVuRj9GQi1JJm1mcmFjR0YwNiQtRjk2JS1GTjYjLUY5NiVGLkZYLUYvNiRGNC1GOTYlRlVGP0ZCRj8tRjw2I1EoJmJldGE7MkYoLUY5NiVGO0ZYRlVGRUZFRkVGRUZlbzcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSNlUV4pSEhZblc9
Constraints:
beta1:=0:
gamma2:=alpha1+alpha2-gamma1:
delta1:=0:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1SXc3JilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1cTM4JilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1TWY3JilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjVGNS1JJW1yb3dHRjA2J0YuLUkjbW9HRjA2I1EnJnBsdXM7RigtRi82I1EpJmFscGhhOzJGKC1GPTYjUSgmbWludXM7RigtRi82I1EpJmdhbW1hOzFGKEY1RjVGRi1GLzYjUSgmYmV0YTsyRihGNUY1RjVGNUZANyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1ZTI3JilISFluVz0=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~([YB[i,j],DYB2[i,j],DYB1[i,j]]))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5V4</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha2):
b1:=u->(exp(u*alpha1)-exp(u*alpha2))/(alpha1-alpha2)*beta1:
b2:=u->0:
c1:=u->exp(u*gamma1):
c2:=u->exp(u*(alpha1+alpha2-gamma1)):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkUtSSZtZnJhY0dGMDYkLUY5NiUtSShtZmVuY2VkR0YwNiMtRjk2JUYuLUY1NiNRKCZtaW51cztGKC1GLzYkRjQtRjk2JS1GPDYjUSkmYWxwaGE7MkYoRj9GQkY/LUY8NiNRKCZiZXRhOzFGKC1GOTYlRjtGU0ZaLUYvNiRGNC1GOTYlRkJGPy1GTzYjLUY5NidGOy1GNTYjUScmcGx1cztGKEZaRlMtRjw2I1EpJmdhbW1hOzFGKEZFRkUtRi82JEY0LUY5NiVGZ29GP0ZCRkVGRUZFRkVGRUZWNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1KSpcO0FISFluVz0=
Constraints:
beta2:=0:
gamma2:=alpha1+alpha2-gamma1:
delta1:=0:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1NVg8QUhIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1YWNkQEhIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1NVgnNCNISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtRi82I1EoJmJldGE7MUYoLUklbXJvd0dGMDYnRi4tSSNtb0dGMDYjUScmcGx1cztGKC1GLzYjUSkmYWxwaGE7MkYoLUZANiNRKCZtaW51cztGKC1GLzYjUSkmZ2FtbWE7MUYoRjVGNUZJRjVGNUY1RjVGNUZDNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1OTUvQEhIWW5XPQ==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~([YB[i,j],DYB2[i,j],DYB1[i,j]]))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5U1</Text-field>
a1:=u->exp((1/2*(gamma1+gamma2))*u):
a2:=u->exp((1/2*(gamma1+gamma2))*u):
b1:=u->0:
b2:=u->0:
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma2*u):
d1:=u->0:
d2:=u->delta2*(exp(gamma1*u)-exp(gamma2*u))/(gamma1-gamma2):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSZtZnJhY0dGMDYkLUklbXJvd0dGMDYlLUkobWZlbmNlZEdGMDYjLUY8NiUtSSNtaUdGMDYjUSkmZ2FtbWE7MUYoLUY1NiNRJyZwbHVzO0YoLUZENiNRKSZnYW1tYTsyRigtRjU2I1ExJkludmlzaWJsZVRpbWVzO0YoLUZENiNRInVGKC1JI21uR0YwNiNRIjJGKC1GVDYjUSIwRihGVy1GOTYkLUY8NiUtRkQ2I1EpJmRlbHRhOzJGKEZNLUY/NiMtRjw2JS1GLzYkRjQtRjw2JUZDRk1GUC1GNTYjUSgmbWludXM7RigtRi82JEY0LUY8NiVGSkZNRlAtRjw2JUZDRmNvRkpGV0ZXRmZvRldGV0Zfb0ZXRldGV0ZXRldGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSM9ajsrJEhZblc9
alpha2:=1/2*(gamma1+gamma2):
alpha1:=1/2*(gamma1+gamma2):
beta1:=0:
beta2:=0:
delta1:=0:
Properties:
sy(R(0))
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1bTJtLElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1XWZsLElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dThsLElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJm1mcmFjR0YwNiQtSSNtaUdGMDYjUSkmZ2FtbWE7MUYoLUkjbW5HRjA2I1EiMkYoLUkjbW9HRjA2I1EnJnBsdXM7RigtRjU2JC1GODYjUSkmZ2FtbWE7MkYoRjstRjw2I1EiMEYoRkgtRjg2I1EpJmRlbHRhOzJGKEZIRkhGRUZIRkhGN0ZIRkhGSEZIRkhGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNXU+SyYqSEhZblc9
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5U2</Text-field>
a1:=u->exp((1/2*(gamma1+gamma2))*u):
a2:=u->exp((1/2*(gamma1+gamma2))*u):
b1:=u->0:
b2:=u->0:
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma2*u):
d1:=u->delta1*(exp(gamma1*u)-exp(gamma2*u))/(gamma1-gamma2):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSZtZnJhY0dGMDYkLUklbXJvd0dGMDYlLUkobWZlbmNlZEdGMDYjLUY8NiUtSSNtaUdGMDYjUSkmZ2FtbWE7MUYoLUY1NiNRJyZwbHVzO0YoLUZENiNRKSZnYW1tYTsyRigtRjU2I1ExJkludmlzaWJsZVRpbWVzO0YoLUZENiNRInVGKC1JI21uR0YwNiNRIjJGKC1GVDYjUSIwRihGV0ZXRldGVy1GLzYkRjQtRjw2JUZKRk1GUEZXRlctRi82JEY0LUY8NiVGQ0ZNRlBGV0ZXLUY5NiQtRjw2JS1GRDYjUSkmZGVsdGE7MUYoRk0tRj82Iy1GPDYlRmhuLUY1NiNRKCZtaW51cztGKEZaLUY8NiVGQ0Znb0ZKRldGV0YuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1NVhTMElIWW5XPQ==
Constraints:
alpha2:=1/2*(gamma1+gamma2):
alpha1:=1/2*(gamma1+gamma2):
beta1:=0:
beta2:=0:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RSo0YSskSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1PSh5YSskSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dT5bMElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJm1mcmFjR0YwNiQtSSNtaUdGMDYjUSkmZ2FtbWE7MUYoLUkjbW5HRjA2I1EiMkYoLUkjbW9HRjA2I1EnJnBsdXM7RigtRjU2JC1GODYjUSkmZ2FtbWE7MkYoRjstRjw2I1EiMEYoRkhGSEZIRkhGRUZIRkhGN0ZIRkgtRjg2I1EpJmRlbHRhOzFGKEZIRkhGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNWlJXDBJSFluVz0=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5U3</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha2):
b1:=u->0:
b2:=u->0:
c1:=u->exp((1/2*(alpha1+alpha2))*u):
c2:=u->exp((1/2*(alpha1+alpha2))*u):
d1:=u->0:
d2:=u->delta2/(alpha1-alpha2)*exp((1/2*(alpha1+alpha2))*u)*sinh((alpha1-alpha2)*u):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRS1JJm1mcmFjR0YwNiQtRjk2Jy1GPDYjUSkmZGVsdGE7MkYoRj8tRi82JEY0LUZKNiQtRjk2JS1JKG1mZW5jZWRHRjA2Iy1GOTYlRjstRjU2I1EnJnBsdXM7RigtRjw2I1EpJmFscGhhOzJGKEY/RkItRkY2I1EiMkYoRj8tRjk2JS1GPDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUY1NiNRMCZBcHBseUZ1bmN0aW9uO0YoLUZYNiMtRjk2JS1GWDYjLUY5NiVGOy1GNTYjUSgmbWludXM7RihGaW5GP0ZCRmBwRkVGRUZRRkVGRUZRRkVGRUZFRkVGRS1GLzYkRjQtRjk2JUZpbkY/RkI3Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVVJj5GKUhIWW5XPQ==
Constraints:
beta1:=0:
beta2:=0:
gamma2:=1/2*(alpha1+alpha2):
gamma1:=1/2*(alpha1+alpha2):
delta1:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1JzMxYCskSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dTQxP0hIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1XWBCQUhIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjVGNS1JJW1yb3dHRjA2JS1JJm1mcmFjR0YwNiRGLi1GNjYjUSIyRigtSSNtb0dGMDYjUScmcGx1cztGKC1GQDYkLUYvNiNRKSZhbHBoYTsyRihGQkY1RjVGPEY1RjVGNUY1RjVGSzcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNWlDQ0FISFluVz0=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5U4</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha2):
b1:=u->0:
b2:=u->0:
c1:=u->exp((1/2*(alpha1+alpha2))*u):
c2:=u->exp((1/2*(alpha1+alpha2))*u):
d1:=u->delta1/(alpha1-alpha2)*exp((1/2*(alpha1+alpha2))*u)*sinh((alpha1-alpha2)*u):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRS1GLzYkRjQtSSZtZnJhY0dGMDYkLUY5NiUtSShtZmVuY2VkR0YwNiMtRjk2JUY7LUY1NiNRJyZwbHVzO0YoLUY8NiNRKSZhbHBoYTsyRihGP0ZCLUZGNiNRIjJGKEZFRkVGSUZFRkUtRkw2JC1GOTYnLUY8NiNRKSZkZWx0YTsxRihGP0ZJRj8tRjk2JS1GPDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUY1NiNRMCZBcHBseUZ1bmN0aW9uO0YoLUZRNiMtRjk2JS1GUTYjLUY5NiVGOy1GNTYjUSgmbWludXM7RihGWEY/RkJGYHBGRUZFLUYvNiRGNC1GOTYlRlhGP0ZCNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1NSR6OSpISFluVz0=
Constraints:
beta1:=0:
beta2:=0:
gamma2:=1/2*(alpha1+alpha2):
gamma1:=1/2*(alpha1+alpha2):
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1eSVvOSpISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1aU9ZIipISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1QXFZIipISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjVGNS1JJW1yb3dHRjA2JS1JJm1mcmFjR0YwNiRGLi1GNjYjUSIyRigtSSNtb0dGMDYjUScmcGx1cztGKC1GPTYkLUYvNiNRKSZhbHBoYTsyRihGP0Y1RjVGOUY1RjUtRi82I1EpJmRlbHRhOzFGKEY1RjVGSDcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNVk9WSIqSEhZblc9
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5U5</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha1):
b1:=u->0:
b2:=u->0:
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma1*u):
d1:=u->0:
d2:=u->delta2/(alpha1-gamma1)*exp(alpha1*u)*sinh((alpha1-gamma1)*u):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRS1JJm1mcmFjR0YwNiQtRjk2Jy1GPDYjUSkmZGVsdGE7MkYoRj9GLkY/LUY5NiUtRjw2JFElc2luaEYoL0kqZm9udHN0eWxlR0YoUSdub3JtYWxGKC1GNTYjUTAmQXBwbHlGdW5jdGlvbjtGKC1JKG1mZW5jZWRHRjA2Iy1GOTYlLUZnbjYjLUY5NiVGOy1GNTYjUSgmbWludXM7RigtRjw2I1EpJmdhbW1hOzFGKEY/RkJGXW9GRUZFLUYvNiRGNC1GOTYlRmJvRj9GQkZFRkVGZW9GRUZFRkVGRUZFRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVpM10mKkhIWW5XPQ==
Constraints:
alpha2:=alpha1:
beta1:=0:
beta2:=0:
gamma2:=gamma1:
delta1:=0:
Properties
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1NVghKnpISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1XXghKnpISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1OUchKnpISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjVGNS1GLzYjUSkmZ2FtbWE7MUYoRjVGNUY8RjVGNUY1RjVGNUYuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1I2UxJ3pISFluVz0=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">5U6</Text-field>
a1:=u->exp(u*alpha1):
a2:=u->exp(u*alpha1):
b1:=u->0:
b2:=u->0:
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma1*u):
d1:=u->delta1/(alpha1-gamma1)*exp(alpha1*u)*sinh((alpha1-gamma1)*u):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmZ2FtbWE7MUYoRj9GQkZFRkVGSUZFRkUtSSZtZnJhY0dGMDYkLUY5NictRjw2I1EpJmRlbHRhOzFGKEY/Ri5GPy1GOTYlLUY8NiRRJXNpbmhGKC9JKmZvbnRzdHlsZUdGKFEnbm9ybWFsRigtRjU2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjk2JS1GXm82Iy1GOTYlRjstRjU2I1EoJm1pbnVzO0YoRk1GP0ZCRmRvRkVGRUYuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1KT53YSskSFluVz0=
Constraints:
alpha2:=alpha1:
beta1:=0:
beta2:=0:
gamma2:=gamma1:
delta2:=0:
sy(fc(ex(R(u))));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmZ2FtbWE7MUYoRj9GQkZFRkVGSUZFRkUtSSZtZnJhY0dGMDYkLUY5NictRjw2I1EpJmRlbHRhOzFGKEY/Ri5GPy1GOTYlLUY8NiRRJXNpbmhGKC9JKmZvbnRzdHlsZUdGKFEnbm9ybWFsRigtRjU2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjk2JS1GXm82Iy1GOTYlRjstRjU2I1EoJm1pbnVzO0YoRk1GP0ZCRmRvRkVGRUYuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1YUlbMElIWW5XPQ==
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1YUldMElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1NSgpZTBJSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1aWdmMElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjVGNS1GLzYjUSkmZ2FtbWE7MUYoRjVGNUY5RjVGNS1GLzYjUSkmZGVsdGE7MUYoRjVGNUYuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1NV5ZIylISFluVz0=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6V1</Text-field>
a1:=u->exp(1/2*(gamma1+gamma2)*u)*sinh(omega*(epsilon*u+eta))/sinh(omega*eta):
a2:=u->exp(1/2*(gamma1+gamma2)*u)*sinh(omega*(epsilon*u+eta))/sinh(omega*eta):
b1:=u->epsilon*sqrt(beta1/beta2)*exp(1/2*(gamma1+gamma2)*u)*sinh(omega*u)/sinh(omega*eta):
b2:=u->epsilon*sqrt(beta2/beta1)*exp(1/2*(gamma1+gamma2)*u)*sinh(omega*u)/sinh(omega*eta):
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma2*u):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSVtc3VwR0YwNiQtSSNtb0dGMDYjUS8mRXhwb25lbnRpYWxFO0YoLUYvNiQtRjU2JS1JKG1mZW5jZWRHRjA2Iy1GNTYlLUkjbWlHRjA2I1EpJmdhbW1hOzFGKC1GOzYjUScmcGx1cztGKC1GSDYjUSkmZ2FtbWE7MkYoLUY7NiNRMSZJbnZpc2libGVUaW1lcztGKC1GSDYjUSJ1RigtSSNtbkdGMDYjUSIyRihGUS1GNTYlLUZINiRRJXNpbmhGKC9JKmZvbnRzdHlsZUdGKFEnbm9ybWFsRigtRjs2I1EwJkFwcGx5RnVuY3Rpb247RigtRkM2Iy1GNTYlLUZINiNRKCZvbWVnYTtGKEZRLUZDNiMtRjU2JS1GNTYlLUZINiNRKiZlcHNpbG9uO0YoRlFGVEZLLUZINiNRJiZldGE7RigtRjU2JUZnbkZdby1GQzYjLUY1NiVGZG9GUUZgcC1GWDYjUSIwRihGaXBGaXBGaXAtRi82JC1GNTYpRl1wRlEtSSZtc3FydEdGMDYjLUYvNiQtRkg2I1EoJmJldGE7MUYoLUZINiNRKCZiZXRhOzJGKEZRRjdGUS1GNTYlRmduRl1vLUZDNiMtRjU2JUZkb0ZRRlRGY3AtRjg2JEY6LUY1NiVGTkZRRlRGaXBGaXAtRjg2JEY6LUY1NiVGR0ZRRlQtRi82JC1GNTYpRl1wRlEtRmFxNiMtRi82JEZocUZlcUZRRjdGUUZbckZjcEZpcEZpcEZpcEZpcEYuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1bTAiZSlISFluVz0=
Constraints:
alpha2:=alpha1:
delta1:=0:
delta2:=0:
eta:=arcsinh(epsilon*omega/sqrt(beta1*beta2))/omega:
omega:=1/2*sqrt((2*alpha1-gamma1-gamma2)^2-4*beta1*beta2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1UUtsJilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1eSVHQiNISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(fc(ex(subs(epsilon=1,eval(diff(R(u),u),u=0)-H))),symbolic)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1JTRITylISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtRi82I1EoJmJldGE7MUYoLUYvNiNRKSZnYW1tYTsyRihGNUY1LUYvNiNRKSZnYW1tYTsxRigtRi82I1EoJmJldGE7MkYoRjVGNUY1RjVGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSdbOk8pSEhZblc9
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6V2</Text-field>
a1:=u->exp(1/2*(gamma1+gamma2)*u)*sinh(omega*(eta+epsilon*u))/sinh(omega*eta):
a2:=u->exp(1/2*(gamma1+gamma2)*u)*sinh(omega*(eta-epsilon*u))/sinh(omega*eta):
b1:=u->epsilon*sqrt(beta1/beta2)*exp(1/2*(gamma1+gamma2)*u)*sinh(omega*u)/sinh(omega*eta):
b2:=u->epsilon*sqrt(beta2/beta1)*exp(1/2*(gamma1+gamma2)*u)*sinh(omega*u)/sinh(omega*eta):
c1:=u->exp(gamma1*u):
c2:=u->exp(gamma2*u):
d1:=u->0:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSVtc3VwR0YwNiQtSSNtb0dGMDYjUS8mRXhwb25lbnRpYWxFO0YoLUYvNiQtRjU2JS1JKG1mZW5jZWRHRjA2Iy1GNTYlLUkjbWlHRjA2I1EpJmdhbW1hOzFGKC1GOzYjUScmcGx1cztGKC1GSDYjUSkmZ2FtbWE7MkYoLUY7NiNRMSZJbnZpc2libGVUaW1lcztGKC1GSDYjUSJ1RigtSSNtbkdGMDYjUSIyRihGUS1GNTYlLUZINiRRJXNpbmhGKC9JKmZvbnRzdHlsZUdGKFEnbm9ybWFsRigtRjs2I1EwJkFwcGx5RnVuY3Rpb247RigtRkM2Iy1GNTYlLUZINiNRKCZvbWVnYTtGKEZRLUZDNiMtRjU2JS1GNTYlLUZINiNRKiZlcHNpbG9uO0YoRlFGVEZLLUZINiNRJiZldGE7RigtRjU2JUZnbkZdby1GQzYjLUY1NiVGZG9GUUZgcC1GWDYjUSIwRihGaXBGaXBGaXAtRi82JC1GNTYpRl1wRlEtSSZtc3FydEdGMDYjLUYvNiQtRkg2I1EoJmJldGE7MUYoLUZINiNRKCZiZXRhOzJGKEZRRjdGUS1GNTYlRmduRl1vLUZDNiMtRjU2JUZkb0ZRRlRGY3AtRjg2JEY6LUY1NiVGTkZRRlRGaXBGaXAtRjg2JEY6LUY1NiVGR0ZRRlQtRi82JC1GNTYpRl1wRlEtRmFxNiMtRi82JEZocUZlcUZRRjdGUUZbckZjcEZpcEZpcEZpcEZpcC1GLzYkLUY1NiVGN0ZRLUY1NiVGZ25GXW8tRkM2Iy1GNTYlRmRvRlEtRkM2Iy1GNTYmLUY7NiNRKiZ1bWludXMwO0YoRltwRktGYHBGY3A3Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjUnKXksWElIWW5XPQ==
Constraints:
gamma2:=alpha1+alpha2-gamma1:
delta1:=0:
delta2:=0:
eta:=arcsinh(epsilon*omega/sqrt(beta1*beta2))/omega:
omega:=1/2*sqrt((alpha1-alpha2)^2-4*beta1*beta2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1SXdXa0lIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dS5nb0lIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(subs(epsilon^2=1,sy(fc(ex(eval(diff(R(u),u),u=0)-H)),symbolic)),symbolic)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1SW9nZElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtRi82I1EoJmJldGE7MUYoLUklbXJvd0dGMDYnRi4tSSNtb0dGMDYjUScmcGx1cztGKC1GLzYjUSkmYWxwaGE7MkYoLUZANiNRKCZtaW51cztGKC1GLzYjUSkmZ2FtbWE7MUYoRjVGNUZJLUYvNiNRKCZiZXRhOzJGKEY1RjVGNUY1RkM3Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjUhZjR3MCRIWW5XPQ==
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6U1</Text-field>
a1:=u->sinh(omega*eta)/sinh(omega*(eta-u)):
a2:=u->sinh(omega*eta)/sinh(omega*(eta-u)):
b1:=u->0:
b2:=u->0:
c1:=u->1:
c2:=u->1:
d1:=u->sqrt(delta1/delta2)*sinh(omega*u)/sinh(omega*(eta-u)):
d2:=u->sqrt(delta2/delta1)*sinh(omega*u)/sinh(omega*(eta-u)):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUY4NiNRJiZldGE7RigtRjU2JUY3Rj4tRkM2Iy1GNTYlRkdGSi1GQzYjLUY1NiVGTS1GPzYjUSgmbWludXM7RigtRjg2I1EidUYoLUkjbW5HRjA2I1EiMEYoRmpuLUYvNiQtRjU2JS1JJm1zcXJ0R0YwNiMtRi82JC1GODYjUSkmZGVsdGE7MkYoLUY4NiNRKSZkZWx0YTsxRihGSi1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRmduRlBGam5Gam4tRltvNiNRIjFGKEZqbkZqbkZjcEZqbkZqbi1GLzYkLUY1NiUtRmNvNiMtRi82JEZqb0Znb0ZKRl1wRlBGam5Gam5GLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSdbPEMyJEhZblc9
Constraints:
alpha2:=alpha1:
beta1:=0:
beta2:=0:
gamma1:=0:
gamma2:=0:
omega:=sqrt(alpha1^2-delta1*delta2):
eta:=arcsinh(omega/sqrt(delta1*delta2))/omega:
Regularity etc.
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1ZVxTc0lIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1QXFucElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(eval(diff(R(u),u),u=0)-H,symbolic);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1SSVwJ3BJSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjVGNUY1RjVGNUY1RjVGNS1GLzYjUSkmZGVsdGE7MUYoRjVGNUYuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1NUJucElIWW5XPQ==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6U2</Text-field>
a1:=u->sqrt((1-sn(omega*u,k)^2/sn(omega*eta,k)^2)*sn(omega*eta,k)/sn(omega*(eta-epsilon*u),k)):
a2:=u->sqrt((1-sn(omega*u,k)^2/sn(omega*eta,k)^2)*sn(omega*(eta-epsilon*u),k)/sn(omega*eta,k)):
b1:=u->0:
b2:=u->0:
c1:=u->1:
c2:=u->1:
d1:=u->epsilon*I*sqrt(delta1/delta2)*sn(omega*u, k)/sn(omega*eta, k):
d2:=u->epsilon*I*sqrt(delta2/delta1)*sn(omega*u, k)/sn(omega*eta,k):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtc3FydEc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiMtSSZtZnJhY0dGMDYkLUklbXJvd0dGMDYlLUkobWZlbmNlZEdGMDYjLUY4NiUtSSNtbkdGMDYjUSIxRigtSSNtb0dGMDYjUSgmbWludXM7RigtRjU2JC1JJW1zdXBHRjA2JC1GODYlLUkjbWlHRjA2JFEpSmFjb2JpU05GKC9JKmZvbnRzdHlsZUdGKFEnbm9ybWFsRigtRkQ2I1EwJkFwcGx5RnVuY3Rpb247RigtRjs2JC1GODYlLUZPNiNRKCZvbWVnYTtGKC1GRDYjUTEmSW52aXNpYmxlVGltZXM7RigtRk82I1EidUYoLUZPNiNRImtGKC1GQDYjUSIyRigtRko2JC1GODYlRk5GVS1GOzYkLUY4NiVGZm5GaW4tRk82I1EmJmV0YTtGKEZfb0Zib0ZpbkZnby1GODYlRk5GVS1GOzYkLUY4NiVGZm5GaW4tRjs2Iy1GODYmLUZENiNRKiZ1bWludXMwO0YoLUY4NiUtRk82I1EqJmVwc2lsb247RihGaW5GXG8tRkQ2I1EnJnBsdXM7RihGXXBGX28tRkA2I1EiMEYoRmVxLUY1NiQtRjg2KS1GQDYjUS0mSW1hZ2luYXJ5STtGKEZpbkZfcUZpbi1GLzYjLUY1NiQtRk82I1EpJmRlbHRhOzJGKC1GTzYjUSkmZGVsdGE7MUYoRmluRkxGZ29GZXFGZXFGP0ZlcUZlcUY/RmVxRmVxLUY1NiQtRjg2KUZcckZpbkZfcUZpbi1GLzYjLUY1NiRGZnJGY3JGaW5GTEZnb0ZlcUZlcS1GLzYjLUY1NiQtRjg2JUY6RmluRmBwRmdvNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1ZSxVR0pIWW5XPQ==
Constraints
alpha2:=-alpha1:
beta1:=0:
beta2:=0:
gamma1:=0:
gamma2:=0:
eta:=InverseJacobiSN(I*epsilon*omega/(sqrt(delta1)*sqrt(delta2)), k)/omega:
omega:=I*(alpha1+epsilon*sqrt(alpha1^2+delta1*delta2)):
k:=delta1*delta2/omega^2:
Properties
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1eU1DbUlIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1USkpPTRKSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H,symbolic);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1bTo/UklIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjVGNUY1RjVGNUY1RjVGNS1GLzYjUSkmZGVsdGE7MUYoRjVGNS1JJW1yb3dHRjA2JC1JI21vR0YwNiNRKiZ1bWludXMwO0YoRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjUnR2VhLSRIWW5XPQ==
Maple cannot handle simplification of complicated elliptic functions. It is necessary to check the solutions numerically.
rd:=rand(0.1..1.0):
listV:=evalf~({u=rd(),v=rd()});
listP:=evalf~({alpha1=rd(),delta1=rd(),delta2=rd()});
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0VkdGKDwkL0kidUdGKCQiP2c/USwsVkh2RGlgV0hYQyEjSS9JInZHRigkIj8rYTlQZTNMKik+ZWNwa2NIRjM3I0Yu LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0UEdGKDwlL0knYWxwaGExR0YoJCI/ZyFvcTUhSEs+Yk5mJnkiKVIoISNJL0knZGVsdGExR0YoJCI/K05SJipmOD4pZiVwVik+SG0pRjMvSSdkZWx0YTJHRigkIj9hQ3NBP0Y5U0k0amh3I0cnRjM3I0Yu
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= fnormal~(evalf~(subs(listP,subs(listV,[YB[i,j],DYB1[i,j],DYB2[i,j]])))));od;od;
LyZJIldHNiI2JCIiIkYnNyUkIiIhRipeJEYpJCEiIUYqXiRGLEYp LyZJIldHNiI2JCIiIiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJTclXiQkIiIhRiwkISIhRixeJEYrRiteJEYtRis= LyZJIldHNiI2JCIiIiIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiKDclXiQkIiIhRixGK14kRiskISIhRixGLQ== LyZJIldHNiI2JCIiIiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiI0YnNyUkIiIhRipGKV4kJCEiIUYqRik= LyZJIldHNiI2JCIiIyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJjclXiQkISIhIiIhRiteJCRGLUYtRitGLg== LyZJIldHNiI2JCIiIyIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKTclXiQkIiIhRiwkISIhRixeJEYrRiteJEYtRis= LyZJIldHNiI2JCIiJCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJCIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiIjclXiQkISIhIiIhJEYtRi1eJEYrRiteJEYuRis= LyZJIldHNiI2JCIiJSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJUYnNyUkIiIhRipeJCQhIiFGKkYpRik= LyZJIldHNiI2JCIiJSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiKDclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiJSIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIzclXiQkIiIhRixGK0YqRio= LyZJIldHNiI2JCIiJiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJkYnNyUkIiIhRipeJEYpJCEiIUYqRik= LyZJIldHNiI2JCIiJiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKTclXiQkIiIhRixGK14kRiskISIhRixeJEYuRi4= LyZJIldHNiI2JCIiJyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJ0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIjclXiQkISIhIiIhRiteJEYrJEYtRi1eJEYvRi8= LyZJIldHNiI2JCIiKCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJTclXiQkISIhIiIhJEYtRi1eJEYuRi5GLw== LyZJIldHNiI2JCIiKCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKEYnNyUkIiIhRipGKV4kRikkISIhRio= LyZJIldHNiI2JCIiKCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIzclXiQkISIhIiIhJEYtRi1eJEYrRiteJEYuRis= LyZJIldHNiI2JCIiKSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJjclXiQkISIhIiIhRiteJEYrJEYtRi1eJEYvRi8= LyZJIldHNiI2JCIiKSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKUYnNyUkIiIhRipeJCQhIiFGKkYpXiRGKUYs
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6U3</Text-field>
a1:=u->exp(alpha1*u):
a2:=u->exp(alpha2*u):
b1:=u->0:
b2:=u->epsilon*(exp(alpha2*u)-exp(alpha1*u)):
c1:=u->exp(alpha1*u):
c2:=u->exp(alpha2*u):
d1:=u->0:
d2:=u->delta2*(exp(alpha1*u)-exp(alpha2*u))/(alpha1-alpha2):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRS1JJm1mcmFjR0YwNiQtRjk2JS1GPDYjUSkmZGVsdGE7MkYoRj8tSShtZmVuY2VkR0YwNiMtRjk2JUYuLUY1NiNRKCZtaW51cztGKC1GLzYkRjQtRjk2JS1GPDYjUSkmYWxwaGE7MkYoRj9GQi1GOTYlRjtGVkZnbkZFRkVGWUZFRkVGLi1GOTYlLUY8NiNRKiZlcHNpbG9uO0YoRj8tRlI2Iy1GOTYlRllGVkYuRkVGRUZFRkVGWTcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNU0uPyQpSEhZblc9
Constraints:
beta1:=0:
beta2:=epsilon*(alpha2-alpha1):
gamma1:=alpha1:
gamma2:=alpha2:
delta1:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RUJ1VUlIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1TXJgRklIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(fc(ex(eval(diff(R(u),u),u=0)-H)))
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dS5hRklIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjVGNS1GLzYjUSkmYWxwaGE7MkYoRjVGNUYuLUklbXJvd0dGMDYkLUkjbW9HRjA2I1EqJnVtaW51czA7RigtRkA2JS1GLzYjUSomZXBzaWxvbjtGKC1GQzYjUTEmSW52aXNpYmxlVGltZXM7RigtSShtZmVuY2VkR0YwNiMtRkA2JUYuLUZDNiNRKCZtaW51cztGKEY8RjVGNUY1RjVGPDcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNVFjJ0ctJEhZblc9
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6U4</Text-field>
a1:=u->exp(alpha1*u):
a2:=u->exp(alpha2*u):
b1:=u->0:
b2:=u->epsilon*(exp(alpha2*u)-exp(alpha1*u)):
c1:=u->exp(alpha2*u):
c2:=u->exp(alpha1*u):
d1:=u->delta1*(exp(alpha1*u)-exp(alpha2*u))/(alpha1-alpha2):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkVGRUYuRkVGRS1GLzYkRjQtRjk2JS1GPDYjUSkmYWxwaGE7MkYoRj9GQi1GOTYlLUY8NiNRKiZlcHNpbG9uO0YoRj8tSShtZmVuY2VkR0YwNiMtRjk2JUZJLUY1NiNRKCZtaW51cztGKEYuRkUtSSZtZnJhY0dGMDYkLUY5NiUtRjw2I1EpJmRlbHRhOzFGKEY/LUZWNiMtRjk2JUYuRlpGSS1GOTYlRjtGWkZNRkVGRUZJNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1XVpsLElIWW5XPQ==
Constraints:
beta1:=0:
beta2:=epsilon*(alpha2-alpha1):
gamma1:=alpha2:
gamma2:=alpha1:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1YU9sLElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dVxLJipISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(fc(ex(subs(epsilon=1,eval(diff(R(u),u),u=0)-H))),symbolic)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1cSUzYCpISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjVGNUYuRjVGNS1GLzYjUSkmYWxwaGE7MkYoLUklbXJvd0dGMDYkLUkjbW9HRjA2I1EqJnVtaW51czA7RigtRj02JS1GLzYjUSomZXBzaWxvbjtGKC1GQDYjUTEmSW52aXNpYmxlVGltZXM7RigtSShtZmVuY2VkR0YwNiMtRj02JUYuLUZANiNRKCZtaW51cztGKEY5RjUtRi82I1EpJmRlbHRhOzFGKEY1RjVGOTcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNV14WiIqSEhZblc9
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6U5</Text-field>
a1:=u->exp(alpha1*u):
a2:=u->exp(alpha2*u):
b1:=u->epsilon*(exp(alpha2*u)-exp(alpha1*u)):
b2:=u->0:
c1:=u->exp(alpha2*u):
c2:=u->exp(alpha1*u):
d1:=u->0:
d2:=u->delta2*(exp(alpha1*u)-exp(alpha2*u))/(alpha1-alpha2):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRS1JJm1mcmFjR0YwNiQtRjk2JS1GPDYjUSkmZGVsdGE7MkYoRj8tSShtZmVuY2VkR0YwNiMtRjk2JUYuLUY1NiNRKCZtaW51cztGKC1GLzYkRjQtRjk2JS1GPDYjUSkmYWxwaGE7MkYoRj9GQi1GOTYlRjtGVkZnbkZFLUY5NiUtRjw2I1EqJmVwc2lsb247RihGPy1GUjYjLUY5NiVGWUZWRi5GLkZFRkVGWUZFRkVGRUZFRkVGWTcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNUlVMyUpSEhZblc9
Constraints:
beta1:=epsilon*(alpha2-alpha1):
beta2:=0:
gamma1:=alpha2:
gamma2:=alpha1:
delta1:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1MWloJClISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1MXFUc0lIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(fc(ex(subs(epsilon=1,eval(diff(R(u),u),u=0)-H))),symbolic)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1J1s/QzIkSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjUtSSVtcm93R0YwNiQtSSNtb0dGMDYjUSomdW1pbnVzMDtGKC1GPTYlLUYvNiNRKiZlcHNpbG9uO0YoLUZANiNRMSZJbnZpc2libGVUaW1lcztGKC1JKG1mZW5jZWRHRjA2Iy1GPTYlRi4tRkA2I1EoJm1pbnVzO0YoLUYvNiNRKSZhbHBoYTsyRihGLkY1RjVGU0Y1RjVGNUY1RjVGUzcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNXU0VHNJSFluVz0=
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">6U6</Text-field>
a1:=u->exp(alpha1*u):
a2:=u->exp(alpha2*u):
b1:=u->epsilon*(exp(alpha2*u)-exp(alpha1*u)):
b2:=u->0:
c1:=u->exp(alpha1*u):
c2:=u->exp(alpha2*u):
d1:=u->delta1*(exp(alpha1*u)-exp(alpha2*u))/(alpha1-alpha2):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtc3VwRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSVtcm93R0YwNiUtSSNtaUdGMDYjUSkmYWxwaGE7MUYoLUY1NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUSJ1RigtSSNtbkdGMDYjUSIwRihGRUZFRkUtRjk2JS1GPDYjUSomZXBzaWxvbjtGKEY/LUkobWZlbmNlZEdGMDYjLUY5NiUtRi82JEY0LUY5NiUtRjw2I1EpJmFscGhhOzJGKEY/RkItRjU2I1EoJm1pbnVzO0YoRi5GU0ZFRkVGLkZFRkUtSSZtZnJhY0dGMDYkLUY5NiUtRjw2I1EpJmRlbHRhOzFGKEY/LUZPNiMtRjk2JUYuRlpGUy1GOTYlRjtGWkZXRkVGRUZTNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1J0dSbC4kSFluVz0=
Constraints:
beta1:=epsilon*(alpha2-alpha1):
beta2:=0:
gamma1:=alpha1:
gamma2:=alpha2:
delta2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1KWYoSElJSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1bVw7d0lIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(fc(ex(subs(epsilon=1,eval(diff(R(u),u),u=0)-H))),symbolic)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1eSk9SDIkSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtSSVtcm93R0YwNiQtSSNtb0dGMDYjUSomdW1pbnVzMDtGKC1GOjYlLUYvNiNRKiZlcHNpbG9uO0YoLUY9NiNRMSZJbnZpc2libGVUaW1lcztGKC1JKG1mZW5jZWRHRjA2Iy1GOjYlRi4tRj02I1EoJm1pbnVzO0YoLUYvNiNRKSZhbHBoYTsyRihGUEY1RjVGLkY1RjUtRi82I1EpJmRlbHRhOzFGKEY1RjVGUDcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNWF5ZWtJSFluVz0=
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp)))));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V1</Text-field>
a1:=u->sinh(omega*(u+eta))/sinh(omega*eta):
a2:=u->sinh(omega*(u+eta))/sinh(omega*eta):
b1:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
b2:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
c1:=u->1:
c2:=u->1:
d1:=u->0:
d2:=u->epsilon*delta2/beta1*sinh(omega*(u+eta))*sinh(omega*u)/sinh(omega*eta)^2:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUZDNiMtRjU2JS1GODYjUSJ1RigtRj82I1EnJnBsdXM7RigtRjg2I1EmJmV0YTtGKC1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlctSSNtbkdGMDYjUSIwRihGam4tRi82JC1GNTYpLUY4NiNRKiZlcHNpbG9uO0YoRkotRjg2I1EpJmRlbHRhOzJGKEZKRjRGSi1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlEtRjU2JS1GODYjUSgmYmV0YTsxRihGSi1JJW1zdXBHRjA2JEZaLUZbbzYjUSIyRihGam4tRi82JC1GNTYlRmJvRkpGaG9GWi1GW282I1EiMUYoRmpuRmpuRl1xRmlwRmpuRmpuRmpuRmpuRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVhLWFGSUhZblc9
Constraints:
alpha2:=alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
delta1:=0:
eta := arcsinh(epsilon*omega/beta1)/omega:
omega:=sqrt(alpha1^2-beta1^2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1MXcpeS4kSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RTgqeS4kSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
subs(epsilon^2=1,sy(fc(ex(cv(eval(diff(R(u),u),u=0),exp))),symbolic))
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSZtc3FydEdGMDYjLUklbXN1cEdGMDYkLUkjbWlHRjA2I1EpJmFscGhhOzFGKC1JI21uR0YwNiNRIjJGKC1GOzYjUSomZXBzaWxvbjtGKC1GPzYjUSIwRihGRS1GOzYjUSkmZGVsdGE7MkYoRkUtRjs2I1EoJmJldGE7MUYoRkVGRUZFRkVGS0ZFRkVGRUZFRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjU1PGQwSkhZblc9
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGPEY1RjVGNUY1Ri43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVVLmBFSkhZblc9
epsilon:= 1;assume(alpha1>0);
#epsilon:=-1;assume(alpha1<0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V2</Text-field>
a1:=u->sinh(omega*(u+eta))/sinh(omega*eta):
a2:=u->sinh(omega*(u+eta))/sinh(omega*eta):
b1:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
b2:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
c1:=u->1:
c2:=u->1:
d1:=u->epsilon*delta1/beta1*sinh(omega*(u+eta))*sinh(omega*u)/sinh(omega*eta)^2:
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUZDNiMtRjU2JS1GODYjUSJ1RigtRj82I1EnJnBsdXM7RigtRjg2I1EmJmV0YTtGKC1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlctSSNtbkdGMDYjUSIwRihGam5Gam5Gam4tRi82JC1GNTYlLUY4NiNRKiZlcHNpbG9uO0YoRkotRjU2JUY3Rj4tRkM2Iy1GNTYlRkdGSkZRRlotRltvNiNRIjFGKEZqbkZqbkZbcEZeb0Zqbi1GLzYkLUY1NilGYm9GSi1GODYjUSkmZGVsdGE7MUYoRkpGNEZKRmVvLUY1NiUtRjg2I1EoJmJldGE7MUYoRkotSSVtc3VwR0YwNiRGWi1GW282I1EiMkYoRmpuRmpuRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjUpZik9NEpIWW5XPQ==
Constraints:
alpha2:=alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
delta2:=0:
eta := arcsinh(epsilon*omega/beta1)/omega:
omega:=sqrt(alpha1^2-beta1^2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RSJmYS0kSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1VW4qPjUkSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
subs(epsilon^2=1,sy(fc(ex(cv(eval(diff(R(u),u),u=0),exp))),symbolic))
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSZtc3FydEdGMDYjLUklbXN1cEdGMDYkLUkjbWlHRjA2I1EpJmFscGhhOzFGKC1JI21uR0YwNiNRIjJGKC1GOzYjUSomZXBzaWxvbjtGKC1GPzYjUSIwRihGRUZFRkUtRjs2I1EoJmJldGE7MUYoRkVGRUZFRkVGSEZFLUY7NiNRKSZkZWx0YTsxRihGRUZFRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVBP04pNCRIWW5XPQ==
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGOUY1LUYvNiNRKSZkZWx0YTsxRihGNUY1Ri43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjUlcCtLKUhIWW5XPQ==
epsilon:= 1;assume(alpha1>0);
#epsilon:=-1;assume(alpha1<0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V3</Text-field>
a1:=u->exp(1/2*u*(gamma1+gamma2))*cosh(beta1*u):
a2:=u->exp(1/2*u*(gamma1+gamma2))*cosh(beta1*u):
b1:=u-> exp(1/2*u*(gamma1+gamma2))*sinh(beta1*u):
b2:=u->-exp(1/2*u*(gamma1+gamma2))*sinh(beta1*u):
c1:=u->exp(u*gamma1):
c2:=u->exp(u*gamma2):
d1:=u->0:
d2:=u->(exp(gamma1*u)-exp(gamma2*u))*delta2/(gamma1-gamma2):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJW1zdXBHRjA2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSZtZnJhY0dGMDYkLUYvNiUtSShtZmVuY2VkR0YwNiMtRi82JS1JI21pR0YwNiNRKSZnYW1tYTsxRigtRjg2I1EnJnBsdXM7RigtRkY2I1EpJmdhbW1hOzJGKC1GODYjUTEmSW52aXNpYmxlVGltZXM7RigtRkY2I1EidUYoLUkjbW5HRjA2I1EiMkYoRk8tRi82JS1GRjYkUSVjb3NoRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUY4NiNRMCZBcHBseUZ1bmN0aW9uO0YoLUZBNiMtRi82JS1GRjYjUSgmYmV0YTsxRihGT0ZSLUZWNiNRIjBGKEZlby1GPDYkLUYvNiUtRkY2I1EpJmRlbHRhOzJGKEZPLUZBNiMtRi82JS1GNTYkRjctRi82JUZFRk9GUi1GODYjUSgmbWludXM7RigtRjU2JEY3LUYvNiVGTEZPRlItRi82JUZFRmdwRkxGZW8tRi82JUY0Rk8tRi82JS1GRjYkUSVzaW5oRihGaG5GW29GXm9GanBGZW9GZW9GY3AtRi82JC1GODYjUSomdW1pbnVzMDtGKEZgcUZlb0Zlb0Zlb0Zlb0YuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1QWtZIipISFluVz0=
Constraints
alpha1:=(1/2)*(gamma1+gamma2):
alpha2:=(1/2)*(gamma1+gamma2):
delta1:=0:
beta2:=-beta1:
Regularity etc.
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1aWE4JilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1QSlRXilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1SSs4JilISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJm1mcmFjR0YwNiQtSSNtaUdGMDYjUSkmZ2FtbWE7MUYoLUkjbW5HRjA2I1EiMkYoLUkjbW9HRjA2I1EnJnBsdXM7RigtRjU2JC1GODYjUSkmZ2FtbWE7MkYoRjstRjw2I1EiMEYoRkgtRjg2I1EpJmRlbHRhOzJGKEZILUY4NiNRKCZiZXRhOzFGKEZFRkhGSEY3LUYvNiQtRkA2I1EqJnVtaW51czA7RihGTkZIRkhGSEZIRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjVhWzcmKUhIWW5XPQ==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V4</Text-field>
a1:=u->exp(1/2*u*(gamma1+gamma2))*cosh(beta1*u):
a2:=u->exp(1/2*u*(gamma1+gamma2))*cosh(beta1*u):
b1:=u-> exp(1/2*u*(gamma1+gamma2))*sinh(beta1*u):
b2:=u->-exp(1/2*u*(gamma1+gamma2))*sinh(beta1*u):
c1:=u->exp(u*gamma1):
c2:=u->exp(u*gamma2):
d1:=u->(exp(gamma1*u)-exp(gamma2*u))*delta1/(gamma1-gamma2):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJW1zdXBHRjA2JC1JI21vR0YwNiNRLyZFeHBvbmVudGlhbEU7RigtSSZtZnJhY0dGMDYkLUYvNiUtSShtZmVuY2VkR0YwNiMtRi82JS1JI21pR0YwNiNRKSZnYW1tYTsxRigtRjg2I1EnJnBsdXM7RigtRkY2I1EpJmdhbW1hOzJGKC1GODYjUTEmSW52aXNpYmxlVGltZXM7RigtRkY2I1EidUYoLUkjbW5HRjA2I1EiMkYoRk8tRi82JS1GRjYkUSVjb3NoRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUY4NiNRMCZBcHBseUZ1bmN0aW9uO0YoLUZBNiMtRi82JS1GRjYjUSgmYmV0YTsxRihGT0ZSLUZWNiNRIjBGKEZlb0Zlb0Zlby1GLzYlRjRGTy1GLzYlLUZGNiRRJXNpbmhGKEZobkZbb0Zeby1GNTYkRjctRi82JUZMRk9GUkZlb0Zlby1GNTYkRjctRi82JUZFRk9GUi1GLzYkLUY4NiNRKiZ1bWludXMwO0YoRmhvRmVvLUY8NiQtRi82JS1GRjYjUSkmZGVsdGE7MUYoRk8tRkE2Iy1GLzYlRmNwLUY4NiNRKCZtaW51cztGKEZfcC1GLzYlRkVGZ3FGTEZlb0Zlb0YuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1cSNmXjIkSFluVz0=
Constraints
alpha1:=(1/2)*(gamma1+gamma2):
alpha2:=(1/2)*(gamma1+gamma2):
beta2:=-beta1:
delta2:=0:
Regularity etc.
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1J0dRTTokSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1US80KDMkSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(eval(diff(R(u),u),u=0)-H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RWRNMElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJm1mcmFjR0YwNiQtSSNtaUdGMDYjUSkmZ2FtbWE7MUYoLUkjbW5HRjA2I1EiMkYoLUkjbW9HRjA2I1EnJnBsdXM7RigtRjU2JC1GODYjUSkmZ2FtbWE7MkYoRjstRjw2I1EiMEYoRkhGSEZILUY4NiNRKCZiZXRhOzFGKEZFRkhGSEY3LUYvNiQtRkA2I1EqJnVtaW51czA7RihGS0ZILUY4NiNRKSZkZWx0YTsxRihGSEZIRi43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjUnW1tgKyRIWW5XPQ==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V5</Text-field>
a1:=u->sinh(omega*(eta+u))/sinh(omega*eta):
a2:=u->sinh(omega*(eta-u))/sinh(omega*eta):
b1:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
b2:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
c1:=u->1:
c2:=u->1:
d1:=u->0:
d2:=u->epsilon*1/2*delta2/beta1*sinh(2*omega*u)/sinh(omega*eta):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUZDNiMtRjU2JS1GODYjUSJ1RigtRj82I1EnJnBsdXM7RigtRjg2I1EmJmV0YTtGKC1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlctSSNtbkdGMDYjUSIwRihGam4tRi82JC1GNTYnLUY4NiNRKiZlcHNpbG9uO0YoRkotRjg2I1EpJmRlbHRhOzJGKEZKLUY1NiVGN0Y+LUZDNiMtRjU2Jy1GW282I1EiMkYoRkpGR0ZKRlEtRjU2J0ZecEZKLUY4NiNRKCZiZXRhOzFGKEZKRlpGam4tRi82JC1GNTYlRmJvRkotRjU2JUY3Rj4tRkM2Iy1GNTYlRkdGSkZRRlotRltvNiNRIjFGKEZqbkZqbkZgcUZmcEZqbkZqbkZqbkZqbi1GLzYkLUY1NiVGN0Y+LUZDNiMtRjU2JUZHRkotRkM2Iy1GNTYlRlctRj82I1EoJm1pbnVzO0YoRlFGWjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNU0mUnYtJEhZblc9
Constraints:
alpha2:=-alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
delta1:=0:
eta:=arcsinh(epsilon*omega/beta1)/omega:
omega:=sqrt(alpha1^2-beta1^2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1VSoqeVtJSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RSwqeS4kSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
subs(epsilon^2=1,sy(fc(ex(cv(eval(diff(R(u),u),u=0)-H,exp))),symbolic));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiYtSSNtb0dGMDYjUSomdW1pbnVzMDtGKC1GNTYlLUkjbWlHRjA2I1EpJmFscGhhOzFGKC1GODYjUTEmSW52aXNpYmxlVGltZXM7RigtRj42I1EqJmVwc2lsb247RigtRjg2I1EnJnBsdXM7RigtSSZtc3FydEdGMDYjLUklbXN1cEdGMDYkRj0tSSNtbkdGMDYjUSIyRihGRC1GUTYjUSIwRihGVEZURlRGVEZURlRGVEZURlRGVEZURlRGVC1GLzYkLUY1NiVGOy1GODYjUSgmbWludXM7RihGSkZENyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1XVBkMEpIWW5XPQ==
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGPEY1RjVGNUY1LUklbXJvd0dGMDYkLUkjbW9HRjA2I1EqJnVtaW51czA7RihGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNUlfTnRJSFluVz0=
epsilon:= 1;assume(alpha1>0);
#epsilon:=-1;assume(alpha1<0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V6</Text-field>
a1:=u->sinh(omega*(eta+u))/sinh(omega*eta):
a2:=u->sinh(omega*(eta-u))/sinh(omega*eta):
b1:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
b2:=u->epsilon*sinh(omega*u)/sinh(omega*eta):
c1:=u->1:
c2:=u->1:
d1:=u->epsilon*1/2*delta1/beta1*sinh(2*omega*u)/sinh(omega*eta):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUZDNiMtRjU2JS1GODYjUSJ1RigtRj82I1EnJnBsdXM7RigtRjg2I1EmJmV0YTtGKC1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlctSSNtbkdGMDYjUSIwRihGam5Gam5Gam4tRi82JC1GNTYlLUY4NiNRKiZlcHNpbG9uO0YoRkotRjU2JUY3Rj4tRkM2Iy1GNTYlRkdGSkZRRlotRltvNiNRIjFGKEZqbkZqbkZbcEZeb0Zqbi1GLzYkLUY1NidGYm9GSi1GODYjUSkmZGVsdGE7MUYoRkotRjU2JUY3Rj4tRkM2Iy1GNTYnLUZbbzYjUSIyRihGSkZHRkpGUS1GNTYnRltxRkotRjg2I1EoJmJldGE7MUYoRkpGWkZqbkZqbi1GLzYkLUY1NiVGN0Y+LUZDNiMtRjU2JUZHRkotRkM2Iy1GNTYlRlctRj82I1EoJm1pbnVzO0YoRlFGWjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSNlWiZcSUhZblc9
Constraints:
alpha2:=-alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
delta2:=0:
eta:=arcsinh(epsilon*omega/beta1)/omega:
omega:=sqrt(alpha1^2-beta1^2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1ZXJbMUpIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1UUVqSklIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
subs(epsilon^2=1,sy(fc(ex(cv(eval(diff(R(u),u),u=0)-H,exp))),symbolic));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiYtSSNtb0dGMDYjUSomdW1pbnVzMDtGKC1GNTYlLUkjbWlHRjA2I1EpJmFscGhhOzFGKC1GODYjUTEmSW52aXNpYmxlVGltZXM7RigtRj42I1EqJmVwc2lsb247RigtRjg2I1EnJnBsdXM7RigtSSZtc3FydEdGMDYjLUklbXN1cEdGMDYkRj0tSSNtbkdGMDYjUSIyRihGRC1GUTYjUSIwRihGVEZURlRGVEZURlRGVEZURlRGVEZURlRGVC1GLzYkLUY1NiVGOy1GODYjUSgmbWludXM7RihGSkZENyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1KSp6VEdKSFluVz0=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNUY1RjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGOUY1LUYvNiNRKSZkZWx0YTsxRihGNUY1LUklbXJvd0dGMDYkLUkjbW9HRjA2I1EqJnVtaW51czA7RihGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSk+VGkxJEhZblc9
epsilon:= 1;assume(alpha1>0);
#epsilon:=-1;assume(alpha1<0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V7</Text-field>
a1:=u->sinh(omega*(eta+u))/sinh(omega*eta):
a2:=u->sinh(omega*(eta-u))/sinh(omega*eta):
b1:=u->-epsilon*exp(-omega*eta)*sinh(omega*u)/sinh(omega*eta):
b2:=u->-epsilon*exp( omega*eta)*sinh(omega*u)/sinh(omega*eta):
c1:=u->exp( omega*u):
c2:=u->exp(-omega*u):
d1:=u->0:
d2:=u->delta2/alpha1*sinh(omega*u)*cosh(omega*eta)/(sinh(omega*eta)):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUZDNiMtRjU2JS1GODYjUSJ1RigtRj82I1EnJnBsdXM7RigtRjg2I1EmJmV0YTtGKC1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlctSSNtbkdGMDYjUSIwRihGam4tRi82JC1GNTYnLUY4NiNRKSZkZWx0YTsyRihGSi1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlFGSi1GNTYlLUY4NiRRJWNvc2hGKEY7Rj5GZm4tRjU2JS1GODYjUSkmYWxwaGE7MUYoRkpGWkZqbi1GNTYkLUY/NiNRKiZ1bWludXMwO0YoLUYvNiQtRjU2Jy1GODYjUSomZXBzaWxvbjtGKEZKLUklbXN1cEdGMDYkLUY/NiNRLyZFeHBvbmVudGlhbEU7RigtRjU2JEZncEZobkZKRmVvRlotRmJxNiRGZHEtRjU2JEZncEZpb0ZqbkZqbi1GYnE2JEZkcUZpby1GNTYkRmdwLUYvNiQtRjU2J0ZecUZKLUZicTYkRmRxRmhuRkpGZW9GWkZqbkZqbkZqbkZqbi1GLzYkLUY1NiVGN0Y+LUZDNiMtRjU2JUZHRkotRkM2Iy1GNTYlRlctRj82I1EoJm1pbnVzO0YoRlFGWjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSlSbEctJEhZblc9
Constraints:
alpha2:=-alpha1:
beta2:=epsilon*(alpha2-alpha1)-beta1:
gamma1:= (alpha1+epsilon*beta1):
gamma2:=-(alpha1+epsilon*beta1):
delta1:=0:
omega:=alpha1+epsilon*beta1:
#eta:=arccoth(alpha1/omega)/omega:
eta:=arcsinh(-epsilon*omega/sqrt(beta1*beta2))/omega:
Properties:
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1IVJ0YjUkSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1cVtOdElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(fc(ex(cv(eval(diff(R(u),u),u=0)-H,exp))),symbolic)
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1USdcJFxKSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
#for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB2[i,j],DYB1[i,j]],exp))),symbolic));od;od;
rd:=rand(0.1..0.9):
listV:=evalf~({u=rd(),v=rd()});
listP:=evalf~({alpha1=rd(),beta1=rd(),delta2=rd()});
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0VkdGKDwkL0kidUdGKCQiPydIYnouImY+eFAiUUgncEwkKSEjSS9JInZHRigkIj8jeipHJVtwLSUqUWprIUc1b3JGMzcjRi4= LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0UEdGKDwlL0knYWxwaGExR0YoJCI/J3l0I3BubkVsIXpkITR5KUcmISNJL0kmYmV0YTFHRigkIj9DayU0OD5seXZ5IW9fRCJcI0YzL0knZGVsdGEyR0YoJCI/PiR6WlhjYVAwd24lXE1wJylGMzcjRi4=
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= fnormal~(evalf~(subs(listP,subs(listV,[YB[i,j],DYB1[i,j],DYB2[i,j]]))),20));od;od;
LyZJIldHNiI2JCIiIkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiI0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIyIiJDclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiIyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJjclXiQkIiIhRixGK14kRiskISIhRixGLQ== LyZJIldHNiI2JCIiIyIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIzclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiJEYnNyUkISIhIiIhJEYrRitGLA== LyZJIldHNiI2JCIiJCIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJjclXiQkISIhIiIhRiteJCRGLUYtRi9eJEYvRis= LyZJIldHNiI2JCIiJCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiIjclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiJSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJUYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJzclXiQkISIhIiIhRiteJCRGLUYtRi9GKg== LyZJIldHNiI2JCIiJSIiKDclXiQkISIhIiIhRitGKkYq LyZJIldHNiI2JCIiJSIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIzclXiQkIiIhRiwkISIhRixeJEYrRitGLw== LyZJIldHNiI2JCIiJiIiJDclXiQkIiIhRixGK14kJCEiIUYsRi5eJEYuRis= LyZJIldHNiI2JCIiJiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiIjclXiQkISIhIiIhRiteJCRGLUYtRitGKg== LyZJIldHNiI2JCIiJyIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJTclXiQkIiIhRixGK14kJCEiIUYsRi5GKg== LyZJIldHNiI2JCIiJyIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJ0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJyIiKDclXiQkIiIhRixGK0YqXiQkISIhRixGLg== LyZJIldHNiI2JCIiJyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIjclXiQkIiIhRixGK0YqRio= LyZJIldHNiI2JCIiKCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJTclXiQkISIhIiIhJEYtRi1eJEYuRi5GLw== LyZJIldHNiI2JCIiKCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJzclXiQkISIhIiIhRitGKl4kJEYtRi1GLw== LyZJIldHNiI2JCIiKEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiKCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIzclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiKSIiJDclXiQkIiIhRiwkISIhRixeJEYtRi1GKg== LyZJIldHNiI2JCIiKSIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJjclXiQkIiIhRixGK0YqXiQkISIhRixGKw== LyZJIldHNiI2JCIiKSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKUYnNyUkIiIhRipGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">7V8</Text-field>
a1:=u->sinh(omega*(eta+u))/sinh(omega*eta):
a2:=u->sinh(omega*(eta-u))/sinh(omega*eta):
b1:=u->-epsilon*exp(-omega*eta)*sinh(omega*u)/sinh(omega*eta):
b2:=u->-epsilon*exp( omega*eta)*sinh(omega*u)/sinh(omega*eta):
c1:=u->exp(-omega*u):
c2:=u->exp( omega*u):
d1:=u->delta1/alpha1*sinh(omega*u)*cosh(omega*eta)/(sinh(omega*eta)):
d2:=u->0:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVzaW5oRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmb21lZ2E7RigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUZDNiMtRjU2JS1GODYjUSJ1RigtRj82I1EnJnBsdXM7RigtRjg2I1EmJmV0YTtGKC1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlctSSNtbkdGMDYjUSIwRihGam5Gam5Gam4tRjU2JC1GPzYjUSomdW1pbnVzMDtGKC1GLzYkLUY1NictRjg2I1EqJmVwc2lsb247RihGSi1JJW1zdXBHRjA2JC1GPzYjUS8mRXhwb25lbnRpYWxFO0YoLUY1NiRGYG9GaG5GSi1GNTYlRjdGPi1GQzYjLUY1NiVGR0ZKRlFGWi1GW3A2JEZdcEZmcEZqbkZqbi1GW3A2JEZdcC1GNTYkRmBvRmZwLUY1NiRGYG8tRi82JC1GNTYnRmdvRkotRltwNiRGXXBGaG5GSkZicEZaRmpuLUYvNiQtRjU2Jy1GODYjUSkmZGVsdGE7MUYoRkpGYnBGSi1GNTYlLUY4NiRRJWNvc2hGKEY7Rj5GZm4tRjU2JS1GODYjUSkmYWxwaGE7MUYoRkpGWkZqbkZqbi1GLzYkLUY1NiVGN0Y+LUZDNiMtRjU2JUZHRkotRkM2Iy1GNTYlRlctRj82I1EoJm1pbnVzO0YoRlFGWjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSF6d2o0JEhZblc9
Constraints:
alpha2:=-alpha1:
beta2:=epsilon*(alpha2-alpha1)-beta1:
gamma1:=-(alpha1+epsilon*beta1):
gamma2:= (alpha1+epsilon*beta1):
delta2:=0:
omega:=alpha1+epsilon*beta1:
#eta:=arccoth(alpha1/omega)/omega;
eta:=arcsinh(-epsilon*omega/sqrt(beta1*beta2))/omega:
Properties:
epsilon:=1;
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1bWh6cElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1dTopNDEkSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(fc(ex(cv(eval(diff(R(u),u),u=0)-H,exp))),symbolic);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1QT10UEpIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
rd:=rand(0.1..0.9):
listV:=evalf~({u=rd(),v=rd()});
listP:=evalf~({alpha1=rd(),beta1=rd(),delta1=rd()});
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0VkdGKDwkL0kidUdGKCQiP0kqNGB2RTxDSj1MRipcIm8lISNJL0kidkdGKCQiP1pIRnE/XTYwUEYiKW8hZXMlRjM3I0Yu LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0UEdGKDwlL0knYWxwaGExR0YoJCI/TENjTkJfJilmI29YVi4nKmUpISNJL0kmYmV0YTFHRigkIj8tYC1BUy0taDdhJ1tCZD8pRjMvSSdkZWx0YTFHRigkIj8ib3ZtPlNLWSVwPmVmZFxgRjM3I0Yu
#for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp))),symbolic));od;od;
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= fnormal~(evalf~(subs(listP,subs(listV,[YB[i,j],DYB1[i,j],DYB2[i,j]]))),20));od;od;
LyZJIldHNiI2JCIiIkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJTclXiQkIiIhRixGK0YqXiQkISIhRixGLg== LyZJIldHNiI2JCIiIiIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJzclXiQkIiIhRixGK0YqRio= LyZJIldHNiI2JCIiIiIiKDclXiQkISIhIiIhRitGKkYq LyZJIldHNiI2JCIiIiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiI0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIyIiJDclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiIyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJjclXiQkIiIhRixGK14kJCEiIUYsRi5GLQ== LyZJIldHNiI2JCIiIyIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKTclXiQkISIhIiIhRiteJCRGLUYtRi9GKg== LyZJIldHNiI2JCIiJCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIzclXiQkIiIhRiwkISIhRixGKl4kRitGKw== LyZJIldHNiI2JCIiJEYnNyUkISIhIiIhJEYrRitGLA== LyZJIldHNiI2JCIiJCIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJjclXiQkIiIhRiwkISIhRixeJEYrRitGKg== LyZJIldHNiI2JCIiJCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKTclXiQkISIhIiIhRiteJCRGLUYtRitGKg== LyZJIldHNiI2JCIiJSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJUYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJzclXiQkIiIhRiwkISIhRixeJEYtRi1GLw== LyZJIldHNiI2JCIiJSIiKDclXiQkISIhIiIhRitGKkYq LyZJIldHNiI2JCIiJSIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIzclXiQkIiIhRiwkISIhRixeJEYrRitGLw== LyZJIldHNiI2JCIiJiIiJDclXiQkISIhIiIhJEYtRi1eJEYrRitGKg== LyZJIldHNiI2JCIiJiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKTclXiQkISIhIiIhRiteJEYrJEYtRi1GKg== LyZJIldHNiI2JCIiJyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJTclXiQkIiIhRixGK0YqRio= LyZJIldHNiI2JCIiJyIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJ0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJyIiKDclXiQkIiIhRixGK14kJCEiIUYsRitGLQ== LyZJIldHNiI2JCIiJyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJTclXiQkIiIhRixGK0YqRio= LyZJIldHNiI2JCIiKCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJzclXiQkISIhIiIhRiteJCRGLUYtRitGLg== LyZJIldHNiI2JCIiKEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiKCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKUYnNyUkIiIhRipGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">8V1</Text-field>
a1:=u->sn(omega*(epsilon*u+eta),k)/sn(omega*eta,k):
a2:=u->sn(omega*(epsilon*u+eta),k)/sn(omega*eta,k):
b1:=u->sn(omega*u,k)/sn(omega*eta,k):
b2:=u->sn(omega*u,k)/sn(omega*eta,k):
c1:=u->1:
c2:=u->1:
d1:=u->k*sqrt(delta1/delta2)*sn(omega*u,k)*sn(omega*(epsilon*u+eta),k):
d2:=u->k*sqrt(delta2/delta1)*sn(omega*u,k)*sn(omega*(epsilon*u+eta),k):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSlKYWNvYmlTTkYoL0kqZm9udHN0eWxlR0YoUSdub3JtYWxGKC1JI21vR0YwNiNRMCZBcHBseUZ1bmN0aW9uO0YoLUkobWZlbmNlZEdGMDYkLUY1NiUtRjg2I1EoJm9tZWdhO0YoLUY/NiNRMSZJbnZpc2libGVUaW1lcztGKC1GQzYjLUY1NiUtRjU2JS1GODYjUSomZXBzaWxvbjtGKEZKLUY4NiNRInVGKC1GPzYjUScmcGx1cztGKC1GODYjUSYmZXRhO0YoLUY4NiNRImtGKC1GNTYlRjdGPi1GQzYkLUY1NiVGR0ZKRmZuRmluLUkjbW5HRjA2I1EiMEYoRmJvLUY1NilGaW5GSi1JJm1zcXJ0R0YwNiMtRi82JC1GODYjUSkmZGVsdGE7MkYoLUY4NiNRKSZkZWx0YTsxRihGSi1GNTYlRjdGPi1GQzYkLUY1NiVGR0ZKRlZGaW5GSkY0RmJvLUYvNiRGY3BGXG8tRmNvNiNRIjFGKEZib0Zib0ZbcUZpcEZiby1GNTYpRmluRkotRmlvNiMtRi82JEZgcEZdcEZKRmNwRkpGNEZib0Zib0YuNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1PThnQUpIWW5XPQ==
Constraints:
alpha2:=alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
omega:=sqrt(xi2^2*delta1*delta2):
k:=xi1/xi2:
eta:=InverseJacobiSN(1/xi1,k)/omega:
xi1:=sqrt(2)*sqrt((-alpha1^2+beta1^2+delta1*delta2+sqrt((alpha1^2+2*alpha1*beta1+beta1^2-delta1*delta2)*(alpha1^2-2*alpha1*beta1+beta1^2-delta1*delta2)))*delta1*delta2)/(2*delta1*delta2):
xi2:=sqrt(2)*sqrt((-alpha1^2+beta1^2+delta1*delta2-sqrt((alpha1^2+2*alpha1*beta1+beta1^2-delta1*delta2)*(alpha1^2-2*alpha1*beta1+beta1^2-delta1*delta2)))*delta1*delta2)/(2*delta1*delta2):
Properties:
sy(R(0));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1XXJUS0lIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1KSo+IWUzJEhZblc9LUknTUFUUklYR0YoNiM3JjcmLUkjbW5HNiRGJi9JK21vZHVsZW5hbWVHRihGJDYjUSIwRihGNUY1RjVGNEY0RjRJJ01hdHJpeEdGJTcjLUY8NiMvSSQlaWRHRihGLw==
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGPEY1LUYvNiNRKSZkZWx0YTsxRihGNUY1Ri43Iy1JJ01hdHJpeEdGJTYjL0kkJWlkR0YoIjU9VGRQSkhZblc9
Maple cannot handle simplification of complicated elliptic functions. It is necessary to check the solutions numerically.
epsilon:='epsilon':
rd:=rand(0.1..0.9):
listV:=evalf~({u=rd(),v=rd()});
listP:=evalf~({alpha1=rd(),beta1=rd(),delta1=rd(),delta2=rd()});
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0VkdGKDwkL0kidUdGKCQiP10zXCgpUlFecDtsKnpELjApISNJL0kidkdGKCQiP2JkeG8uNkAnPkdpQC42aSdGMzcjRi4= LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0UEdGKDwmL0knYWxwaGExR0YoJCI/cio9Wis1InlsP11ia3BvYCEjSS9JJmJldGExR0YoJCI/QCo0cm8nZSxfJ29dQS8lM0tGMy9JJ2RlbHRhMUdGKCQiPzk4aCFSR2tVUCRwaS0kbyJ6RjMvSSdkZWx0YTJHRigkIj9nUCVIPSg+aitxWmZreWI/RjM3I0Yu
epsilon:=round(solve(subs(listP,cn(omega*eta,k)*dn(omega*eta,k)-epsilon*alpha1/beta1),epsilon));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
fnormal(evalf(subs(listP,eval(diff(R(u),u),u=0)-H)));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RS5fSUpIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JJW1yb3dHNiRGJi9JK21vZHVsZW5hbWVHRihGJDYlLUkjbW5HRjc2I1EsJnVtaW51czA7MC5GKC1JI21vR0Y3NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUS0mSW1hZ2luYXJ5STtGKC1GPDYjUSMwLkYoRkZGNTcmRkZGNUZGRkY3JkZGRkZGNUZGRjRJJ01hdHJpeEdGJTcjLUZLNiMvSSQlaWRHRihGLw==
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= fnormal~(evalf~(subs(listP,subs(listV,[YB[i,j],DYB1[i,j],DYB2[i,j]])))));od;od;
LyZJIldHNiI2JCIiIkYnNyUkIiIhRipeJEYpRilGKw== LyZJIldHNiI2JCIiIiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJTclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYtRis= LyZJIldHNiI2JCIiIiIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJzclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiIiIiKDclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiIiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiI0YnNyUkIiIhRipeJCQhIiFGKkYsXiRGKUYp LyZJIldHNiI2JCIiIyIiJDclXiQkISIhIiIhRitGKl4kJEYtRi1GLw== LyZJIldHNiI2JCIiIyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJjclXiQkISIhIiIhRiteJCRGLUYtRitGLg== LyZJIldHNiI2JCIiIyIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKTclXiQkIiIhRixGK14kJCEiIUYsRiteJEYuRi4= LyZJIldHNiI2JCIiJCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIzclXiQkIiIhRixGK0YqXiQkISIhRixGLg== LyZJIldHNiI2JCIiJEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJCIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJjclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiJCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKTclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiJSIiIjclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiJSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJUYnNyUkIiIhRipeJEYpRileJCQhIiFGKkYt LyZJIldHNiI2JCIiJSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJzclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiJSIiKDclXiQkIiIhRixGK14kJCEiIUYsRitGLQ== LyZJIldHNiI2JCIiJSIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIzclXiQkIiIhRixGK14kJCEiIUYsRitGLQ== LyZJIldHNiI2JCIiJiIiJDclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiJiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJkYnNyUkIiIhRipeJEYpRilGKw== LyZJIldHNiI2JCIiJiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKTclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiJyIiIjclXiQkISIhIiIhJEYtRi1GKl4kRi5GKw== LyZJIldHNiI2JCIiJyIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJTclXiQkISIhIiIhJEYtRi1eJEYuRi5eJEYrRis= LyZJIldHNiI2JCIiJyIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJ0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJyIiKDclXiQkIiIhRixGK0YqXiQkISIhRixGLg== LyZJIldHNiI2JCIiJyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIjclXiQkIiIhRixGK0YqXiQkISIhRixGLg== LyZJIldHNiI2JCIiKCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJTclXiQkISIhIiIhRiteJCRGLUYtRitGLg== LyZJIldHNiI2JCIiKCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJzclXiQkISIhIiIhRitGKl4kJEYtRi1GLw== LyZJIldHNiI2JCIiKEYnNyUkIiIhRipeJEYpRilGKw== LyZJIldHNiI2JCIiKCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIzclXiQkISIhIiIhRitGKl4kJEYtRi1GLw== LyZJIldHNiI2JCIiKSIiJDclXiQkIiIhRiwkISIhRixGKl4kRi1GKw== LyZJIldHNiI2JCIiKSIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJjclXiQkIiIhRiwkISIhRixeJEYtRi1eJEYrRis= LyZJIldHNiI2JCIiKSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKUYnNyUkIiIhRipeJEYpRilGKw==
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">8V2</Text-field>
a1:=u->cosh(beta1*u)/cos(u*sqrt(delta1*delta2)):
a2:=u->cosh(beta1*u)/cos(u*sqrt(delta1*delta2)):
b1:=u->sinh(beta1*u)/cos(u*sqrt(delta1*delta2)):
b2:=u->-sinh(beta1*u)/cos(u*sqrt(delta1*delta2)):
c1:=u->1:
c2:=u->1:
d1:=u->sqrt(delta1/delta2)*tan(u*sqrt(delta1*delta2)):
d2:=u->sqrt(delta2/delta1)*tan(u*sqrt(delta1*delta2)):
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSZtZnJhY0c2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiQtSSVtcm93R0YwNiUtSSNtaUdGMDYkUSVjb3NoRigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiMtRjU2JS1GODYjUSgmYmV0YTsxRigtRj82I1ExJkludmlzaWJsZVRpbWVzO0YoLUY4NiNRInVGKC1GNTYlLUY4NiRRJGNvc0YoRjtGPi1GQzYjLUY1NiVGTUZKLUkmbXNxcnRHRjA2Iy1GNTYlLUY4NiNRKSZkZWx0YTsxRihGSi1GODYjUSkmZGVsdGE7MkYoLUkjbW5HRjA2I1EiMEYoRl5vLUY1NiUtRlo2Iy1GLzYkRltvRmhuRkotRjU2JS1GODYkUSR0YW5GKEY7Rj5GVUZeby1GLzYkLUY1NiUtRjg2JFElc2luaEYoRjtGPkZCRlAtRl9vNiNRIjFGKEZeb0Zeb0ZkcC1GNTYkLUY/NiNRKiZ1bWludXMwO0YoRl1wRl5vLUY1NiUtRlo2Iy1GLzYkRmhuRltvRkpGaG9GXm9GXm9GLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNTVkM0pJSFluVz0=
Constraints:
alpha2:=alpha1:
alpha1:=0:
beta2:=-beta1:
gamma1:=0:
gamma2:=0:
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1WSM+MS4kSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1aSU+aClISFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEY1RjVGNUY0RjRGNEknTWF0cml4R0YlNyMtRjw2Iy9JJCVpZEdGKEYv
sy(fc(ex(eval(diff(R(u),u),u=0)-H)),symbolic);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1OWd4PUpIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjBGKEYuRi4tSSNtaUdGMDYjUSkmZGVsdGE7MkYoRi4tRjY2I1EoJmJldGE7MUYoRi5GLkYuRi4tSSVtcm93R0YwNiQtSSNtb0dGMDYjUSomdW1pbnVzMDtGKEY5Ri4tRjY2I1EpJmRlbHRhOzFGKEYuRi5GLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNXUoeSg9SkhZblc9
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= sy~(fc~(ex~(cv~([YB[i,j],DYB1[i,j],DYB2[i,j]],exp))),symbolic));od;od;
LyZJIldHNiI2JCIiIkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiIiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiI0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiIyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiIyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJUYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJSIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJkYnNyUiIiFGKUYp LyZJIldHNiI2JCIiJiIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJiIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiJ0YnNyUiIiFGKUYp LyZJIldHNiI2JCIiJyIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiJyIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKCIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKEYnNyUiIiFGKUYp LyZJIldHNiI2JCIiKCIiKTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiIzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJDclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJTclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJjclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiJzclIiIhRipGKg== LyZJIldHNiI2JCIiKSIiKDclIiIhRipGKg== LyZJIldHNiI2JCIiKUYnNyUiIiFGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">8V3</Text-field>
a1:=u->cn(omega*u,k)/dn(omega*u,k)+epsilon*sn(omega*u,k)*cn(omega*eta,k)/sn(omega*eta,k):
a2:=u->cn(omega*u,k)/dn(omega*u,k)-epsilon*sn(omega*u,k)*cn(omega*eta,k)/sn(omega*eta,k):
b1:=u->sn(omega*u,k)/sn(omega*eta,k):
b2:=u->sn(omega*u,k)/sn(omega*eta,k):
c1:=u->1:
c2:=u->1:
d1:=u->sn(omega*u,k)*cn(omega*u,k)/(dn(omega*u,k)*sn(omega*eta,k))*delta1/beta1:
d2:=u->sn(omega*u,k)*cn(omega*u,k)/(dn(omega*u,k)*sn(omega*eta,k))*delta2/beta1:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJm1mcmFjR0YwNiQtRi82JS1JI21pR0YwNiRRKUphY29iaUNORigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiQtRi82JS1GOjYjUSgmb21lZ2E7RigtRkE2I1ExJkludmlzaWJsZVRpbWVzO0YoLUY6NiNRInVGKC1GOjYjUSJrRigtRi82JS1GOjYkUSlKYWNvYmlETkYoRj1GQEZELUZBNiNRJyZwbHVzO0YoLUY1NiQtRi82Jy1GOjYjUSomZXBzaWxvbjtGKEZMLUYvNiUtRjo2JFEpSmFjb2JpU05GKEY9RkBGREZMLUYvNiVGOUZALUZFNiQtRi82JUZJRkwtRjo2I1EmJmV0YTtGKEZSLUYvNiVGYG9GQEZlby1JI21uR0YwNiNRIjBGKEZecC1GNTYkLUYvNidGXm9GTEY3RkwtRjo2I1EpJmRlbHRhOzJGKC1GLzYnRlVGTEZccEZMLUY6NiNRKCZiZXRhOzFGKEZecC1GNTYkRl5vRlxwLUZfcDYjUSIxRihGXnBGXnBGYHFGXnFGXnAtRjU2JC1GLzYnRl5vRkxGN0ZMLUY6NiNRKSZkZWx0YTsxRihGaXBGXnBGXnAtRi82JUY0LUZBNiNRKCZtaW51cztGKEZnbjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNUUyRzNKSFluVz0=
Constraints:
alpha2:=-alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
omega:=sqrt(xi2^2*delta1*delta2*(1-alpha1^2/beta1^2)):
k:=xi1/xi2:
eta:=solve(sn(omega*eta,k)=1/xi1,eta):
xi1:=beta1/sqrt(beta1^2-alpha1^2):
xi2:=beta1/sqrt(delta1*delta2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1MVNgMEpIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMUYoLUY2NiNRIjBGKEY8Rjw3JkY8RjxGNUY8NyZGPEY1RjxGPDcmRjxGPEY8RjVJJ01hdHJpeEdGJTcjLUZCNiMvSSQlaWRHRihGLw==
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1ZVAyU0pIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGPEY1LUYvNiNRKSZkZWx0YTsxRihGNUY1LUklbXJvd0dGMDYkLUkjbW9HRjA2I1EqJnVtaW51czA7RihGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNSMpKkc9MiRIWW5XPQ==
Maple cannot handle simplification of complicated elliptic functions. It is necessary to check the solutions numerically.
rd:=rand(0.1..0.9):
listV:=evalf~({u=rd(),v=rd()});
listP:=evalf~({alpha1=rd(),beta1=rd(),delta1=rd(),delta2=rd()});
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0VkdGKDwkL0kidUdGKCQiPz8ySzZtOUQlRyk+Jz1ELUQoISNJL0kidkdGKCQiP0FuNj0qZjdTJGYkZXQrSyNRRjM3I0Yu LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0UEdGKDwmL0knYWxwaGExR0YoJCI/TidIU0JtaFBNYyJSPy5idCEjSS9JJmJldGExR0YoJCI/JVxTcSNSKG8oPkpNVmR5am9GMy9JJ2RlbHRhMUdGKCQiP0kiKUh1NHMxTnZdXmI2ISopKUYzL0knZGVsdGEyR0YoJCI/JFFjTFx6P2U/Sio0didRdyZGMzcjRi4=
epsilon:=round(evalf(subs(listP,csgn(alpha1/beta1))));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
fnormal(evalf(subs(listP,subs(listV,eval(diff(R(u),u),u=0)-H))))
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1bThgQklIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JJW1yb3dHNiRGJi9JK21vZHVsZW5hbWVHRihGJDYlLUkjbW5HRjc2I1EsJnVtaW51czA7MC5GKC1JI21vR0Y3NiNRMSZJbnZpc2libGVUaW1lcztGKC1GPDYjUS0mSW1hZ2luYXJ5STtGKC1GPDYjUSMwLkYoRkZGNTcmRkZGNUZGRkY3JkZGRkZGNUZGNyZGNUZGRkYtRjY2JUZGRj9GQ0knTWF0cml4R0YlNyMtRk42Iy9JJCVpZEdGKEYv
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j]= fnormal~(evalf~(subs(listP,subs(listV,[YB[i,j],DYB1[i,j],DYB2[i,j]])))));od;od;
LyZJIldHNiI2JCIiIkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJTclXiQkIiIhRiwkISIhRixeJEYtRitGLw== LyZJIldHNiI2JCIiIiIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJzclXiQkIiIhRiwkISIhRixeJEYrRitGKg== LyZJIldHNiI2JCIiIiIiKDclXiQkIiIhRixGK14kRiskISIhRixGLQ== LyZJIldHNiI2JCIiIiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiI0YnNyUkIiIhRipeJEYpRilGKQ== LyZJIldHNiI2JCIiIyIiJDclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiIyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJjclXiQkIiIhRiwkISIhRixeJEYtRitGLw== LyZJIldHNiI2JCIiIyIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKTclXiQkIiIhRixGK14kJCEiIUYsRitGLQ== LyZJIldHNiI2JCIiJCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIzclXiQkISIhIiIhJEYtRi1GKkYq LyZJIldHNiI2JCIiJEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJCIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJjclXiQkISIhIiIhRiteJCRGLUYtRitGLg== LyZJIldHNiI2JCIiJCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKTclXiQkISIhIiIhRitGKl4kJEYtRi1GLw== LyZJIldHNiI2JCIiJSIiIjclXiQkISIhIiIhJEYtRi1eJEYuRitGLw== LyZJIldHNiI2JCIiJSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJUYnNyUkIiIhRipGKV4kRilGKQ== LyZJIldHNiI2JCIiJSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJzclXiQkISIhIiIhJEYtRi1GKkYq LyZJIldHNiI2JCIiJSIiKDclXiQkISIhIiIhJEYtRi1eJEYuRi5GLw== LyZJIldHNiI2JCIiJSIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIzclXiQkISIhIiIhJEYtRi1eJEYuRitGLw== LyZJIldHNiI2JCIiJiIiJDclXiQkISIhIiIhJEYtRi1GKkYq LyZJIldHNiI2JCIiJiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJkYnNyUkIiIhRipGKV4kJCEiIUYqRik= LyZJIldHNiI2JCIiJiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKTclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiJyIiIjclXiQkISIhIiIhJEYtRi1eJEYuRitGKg== LyZJIldHNiI2JCIiJyIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJTclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiJyIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJ0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJyIiKDclXiQkISIhIiIhJEYtRi1GKkYq LyZJIldHNiI2JCIiJyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIjclXiQkIiIhRiwkISIhRixeJEYtRitGLw== LyZJIldHNiI2JCIiKCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJTclXiQkIiIhRiwkISIhRixeJEYtRi1GLw== LyZJIldHNiI2JCIiKCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJzclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiKEYnNyUkIiIhRipeJCQhIiFGKkYpRik= LyZJIldHNiI2JCIiKCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIzclXiQkIiIhRiwkISIhRixGKkYq LyZJIldHNiI2JCIiKSIiJDclXiQkIiIhRixGK0YqXiQkISIhRixGLg== LyZJIldHNiI2JCIiKSIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJjclXiQkIiIhRixGK14kJCEiIUYsRitGLQ== LyZJIldHNiI2JCIiKSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKUYnNyUkIiIhRipGKUYp
ClearAll():
<Text-field style="Heading 1" layout="Heading 1">8V4</Text-field>
a1:=u->dn(omega*u,k)/cn(omega*u,k)+epsilon*sn(omega*u,k)*dn(omega*eta,k)/sn(omega*eta,k):
a2:=u->dn(omega*u,k)/cn(omega*u,k)-epsilon*sn(omega*u,k)*dn(omega*eta,k)/sn(omega*eta,k):
b1:=u->sn(omega*u,k)/sn(omega*eta,k):
b2:=u->sn(omega*u,k)/sn(omega*eta,k):
c1:=u->1:
c2:=u->1:
d1:=u->sn(omega*u,k)*dn(omega*u,k)/(cn(omega*u,k)*sn(omega*eta,k))*delta1/beta1:
d2:=u->sn(omega*u,k)*dn(omega*u,k)/(cn(omega*u,k)*sn(omega*eta,k))*delta2/beta1:
A1:=u->diff(a1(u),u):
A2:=u->diff(a2(u),u):
B1:=u->diff(b1(u),u):
B2:=u->diff(b2(u),u):
C1:=u->diff(c1(u),u):
C2:=u->diff(c2(u),u):
D1:=u->diff(d1(u),u):
D2:=u->diff(d2(u),u):
R(u);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1JJm1mcmFjR0YwNiQtRi82JS1JI21pR0YwNiRRKUphY29iaURORigvSSpmb250c3R5bGVHRihRJ25vcm1hbEYoLUkjbW9HRjA2I1EwJkFwcGx5RnVuY3Rpb247RigtSShtZmVuY2VkR0YwNiQtRi82JS1GOjYjUSgmb21lZ2E7RigtRkE2I1ExJkludmlzaWJsZVRpbWVzO0YoLUY6NiNRInVGKC1GOjYjUSJrRigtRi82JS1GOjYkUSlKYWNvYmlDTkYoRj1GQEZELUZBNiNRJyZwbHVzO0YoLUY1NiQtRi82Jy1GOjYjUSomZXBzaWxvbjtGKEZMLUYvNiUtRjo2JFEpSmFjb2JpU05GKEY9RkBGREZMLUYvNiVGOUZALUZFNiQtRi82JUZJRkwtRjo2I1EmJmV0YTtGKEZSLUYvNiVGYG9GQEZlby1JI21uR0YwNiNRIjBGKEZecC1GNTYkLUYvNidGXm9GTEY3RkwtRjo2I1EpJmRlbHRhOzJGKC1GLzYnRlVGTEZccEZMLUY6NiNRKCZiZXRhOzFGKEZecC1GNTYkRl5vRlxwLUZfcDYjUSIxRihGXnBGXnBGYHFGXnFGXnAtRjU2JC1GLzYnRl5vRkxGN0ZMLUY6NiNRKSZkZWx0YTsxRihGaXBGXnBGXnAtRi82JUY0LUZBNiNRKCZtaW51cztGKEZnbjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNXUmSE8pSEhZblc9
Constraints:
alpha2:=-alpha1:
beta2:=beta1:
gamma1:=0:
gamma2:=0:
omega:=sqrt(xi2^2*delta1*delta2*(1-alpha1^2/beta1^2)):
k:=xi1/xi2:
eta:=solve(sn(omega*eta,k)=1/xi1,eta):
xi1:=beta1/sqrt(delta1*delta2):
xi2:=beta1/sqrt(beta1^2-alpha1^2):
Properties:
R(0);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1VSZ6J3BJSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIjFGKC1GNjYjUSIwRihGPEY8NyZGPEY8RjVGPDcmRjxGNUY8Rjw3JkY8RjxGPEY1SSdNYXRyaXhHRiU3Iy1GQjYjL0kkJWlkR0YoRi8=
sy(diff(R(u),u)-DR(u));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1XT5ucElIWW5XPS1JJ01BVFJJWEdGKDYjNyY3Ji1JI21uRzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2I1EiMEYoRjVGNUY1RjRGNEY0SSdNYXRyaXhHRiU3Iy1GPDYjL0kkJWlkR0YoRi8=
sy(fc(ex(sy(fc(ex(eval(diff(R(u),u),u=0)-H))))));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSVtcm93RzYkRiYvSSttb2R1bGVuYW1lR0YoRiQ2JS1GLzYnLUkjbWlHRjA2I1EqJmVwc2lsb247RigtSSNtb0dGMDYjUTEmSW52aXNpYmxlVGltZXM7RigtSSZtc3FydEdGMDYjLUkmbWZyYWNHRjA2JC1JJW1zdXBHRjA2JC1GNzYjUSkmYWxwaGE7MUYoLUkjbW5HRjA2I1EiMkYoLUZFNiQtRjc2I1EoJmJldGE7MUYoRkpGOkZQLUY7NiNRKCZtaW51cztGKEZHLUZLNiNRIjBGKEZWRlZGVkZWRlZGVkZWRlZGVkZWRlZGVkZWLUYvNiYtRjs2I1EqJnVtaW51czA7RihGNC1GOzYjUScmcGx1cztGKEZHNyMtSSdNYXRyaXhHRiU2Iy9JJCVpZEdGKCI1JTRlJ3lJSFluVz0=
sy(H);
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyNYLCUhR0YoRihbZ2whIiUhISEjMSIlIiUtSSNtaUc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRKSZhbHBoYTsxRigtSSNtbkdGMDYjUSIwRihGNS1GLzYjUSkmZGVsdGE7MkYoRjUtRi82I1EoJmJldGE7MUYoRjVGNUY1RjVGPEY1LUYvNiNRKSZkZWx0YTsxRihGNUY1LUklbXJvd0dGMDYkLUkjbW9HRjA2I1EqJnVtaW51czA7RihGLjcjLUknTWF0cml4R0YlNiMvSSQlaWRHRigiNT0iKUhrSUhZblc9
Maple cannot handle simplification of complicated elliptic functions. It is necessary to check the solutions numerically.
rd:=rand(0.1..0.9):
listV:=evalf~({u=rd(),v=rd()});
listP:=evalf~({alpha1=rd(),beta1=rd(),delta1=rd(),delta2=rd()});
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0VkdGKDwkL0kidUdGKCQiPyJRS05BQTxkZ2VQdm12QCUhI0kvSSJ2R0YoJCI/PVs6c086IVEiUkRdIj4uIz1GMzcjRi4= LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SSZsaXN0UEdGKDwmL0knYWxwaGExR0YoJCI/ISkpKlxwOGs2Nz0lcGl0eihSISNJL0kmYmV0YTFHRigkIj9mcEBebzhaLkJoMCJwbmApRjMvSSdkZWx0YTFHRigkIj8nPiU9VHpqUjNKKXAiZl0icCVGMy9JJ2RlbHRhMkdGKCQiPzxdNGkzIlwiZiRbJTNjQXIhKUYzNyNGLg==
epsilon:=round(evalf(subs(listP,csgn(alpha1/beta1))));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyM+SShlcHNpbG9uR0YoIiIiNyNGLg==
fnormal(evalf(subs(listP,subs(listV,eval(diff(R(u),u),u=0)-H))));
LV9JLFR5cGVzZXR0aW5nRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiSSxtcHJpbnRzbGFzaEdGKDYkNyMtSSdSVEFCTEVHRig2JSI1RSI9XS8kSFluVz0tSSdNQVRSSVhHRig2IzcmNyYtSSNtbkc2JEYmL0krbW9kdWxlbmFtZUdGKEYkNiNRIzAuRihGNUY1RjVGNEY0NyZGNUY1RjUtRjY2I1EsJnVtaW51czA7MC5GKEknTWF0cml4R0YlNyMtRkA2Iy9JJCVpZEdGKEYv
for i from 1 to n^3 do for j from 1 to n^3 do print(W[i,j] = fnormal~(evalf~(subs(listP,subs(listV,[YB[i,j],DYB1[i,j],DYB2[i,j]])))));od;od;
LyZJIldHNiI2JCIiIkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJTclJCIiIUYrRiokISIhRis= LyZJIldHNiI2JCIiIiIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIiIiJzclJCEiISIiISRGLEYsRi0= LyZJIldHNiI2JCIiIiIiKDclJCEiISIiIUYqRio= LyZJIldHNiI2JCIiIiIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiI0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiIyIiJDclJCEiISIiIUYqRio= LyZJIldHNiI2JCIiIyIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiJjclJCIiIUYrJCEiIUYrRiw= LyZJIldHNiI2JCIiIyIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiIyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJCIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiJjclJCEiISIiIUYqRio= LyZJIldHNiI2JCIiJCIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJCIiKTclJCIiIUYrRiokISIhRis= LyZJIldHNiI2JCIiJSIiIjclJCEiISIiIUYqRio= LyZJIldHNiI2JCIiJSIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJUYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJSIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJSIiKDclJCIiIUYrJCEiIUYrRiw= LyZJIldHNiI2JCIiJSIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJkYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJiIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJiIiKTclJCIiIUYrJCEiIUYrRiw= LyZJIldHNiI2JCIiJyIiIjclJCEiISIiIUYqJEYsRiw= LyZJIldHNiI2JCIiJyIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiJTclJCIiIUYrJCEiIUYrRiw= LyZJIldHNiI2JCIiJyIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJ0YnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiJyIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiJyIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiIjclJCEiISIiISRGLEYsRi0= LyZJIldHNiI2JCIiKCIiIzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJTclJCEiISIiISRGLEYsRi0= LyZJIldHNiI2JCIiKCIiJjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKCIiJzclJCIiIUYrJCEiIUYrRiw= LyZJIldHNiI2JCIiKEYnNyUkIiIhRipGKUYp LyZJIldHNiI2JCIiKCIiKTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIjclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiIzclJCIiIUYrJCEiIUYrRiw= LyZJIldHNiI2JCIiKSIiJDclJCEiISIiISRGLEYsRio= LyZJIldHNiI2JCIiKSIiJTclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiJjclJCEiISIiISRGLEYsRi0= LyZJIldHNiI2JCIiKSIiJzclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKSIiKDclJCIiIUYrRipGKg== LyZJIldHNiI2JCIiKUYnNyUkIiIhRipGKUYp
ClearAll():