fCalcPotRadiation function

fCalcPotRadiation