shielding constant calculation