next up previous contents index
Next: Subroutine init_transform Up: Module TBSystem_module Previous: Subroutine realloc_datomic_local_pot_dr   Contents   Index

Subroutine get_dipole_block


\begin{boxedminipage}{\textwidth} \begin{verbatim}call get_dipole_block(this,at,i,j, & dv_hat,dv_mag,block_dipole)\end{verbatim} \end{boxedminipage}

this -- type(TB_Dipole_Model), intent(in)

at -- type(Atoms), intent(in)

i, j -- integer, intent(in)

dv_hat -- real(dp), intent(in), dimension(3)

dv_mag -- real(dp), intent(in)

block_dipole -- real(dp), intent(out), dimension(:,:,:)

init_transform subroutine
gabor 2009-06-30