Wrote the dipolar_constant() function for calculating the dipolar constant.
The constant is defined as:
mu0 gI.gS.h_bar d = - --- ----------- 4pi r**3
Authored by: bugman 2008-07-25
Parent: [r6969]
Child: [r6971]
