nicholas-m

Ask a Question

Create a Post

One Badge

Member for: 11 years, 280 days

Contact nicholas-m

MaplePrimes Activity

These are replies submitted by nicholas-m

Thanks-and a bit more...

Answered: nicholas-m 5

October 28 2013

0 0

@Carl Love

Thanks for your suggestion.

I tried it for the model I am developing but it gives me some errors. Ses uploaded file.

The R(λ) and RR(λ) should be real since they are modulus^2 and ()*(complex conjugate).

Any suggestions? I must be doing something wrong.

Thanks.

R := proc (lambda) options operator, arrow; proc (lambda) options operator, arrow; (r1+t1p*r2*t1*exp(-(2*I)*Pi*L/lambda)/(1-r1p*r2*exp(-(4*I)*Pi*L/lambda)))^2 end proc end proc

(1)

proc (lambda) options operator, arrow; (r1+t1p*r2*t1*exp(-(2*I)*Pi*L/lambda)/(1-r1p*r2*exp(-(4*I)*Pi*L/lambda)))^2 end proc

(2)

RR := proc (lambda) options operator, arrow; proc (lambda) options operator, arrow; (r1+t1p*r2*t1*exp(-(2*I)*Pi*L/lambda)/(1-r1p*r2*exp(-(4*I)*Pi*L/lambda)))(conjugate(r1+t1p*r2*t1*exp(-(2*I)*Pi*L/lambda)/(1-r1p*r2*exp(-(4*I)*Pi*L/lambda)))) end proc end proc