mz6687

35 Reputation

3 Badges

1 years, 228 days

MaplePrimes Activity


These are replies submitted by mz6687

@mmcdara x2, x1 in (3), and s2 in (5).

@mmcdara I need expressions as in the attached image. 

@sand15 Thanks. Is there any other wat to transform this set of PDEs into ODEs and solve it by RK scheme? I used the ansatz 'q=f(x-ct)', etc. Any other option?

@sand15 I did not delete it and I don't know who moved the last question. In 'Are_you_ok_with_that.mw' you found the determinant of B matrix (which is 8x8). But the following matrix is B11num1 (which is 9x9) as seen in this thread. Still, I could not find the determinant of B11num1. The system remains shows 'Evaluating' when I execute 'B11num2 := Determinant(B11num1)'

@sand15 For the 8x8 matrix, it works. But for 9x9 (as you can see 'B11num2' in https://www.mapleprimes.com/questions/237066-Determinant-The-System-Hangs), it doesn't work.

@sand15 I choose these parametric values 'para := {H__11 = 0, H__12 = 0, H__13 = 0, H__14 = 0.3, H__15 = 0, H__16 = 0, H__17 = 0, H__18 = 0, H__33 = 1.5, H__34 = 0, H__38 = 0.15, H__44 = 1.5, H__55 = 0, c__1 = 0.5, nu = 1, alpha__1 = 1.5, alpha__2 = 1, lambda__1 = 0.58*I, lambda__2 = 0.68*I, conjugate(lambda__1) = -0.58*I, conjugate(lambda__2) = -0.68*I}'. But with these values (where almost every entry of H takes zero except a few). But still, it's not evaluating. 

@sand15 Can we choose some suitable values of parameters (except x and t) that we get the determinant in https://www.mapleprimes.com/questions/237066-Determinant-The-System-Hangs? 

@sand15 I am just trying to solve the determinant https://www.mapleprimes.com/questions/237066-Determinant-The-System-Hangs and then plot it. No need to read the expression explicitly.

@acer @sand15    The status remains 'Evaluating' on the taskbar when I try to calculate the determinant of the 9x9 matrix. How to fix it?


 

restart

with(LinearAlgebra)

with(plots)

with(Physics)

NULL

Setup(mathematicalnotation = true)

[mathematicalnotation = true]

(1)

assume(x::real); assume(t::real); assume(`α__1`::real); assume(`α__2`::real); assume(nu::real)

alias(v = v(x, t))

v

(2)

vvalue := {v__11 = (conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__1`^4))*t, v__12 = (conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__2`^4))*t, v__21 = (conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__1`^4))*t, v__22 = (conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__2`^4))*t}

B1 := Matrix([[exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`)), 0, 0, 0, exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`)), 0, 0, 0], [0, exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`)), 0, 0, 0, exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`)), 0, 0], [0, 0, exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`)), 0, 0, 0, exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`)), 0], [0, 0, 0, exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__1`^4))*t())/(`λ__1`-conjugate(`λ__1`)), 0, 0, 0, exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))], [exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), 0, 0, 0, exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), 0, 0, 0], [0, exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), 0, 0, 0, exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), 0, 0], [0, 0, exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), 0, 0, 0, exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), 0], [0, 0, 0, exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), 0, 0, 0, exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*nu*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`))]]); H := Matrix([[H__11, H__12, H__13, H__14, H__15, H__16, H__17, H__18], [H__12, H__11, H__14, H__13, H__16, H__15, H__18, H__17], [H__13, H__14, H__33, H__34, H__17, H__18, H__55, H__38], [H__14, H__13, H__34, H__33, H__18, H__17, H__38, H__55], [H__15, H__16, H__17, H__18, H__11, H__12, H__13, H__14], [H__16, H__15, H__18, H__17, H__12, H__11, H__14, H__13], [H__17, H__18, H__55, H__38, H__13, H__14, H__33, H__34], [H__18, H__17, H__38, H__55, H__14, H__13, H__34, H__33]]); B := H.B1; idn8 := Matrix([[1, 0, 0, 0, 0, 0, 0, 0], [0, 1, 0, 0, 0, 0, 0, 0], [0, 0, 1, 0, 0, 0, 0, 0], [0, 0, 0, 1, 0, 0, 0, 0], [0, 0, 0, 0, 1, 0, 0, 0], [0, 0, 0, 0, 0, 1, 0, 0], [0, 0, 0, 0, 0, 0, 1, 0], [0, 0, 0, 0, 0, 0, 0, 1]])

