print_dipole Subroutine

subroutine print_dipole(dipole)

Print the dipole components in the determined ABC frame

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	dipole