The ABINIT Users Mailing List ( CLOSED )

[<herve.mathis@cea.fr>]

Dear All,

I suppose there are two little errors in subroutine linopt.F90 (5.4.3 release) as regards Optic tool.

1) the 3 instructions “write(92,*) ‘Im(chi1) / Re(chi1) / Abs(chi1)’ should be replaced by

“write(92,*) ‘Im(eps) / Re(eps) / Abs(eps)’”

2) instruction “eps(iw) = 1 + 4pi chi1(iw)” should be replaced by “eps(iw) = 4pi chi1(iw)”

for non-diagonal components i.e. if v2.ne.v1