Matrix(%id = 36893490867631959084)

(3)

``

``

t0 := time():
detH  := Determinant(H):
detB1 := Determinant(B1):
detB  := detH * detB1:
time()-t0;

.438

(4)

H1:=simplify(detH, size):
B2:=simplify(detB1, size):

para := {H__11 = .25, H__12 = 0, H__13 = .2, H__14 = .3, H__15 = 0.1e-1, H__16 = 0, H__17 = 0, H__18 = .2, H__33 = 1.5, H__34 = 1.3, H__38 = .15, H__44 = 1.5, H__55 = .1, c__1 = .5, nu = 1, `α__1` = 1.5, `α__2` = 1, `λ__1` = 0.1e-2+.68*I, `λ__2` = 0+.68*I, conjugate(`λ__1`) = 0.1e-2-.68*I, conjugate(`λ__2`) = 0-.68*I}

{H__11 = .25, H__12 = 0, H__13 = .2, H__14 = .3, H__15 = 0.1e-1, H__16 = 0, H__17 = 0, H__18 = .2, H__33 = 1.5, H__34 = 1.3, H__38 = .15, H__44 = 1.5, H__55 = .1, c__1 = .5, nu = 1, alpha__1 = 1.5, alpha__2 = 1, lambda__1 = 0.1e-2+.68*I, lambda__2 = .68*I, conjugate(lambda__1) = 0.1e-2-.68*I, conjugate(lambda__2) = -.68*I}

(5)

H2 := simplify(subs(para, H1))

-0.4033233000e-3

(6)

B3 := simplify(subs(para, B2))

(-0.1350374859e-19*exp(7.520779916*t-2.72*x)+0.1350375589e-19*exp(3.773184*t-2.72*x+(3.747595916*I)*t()))*exp(-7.520779914*t+2.72*x)

(7)

H3 := H2*B3

NULL

Omeg:=H3*idn8+idn8:

Omegdet:=Determinant(Omeg):Omegdet2:=simplify(Omegdet,size);

(-0.5446376444e-23*exp(-7.520779914*t+2.72*x)*exp(7.520779916*t-2.72*x)+0.5446379388e-23*exp(-7.520779914*t+2.72*x)*exp(3.773184*t-2.72*x+(3.747595916*I)*t())-1)^8

(8)

NULL

NULL

psi1star := exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4)); psi2star := exp(-I*conjugate(`λ__2`)*x+(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4)*t); pphi1 := exp(-I*`λ__1`*x-((4*I)*`λ__1`^3*`α__1`+(2*I)*`λ__1`^2*`α__2`-(8*I)*nu*`λ__1`^4)*t); pphi2 := exp(-I*`λ__2`*x-((4*I)*`λ__2`^3*`α__1`+(2*I)*`λ__2`^2*`α__2`-(8*I)*nu*`λ__2`^4)*t)

exp(-I*x*conjugate(lambda__1)+t*(-(4*I)*conjugate(lambda__1)^3*alpha__1-(2*I)*conjugate(lambda__1)^2*alpha__2+(8*I)*nu*conjugate(lambda__1)^4))

 

exp(-I*x*conjugate(lambda__2)+(-(4*I)*conjugate(lambda__2)^3*alpha__1-(2*I)*conjugate(lambda__2)^2*alpha__2+(8*I)*nu*conjugate(lambda__2)^4)*t)

 

exp(-I*x*lambda__1-((4*I)*lambda__1^3*alpha__1+(2*I)*lambda__1^2*alpha__2-(8*I)*nu*lambda__1^4)*t)

 

exp(-I*x*lambda__2-((4*I)*lambda__2^3*alpha__1+(2*I)*lambda__2^2*alpha__2-(8*I)*nu*lambda__2^4)*t)

(9)

NULL

NULL

NULL

``

