Faça o download da tese completa na versão em PDF - A Biblioteca ...

T@n_, m_, p_D@ϕo_, λ_D := Hbn@n, λD + anst@m, λDL gTE@n, p, ϕo, λD gTMst@m, p + 1, ϕo, λD −
Han@n, λD + bnst@m, λDL gTM@n, p, ϕo, λD gTEst@m, p + 1, ϕo, λD;
c1@n_, m_, p_D@ϕo_, λ_D :=
Jc1@n, m, pD@ϕo, λD =
HS@m, n, p − 1D@ϕo, λD + S@n, m, −pD@ϕo, λD − 2 U@m, n, p − 1D@ϕo, λD − 2 U@n, m, −pD@ϕo, λDL
KroneckerDelta@m, n + 1D KroneckerDelta@n, m + 1D
J − NN;
m2
n2
2 n + 1
c2@n_, m_, p_D@ϕo_, λ_D :=
KroneckerDelta@n, mD
n2 Hn + 1L2
HT@m, n, p − 1D@ϕo, λD − T@n, m, −pD@ϕo, λD − 2 V@m, n, p − 1D@ϕo, λD + 2 V@n, m, −pD@ϕo, λDL;
nmin@p_, λ_D = Max@8p, lo@λD − 6