###

External module function *dL1* - used by *mcdisp*

In order to visualize angular momentum fluctuations and to calculate neutron intensities
in dipole approximation the external single ion module has to provide the transition
matrix elements of the angular momentum by the
vector , which is given by:
.

The format to be used is:

extern "C" int dL1(int & tn,double & T,Vector & Hxc,Vector & Hext,double * g_J,Vector & MODPAR,
char ** sipffilename,ComplexVector & L1,float & maxE, ComplexMatrix & est)

The meaning of the symbols follows exactly that of function
*dm1* and therefore not explained here.

Martin Rotter
2017-01-10