B11num1 := Matrix([[H__11*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__15*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__12*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__16*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__13*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__17*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__14*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__18*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__11*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__15*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__12*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__16*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__13*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__17*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__14*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__18*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__13*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__17*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__12*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__16*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__11*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__15*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__14*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__18*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__13*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__17*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__12*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__16*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__11*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__15*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__14*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__18*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__13*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__17*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__14*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__18*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__13*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__17*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__14*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__18*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__33*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__55*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__34*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__38*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__13*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__17*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__14*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__18*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__33*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__55*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__34*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__38*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__33*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__55*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__14*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__18*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__13*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__17*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__34*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__38*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__33*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__55*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__14*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__18*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__13*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__17*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__34*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__38*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__33*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__55*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__34*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__38*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__15*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__11*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__16*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__12*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__17*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__13*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__18*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__14*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__15*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__11*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__16*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__12*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__17*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__13*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__18*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__14*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__17*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__13*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__16*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__12*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__15*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__11*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__18*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__14*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__17*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__13*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__16*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__12*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__15*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__11*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__18*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__14*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__17*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__13*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__18*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__14*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__17*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__13*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__18*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__14*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__55*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__33*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__38*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__34*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__17*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__13*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__18*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__14*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__55*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__33*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*`~`[t]))/(`λ__2`-conjugate(`λ__2`)), H__38*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__34*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__55*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__33*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [H__18*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__14*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__17*exp(I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__13*exp(I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__38*exp(-I*((conjugate(`λ__1`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__1`))+H__34*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__55*exp(-I*(conjugate(`λ__1`)-`λ__1`)*x+t()*(4*`α__1`*(conjugate(`λ__1`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__1`^4)))/(`λ__1`-conjugate(`λ__1`))+H__33*exp(-I*((conjugate(`λ__2`)-`λ__1`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__1`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__1`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__1`^4))*t))/(`λ__1`-conjugate(`λ__2`)), H__18*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__14*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__17*exp(I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__13*exp(I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__38*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__34*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__55*exp(-I*((conjugate(`λ__1`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__1`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__1`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__1`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__1`))+H__33*exp(-I*((conjugate(`λ__2`)-`λ__2`)*x+(4*`α__1`*(conjugate(`λ__2`)^3-`λ__2`^3)+2*`α__2`*(conjugate(`λ__2`)^2-`λ__2`^2)-8*`ν`*(conjugate(`λ__2`)^4-`λ__2`^4))*t))/(`λ__2`-conjugate(`λ__2`)), H__38*exp(-I*conjugate(`λ__1`)*x+t*(-(4*I)*conjugate(`λ__1`)^3*`α__1`-(2*I)*conjugate(`λ__1`)^2*`α__2`+(8*I)*nu*conjugate(`λ__1`)^4))+H__34*exp(-I*conjugate(`λ__2`)*x+t*(-(4*I)*conjugate(`λ__2`)^3*`α__1`-(2*I)*conjugate(`λ__2`)^2*`α__2`+(8*I)*nu*conjugate(`λ__2`)^4))], [exp(-I*`λ__1`*x-((4*I)*`λ__1`^3*`α__1`+(2*I)*`λ__1`^2*`α__2`-(8*I)*nu*`λ__1`^4)*t), 0, 0, 0, exp(-I*`λ__2`*x-((4*I)*`λ__2`^3*`α__1`+(2*I)*`λ__2`^2*`α__2`-(8*I)*nu*`λ__2`^4)*t), 0, 0, 0, 0]])

B11 := simplify(subs(para, B11num1))

Matrix(%id = 36893490867651555924)

(10)

B11num2 := Determinant(B11num1)

NULL

NULL

NULL

NULL


 

Download determinant_edited.mw

@tomleslie {alpha,c,gamma} are constants. However, {w and k} are variables. We can assign a range of 'w'.

@nm On the page, it is mentioned that 'Before beginning the loop, assign i to a starting value'. As you can see in my code. I assigned the starting value of i.

@nm I changed elseif to elif. But this time I received 'Error, cannot determine if this expression is true or false:'

@mmcdara I have some queries. Consider a simple relation i.e., w^2=-k^4/4+k^2*c^2, where c is a constant. For the range k>0    and k< 2*c, the w have real, positive values. Can we do it in the above case which is more complicated? Secondly, k is maximum at sqrt(2)*c which can be obtained by putting dw/dk=0. Also, you have taken w to be a constant by giving the numerical value "w = .2907448089", but this is not a constant. And can we put symbols [i.e., asteric, circle, box, etc] on the local and global max in the fig?

@tomleslie Thanks for the response. But when I increase the size of labelfont by 18, there is no effect on the size of v[1].

Page 1 of 1