replaced local RADIUS variable with a link to the RADIUS variable from the common block
replaced local RADIUS variable with a link to the RADIUS variable from the common block

NLeSC/enram,NLeSC/enram,NLeSC/enram,NLeSC/enram